Exif example for C++ 5.0 and later

This example does the following:

Note: Comments for GIF, TIFF, and DICOM files are simpler than the ones in this Exif example. With those file types, all of the comments are strings that you can get and set with simple assignments.

   ILEADRasterIO *pRasterIO=NULL;
   ILEADRasterProcess *pRasterProc=NULL; 
   ILEADRasterVariant * pltRasVar1 = NULL; 
   ILEADRasterVariant * pltRasVar2 = NULL; 
   ILEADRasterVariant * pltRasVar3 = NULL; 
   ILEADRasterVariant * pltRasVarEmpty = NULL; 

   CoCreateInstance(CLSID_LEADRasterIO, NULL, CLSCTX_ALL, 
                    IID_ILEADRasterIO, (void**)&pRasterIO); 

   CoCreateInstance(CLSID_LEADRasterProcess, NULL, CLSCTX_ALL, 
                    IID_ILEADRasterProcess, (void**)&pRasterProc); 
   
   CoCreateInstance(CLSID_LEADRasterVariant, NULL, CLSCTX_ALL, 
                                   IID_ILEADRasterVariant, (void **)&pltRasVar1); 
   CoCreateInstance(CLSID_LEADRasterVariant, NULL, CLSCTX_ALL, 
                                   IID_ILEADRasterVariant, (void **)&pltRasVar2); 
   CoCreateInstance(CLSID_LEADRasterVariant, NULL, CLSCTX_ALL, 
                                   IID_ILEADRasterVariant, (void **)&pltRasVar3); 
   CoCreateInstance(CLSID_LEADRasterVariant, NULL, CLSCTX_ALL, 
                                   IID_ILEADRasterVariant, (void **)&pltRasVarEmpty); 

   // Array index for general use. 
   long MyIndex; 
   // Value for clearing comments. 
   pltRasVarEmpty->Type = VALUE_STRING; 
   pltRasVarEmpty->StringValue = "";
   // File that we will load and update. 
   CString FilePath = TEXT("d:\\temp\\exif1.tif");
   // Get all of the current comments from an Exif file. 
   // Temporarily disable errors so that we do not fail when comments are missing. 
   pRasterIO->PutEnableMethodErrors(FALSE); 
   for(short i = 0; i <= CMNT_LAST; ++i) 
   {
     pRasterIO->PutComment(i, pltRasVarEmpty); 
     pRasterIO->PutComment(i, 
                           pRasterIO->ReadComment(m_LEADRasterView1.GetRaster(),
                                                  LPCTSTR(FilePath), 1, i)); 
   }
   pRasterIO->PutEnableMethodErrors(TRUE); 
   // Load and modify the image. 
   pRasterIO->Load(m_LEADRasterView1.GetRaster(),
                   LPCTSTR(FilePath), 0, 0, 1); 
   pRasterProc->Reverse(m_LEADRasterView1.GetRaster());
   // Update the date when the file is generated. 
   CTime RightNow = CTime::GetCurrentTime();
   CString DateTimeString = RightNow.Format(TEXT("%Y:%m:%d %H:%M:%S"));
   pltRasVar1->Type = VALUE_STRING; 
   pltRasVar1->StringValue = (PSTR) DateTimeString; 
   pRasterIO->PutComment(CMNT_SZDATETIMEDIGITIZED, pltRasVar1); 
   pRasterIO->PutComment(CMNT_SZSUBSECTIMEDIGITIZED, pltRasVarEmpty); 
   // Change the CMNT_SUBJECTDISTANCE comment to 4 1/3 meters. 
   pltRasVar2->Type = VALUE_ARRAY_LONG; 
   pltRasVar2->LongItemValue(0) = 13; 
   pltRasVar2->LongItemValue (0) = 3; 
   // Update the CMNT_SUBJECTDISTANCE comment. 
   pRasterIO->PutComment(CMNT_SUBJECTDISTANCE, pltRasVar2); 
   // Add an ASCII CMNT_USERCOMMENT comment. 
   // Specify the user comment string. 
   CString MyCommentText = TEXT("This is my new comment."); 
   int MyCommentSize = 8 + MyCommentText.GetLength();
   // Define the array for the user comment. 

   pltRasVar3->Type = VALUE_ARRAY_BYTE; 
   pltRasVar3->ItemCount = MyCommentSize + 1; 
   
   // Fill in the ASCII prefix. 
   pltRasVar3->ShortItemValue(0) = 'A'; 
   pltRasVar3->ShortItemValue (1) = 'S'; 
   pltRasVar3->ShortItemValue (2) = 'C'; 
   pltRasVar3->ShortItemValue (3) = 'I'; 
   pltRasVar3->ShortItemValue (4) = 'I'; 
   pltRasVar3->ShortItemValue (5) = '\0'; 
   pltRasVar3->ShortItemValue (6) = '\0'; 
   pltRasVar3->ShortItemValue (7) = '\0'; 
   // Fill in the rest of the CMNT_USERCOMMENT comment. 
   for( i = 8; i < MyCommentSize; ++i) 
   {
     pltRasVar3->ShortItemValue(i) = MyCommentText[i-8]; 
   }
   pltRasVar3->ShortItemValue (MyCommentSize) = '\0'; 
   // Update the CMNT_USERCOMMENT comment. 
   pRasterIO->PutComment(CMNT_USERCOMMENT, pltRasVarEmpty); 
   pRasterIO->PutComment(CMNT_USERCOMMENT, pltRasVar3); 
   // Save the file. 
   pRasterIO->Save(m_LEADRasterView1.GetRaster(),
                   LPCTSTR(FilePath), FILE_EXIF, 24, 
                   (QFactorConstants)0, SAVE_OVERWRITE); 
   // Read the comments that we saved. 
   pltRasVar1 = pRasterIO->ReadComment(m_LEADRasterView1.GetRaster(),
                                       LPCTSTR(FilePath), 1, CMNT_SZDATETIMEDIGITIZED); 
   
   pltRasVar2 = pRasterIO->ReadComment(m_LEADRasterView1.GetRaster(),
                                       LPCTSTR(FilePath), 1, CMNT_SUBJECTDISTANCE); 
   
   pltRasVar3 = pRasterIO->ReadComment(m_LEADRasterView1.GetRaster(),
                                       LPCTSTR(FilePath), 1, CMNT_USERCOMMENT); 
      
   // Format the Subject Distance as a string. 
   CString DistanceString; 
   DistanceString.Format(TEXT("%f"), (double)pltRasVar2->FloatItemValue (0) / pltRasVar2->FloatItemValue (1)); 
   // Format the CMNT_SZDATETIMEDIGITIZED comment as a string. 
   CString NewDateTime(pltRasVar1->StringValue);   
// Initialize the string for the message box. 
   CString MyMsg = TEXT("Subject Distance = ") + DistanceString + TEXT("\nDate/Time = ") + NewDateTime; 
   // Add the ASCII comment to the message, if the comment is there. 
   
   TCHAR OneCharacter;   
   OneCharacter = pltRasVar3->ShortItemValue (MyIndex); 
   if( OneCharacter == 'A') 
   {
      MyMsg = MyMsg + TEXT("\n\n");
      long ArraySize;      
      ArraySize = pltRasVar3->ItemCount ; 
      for ( MyIndex = 8; MyIndex <= ArraySize; MyIndex++)
      {
         OneCharacter = pltRasVar3->ShortItemValue (MyIndex);         
         MyMsg = MyMsg + CString(OneCharacter); 
      }
   }
   // Display the message. 
   MessageBox(MyMsg); 
   // Clear the comments from memory
   for( i = 0; i <= CMNT_LAST; ++i) 
     pRasterIO->PutComment(i, pltRasVarEmpty); 
   pRasterIO->Release();
   pRasterProc->Release();

   pltRasVarEmpty->Release ();
   pltRasVar1->Release ();
   pltRasVar2->Release ();
   pltRasVar3->Release ();