According to the documentation this should function:
procedure TForm1.Button1Click(Sender: TObject);
var
iAppSettingsFolder: string;
begin
{Set default "Crop" parameters}
ImageEnView1.Proc.IPDialogParams.Crop_Left := 0;
ImageEnView1.Proc.IPDialogParams.Crop_Top := 0;
ImageEnView1.Proc.IPDialogParams.Crop_Right := 32;
ImageEnView1.Proc.IPDialogParams.Crop_Bottom := 32;
{Set default "Resize" parameters}
ImageEnView1.Proc.IPDialogParams.Resize_Percent := 50;
iAppSettingsFolder := AppDataFolder + 'ASG\Apprehend\';
{Make parameters persistent (saved between sessions)}
if FileExists(iAppSettingsFolder + 'Previews.dat') then
ImageEnView1.Proc.IPDialogParams.LoadFromFile(iAppSettingsFolder +
'Previews.dat');
if ImageEnView1.Proc.DoPreviews([peCrop]) then
ImageEnView1.Proc.IPDialogParams.SaveToFile(iAppSettingsFolder +
'Previews.dat');
end;
but with respect to the crop preview, there seems to be three problems with the dialog:
1. When you set the crop parameters before the dialog is displayed, the crop values are set to the passed parameters but the dialog selects the entire image instead of the crop values.
2. If you change the crop parameters at runtime, the selection does not change to match the values shown in the spinedits.
3. When the dialog is shown after the settings have been saved to a file the spinedits match that saved to the file but the whole image remains selected.
Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development
Search
Possible to save effects settings ?
Posted - Oct 30 2015 : 05:01:19
