TOpenImageEnDialog.OnPreviewFile

Declaration

property OnPreviewFile: TIEFileDlgPreviewEvent;

Description

Occurs whenever a file is selected and needs to be previewed.

You can change the method that is used to load images by handling this event.

Example

// this is the default behavior
procedure TForm1.OnPreviewFile(Sender: TObject; Viewer: TObject; FileName: String; ParamsOnly: Boolean;
begin
  if ParamsOnly then
    (Viewer as TImageEnView).IO.ParamsFromFile(FileName)
  else
  if Viewer is TImageEnView then
    (Viewer as TImageEnView).IO.LoadFromFileAuto(FileName)
  else
  if Viewer is TImageEnMView then
    (Viewer as TImageEnMView).LoadFromFileOnDemand(FileName);
end;

---