procedure TformPhotoCatalog.ImageEnFolderMView1GetTextEx(Sender: TObject;
  Index: Integer; Position: TIEMTextPos; var Text: WideString; Font: TFont;
  var BackgroundStyle: TBrushStyle; var BackgroundColor: TColor;
  var TruncSide: TIEMTruncSide);
var
  tempFileExt: String;
begin
  tempFileExt := ExtractFileExt( Text );
 if IEExtToFileFormat( tempFileExt ) = ioJPEG then
    begin
     if  Position = iemtpTop then
        begin
          if ImageEnFolderMView1.DefaultTopText = iedtCustom then
            begin
             Text := This is where I need to acquire the EXIF_DateTimeDigitized value of the respective image;
            end;
        end
      else
        begin
           if  Position = iemtpInfo  then
              begin
                if ImageEnFolderMView1.DefaultInfoText = iedtCustom then
                  begin
                    Text := see above
                  end;
              end
            else
              begin
               if  Position = iemtpBottom  then
                  begin
                    if ImageEnFolderMView1.DefaultBottomText = iedtCustom then
                      begin
                        Text := see above
                      end;
                  end;
              end;
        end;
end;