ShowFileConversionDlg example for Delphi

procedure TForm1.ShowFileConversionDlgClick(Sender: TObject);
begin
   LEADDlgFile1.Overwrite:= DLG_FILECONVERSION_OVERWRITE_SKIP; 
   LEADDlgFile1.FileFormatsCount:= 0; 
   LEADDlgFile1.DestinationPath:= 'c:\output'; 
   LEADDlgFile1.UseLogReport:= True; 
   LEADDlgFile1.RemoveSourceFile:= False; 
   LEADDlgFile1.ShowFullPath:= True; 
   LEADDlgFile1.UseOriginalFolder:= True; 
   LEADDlgFile1.SourceFileList:= 'C:\images\Image1.jpg|C:\images\Image2.jpg|C:\images\Image3.jpg|C:\images\Image4.jpg|';
   LEADDlgFile1.DlgFlags:= DLG_FILECONVERSION_SHOW_PREVIEW                     Or
                           DLG_FILECONVERSION_SHOW_LOADOPTIONS                 Or
                           DLG_FILECONVERSION_SHOW_FILEINFO                    Or
                           DLG_FILECONVERSION_SHOW_PREVIEW_PAGES               Or
                           DLG_FILECONVERSION_SHOW_RESIZE                      Or
                           DLG_FILECONVERSION_SHOW_ROTATE                      Or
                           DLG_FILECONVERSION_SHOW_NAMINGTEMPLATE              Or
                           DLG_FILECONVERSION_SHOW_OVERWRITE                   Or
                           DLG_FILECONVERSION_SHOW_OVERWRITE_ALL               Or
                           DLG_FILECONVERSION_SHOW_ADD                         Or
                           DLG_FILECONVERSION_SHOW_ADDFOLDER                   Or
                           DLG_FILECONVERSION_SHOW_REMOVE                      Or
                           DLG_FILECONVERSION_SHOW_SELECTALL                   Or
                           DLG_FILECONVERSION_SHOW_DELETEORIGINAL; 

   LEADDlgFile1.ShowFileConversionDlg ( Self ); 
end;