Class TEffectProcessor

Unit

Declaration

type TEffectProcessor = class(TObject)

Description

TEffectProcessor

Hierarchy

  • TObject
  • TEffectProcessor

Overview

Methods

Public constructor Create (AOwner: TObject; AUseUndo: Boolean); reintroduce; virtual;
Public procedure AfterConstruction; override;
Public procedure BeforeDestruction; override;
Public procedure Reset;
Public function FindAvgImageColor (AGraphic: TGraphic): TvxColor;
Public function FindDominantImageColor (AGraphic: TGraphic): TvxColor;
Public function FindAvgBitmapColor (ABmp: TvxBitmap32): TvxColor;
Public function FindDominantBitmapColor (ABmp: TvxBitmap32): TvxColor;
Public procedure EnumUndoSteps (AResult: TxomStrings);
Public procedure EnumRedoSteps (AResult: TxomStrings);
Public procedure EffectSave (AImage: TImageItem; ASaveSettings: TSaveSettings; AUpdateThumb: Boolean = True);
Public procedure EffectUndo (AImage: TImageItem; ALevel: Integer = -1);
Public procedure EffectRedo (AImage: TImageItem);
Public procedure EffectBrightness (AImage: TImageItem; AValue: Integer);
Public procedure EffectContrast (AImage: TImageItem; AValue: Integer);
Public procedure EffectTones (AImage: TImageItem; ACurves: TToneCurve; ATemperature: Integer = 5003);
Public procedure EffectHueMixer (AImage: TImageItem; AHueCurve: TToneCurve);
Public procedure EffectGamma (AImage: TImageItem; AValue: Integer);
Public procedure EffectLighten (AImage: TImageItem; AValue: Integer);
Public procedure EffectFillFlash (AImage: TImageItem; AValue: Integer);
Public procedure EffectDarkenBackground (AImage: TImageItem; AValue: Integer);
Public procedure EffectAutoColorCorrection (AImage: TImageItem; AValue: Integer; const AFilterColor: String);
Public procedure EffectEnrichShadow (AImage: TImageItem; AValue: Integer);
Public procedure EffectHighKey (AImage: TImageItem; AValue: Integer);
Public procedure EffectHighlightShadow (AImage: TImageItem; AShadows, AMids, AHighlights, AWhites, ABlacks: Integer);
Public procedure EffectSpotHealing (AImage: TImageItem; APath: TidPath);
Public procedure EffectRedEye (AImage: TImageItem; AMarkers: TidElement);
Public procedure EffectRecipe (AImage: TImageItem; ARecipe: TRecipe);
Public procedure EffectFlattenRecipe (AImage: TImageItem; ARecipe: TRecipe);
Public procedure EffectReplaceRecipe (AImage: TImageItem; ARecipe: TRecipe);
Public procedure EffectApplyAreas (AImage: TImageItem; AAreaColor: TvxColor = $FFFFFFFF; AWithText: Boolean = True);
Public procedure EffectWhiteBalance (AImage: TImageItem; ATemperature, ATint: Integer; AWhitePointTemp: Integer = 5504);
Public procedure EffectWhitePoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
Public procedure EffectGrayPoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
Public procedure EffectBlackPoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
Public procedure EffectGlamour (AImage: TImageItem; AValue: Integer; ASoftFocus: Integer = 0; ASaturation: Integer = 0; AMaskValue: Integer = 255);
Public procedure EffectEnhContrast (AImage: TImageItem);
Public procedure EffectRotate (AImage: TImageItem; AValue: Single; ALossless: Boolean = False; const ABackColor: String = vcWhite; ACrop: Boolean = False);
Public procedure EffectQuickRotate (AImage: TImageItem; ADegrees: Single; ALossless: Boolean = False);
Public procedure EffectFlip (AImage: TImageItem; AHorizontal, AVertical: Boolean);
Public procedure EffectCrop (AImage: TImageItem; ARelativeRect: TvxRect; ACropAngle: Single = 0);
Public procedure EffectResize (AImage: TImageItem; ASettings: TResizeSettings);
Public procedure EffectResizeRelative (AImage: TImageItem; AWidthFactor, AHeightFactor: Double; ASettings: TResizeSettings);
Public function EffectCanvasSize (AImage: TImageItem; AWidth, AHeight: Integer; const ABackColor: String = vcWhite; APosition: TWindDirection = wdCenter; ACropToFit: Boolean = False; AStretchToFit: Boolean = False; AProportional: Boolean = False): TRect;
Public function EffectCanvasSizeRelative (AImage: TImageItem; AWidthFactor, AHeightFactor: Double; const ABackColor: String = vcWhite; APosition: TWindDirection = wdCenter; ACropToFit: Boolean = False; AStretchToFit: Boolean = False; AProportional: Boolean = False): TRect;
Public procedure EffectBlend (AImage: TImageItem; ABlendImage: TGraphic; ABlendMode: TvxBlendMode; AOpacity: Integer = 255);
Public procedure EffectSharpen (AImage: TImageItem; AFactor: Integer = 0);
Public procedure EffectDynamicSharpen (AImage: TImageItem; AFactor: Integer = 0);
Public procedure EffectAdvancedSharpen (AImage: TImageItem; AFactor: Integer = 30);
Public procedure EffectSmooth (AImage: TImageItem; AFactor: Integer = 20);
Public procedure EffectGaussianBlur (AImage: TImageItem; ARadius: Double = 2; AHorizontal: Boolean = True; AVertical: Boolean = True);
Public procedure EffectGray (AImage: TImageItem; AValue: Integer = 0);
Public procedure EffectBW (AImage: TImageItem; AFilterPerc: Integer = 0; AFilterColor: TvxGrayFilter = gfOrange; AGrayValue: Integer = 0; AFilmGrainPerc: Integer = 0);
Public procedure EffectMono (AImage: TImageItem; ADithered: Boolean = False);
Public procedure EffectSepia (AImage: TImageItem; AContrastPercent: Integer = 0; ATemperature: Integer = 7000);
Public procedure EffectAlphaChannelRemoval (AImage: TImageItem; const AColor: String = vcBlack);
Public procedure EffectDuotone (AImage: TImageItem; AColors: TAutoLevelColorValues);
Public procedure EffectColorCorrection (AImage: TImageItem; AColors: TAutoLevelColorValues);
Public procedure EffectColorFilter (AImage: TImageItem; ALevel: Byte; const AFilterColor: String; AMono: Boolean = False; APSMode: Boolean = True);
Public procedure EffectICSColors (AImage: TImageItem; AICSSettings: TICSSettings; var ASourceProfile: WideString; var ATargetProfile: WideString; var AProofProfile: WideString; AReversed: Boolean; var AIsEmbeddedProfile: Boolean);
Public procedure EffectFrame (AImage: TImageItem; AFrameDesign: TFrameDesign; AOptions: TOptions = nil);
Public procedure EffectCaption (AImage: TImageItem; ACaption: TImageCaption; AOptions: TOptions = nil);
Public procedure EffectCaptions (AImage: TImageItem; ACaptions: TImageCaptions; AOptions: TOptions = nil; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
Public procedure EffectDrawAreas (AImage: TImageItem; AAreas: TCatalogAreas; ADrawAreas: TDrawAreaParts);
Public procedure EffectTitle (AImage: TImageItem; ATitle: TImageTitle; AOptions: TOptions = nil; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
Public procedure EffectWatermarks (AImage: TImageItem; AWatermarks: TImageWatermarks);
Public procedure EffectDrawGraphic (AImage: TImageItem; AGraphic: TGraphic; ADrawStyle: TvxDrawStyle; AOpacity: Byte = 255);
Public procedure EffectAddNoise (AImage: TImageItem; AValue: Byte);
Public procedure EffectFilmGrain (AImage: TImageItem; AValue: Byte);
Public procedure EffectSoftFocus (AImage: TImageItem; AValue: Byte);
Public procedure EffectCropToRatio (AImage: TImageItem; AXFactor, AYFactor: Real; DoDynamic: Boolean = True);
Public procedure EffectSaturate (AImage: TImageItem; AValue: Integer = 1);
Public procedure EffectClarity (AImage: TImageItem; AValue: Integer = 0);
Public procedure EffectExposure (AImage: TImageItem; AValue: Integer = 0; ABrightness: Integer = 0);
Public procedure EffectHue (AImage: TImageItem; AValue: Integer = 0);
Public procedure EffectHueShift (AImage: TImageItem; AValue: Integer = 0);
Public procedure EffectHSL (AImage: TImageItem; AHueDelta, ASatDelta, ALumDelta: Integer);
Public procedure EffectAutoFix (AImage: TImageItem);
Public procedure EffectEmboss (AImage: TImageItem);
Public procedure EffectPolarize (AImage: TImageItem; AValue: Integer);
Public procedure EffectPolarizeAdv (AImage: TImageItem; AValue: Integer);
Public procedure EffectNegative (AImage: TImageItem);
Public procedure EffectAutoLevels (AImage: TImageItem; AValue: Integer; AColors: TAutoLevelColorValues);
Public procedure EffectDynamicRange (AImage: TImageItem; ALightBmp, ADarkBmp: TvxBitmap; AMaskValue: Integer; ABlurValue: Double = 4; AReversed: Boolean = False);
Public procedure EffectDynamicRangeQuick (AImage: TImageItem; ALevel: Integer);
Public procedure EffectMask (AImage: TImageItem; AGrayClipPoint: Byte);
Public procedure CommandRename (AImage: TImageItem; ASettings: TRenameSettings; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
Public procedure CommandRedate (AImage: TImageItem; ASettings: TRedateSettings; var ACumulation: TDateTimeEditTypeArray);
Public procedure CommandStack (AImage: TImageItem; const AGroupGUID: String);
Public procedure CommandUnstack (AImage: TImageItem);
Public procedure CommandDetectFaces (AImage: TImageItem);
Public procedure CommandDetectObjects (AImage: TImageItem);
Public procedure CommandAIOpenAI_Metadata (AImage: TImageItem; const AContext: WideString; const AResultHandling: TOpenAIResultHandling; const AAutoProcess: Boolean);
Public procedure CommandAIVision_DetectLabels (AImage: TImageItem; AAssignLabels: TAIAssignLabels);
Public procedure CommandAIVision_DetectFaces (AImage: TImageItem);
Public procedure CommandAIVision_DetectObjects (AImage: TImageItem);
Public procedure CommandAIVision_DetectLandmarks(AImage: TImageItem);
Public procedure CommandAIVision_DetectTexts (AImage: TImageItem);
Public procedure CommandGEOTag (AImage: TImageItem; ASettings: TidElement);
Public procedure CommandGEOGPXTag (AImage: TImageItem; const AGPXFileName: WideString; const ADelta: TGPSDeltaTime);
Public procedure CommandGEOForwardLookup (AImage: TImageItem; const ALocation: WideString);
Public procedure CommandGEOReverseLookup (AImage: TImageItem);
Public procedure CommandGEOLookupAltitude (AImage: TImageItem);
Public procedure CommandGEORemove (AImage: TImageItem);
Public procedure CommandConvert (AImage: TImageItem; ASaveSettings: TSaveSettings);
Public procedure CommandProperties (AImage: TImageItem; AProperties: TImageDetail; ATargetXMP: TObject = nil; AOnlyFilled: Boolean = False; OnlyFilledIPTC: Boolean = True; AResult: TxomStrings = nil; AMigrateKeywords: Boolean = True; AUserCache: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil; ACustomValues: TMacroValues = nil; const AFilenameToPreserve: WideString = ''; AAllowTechnical: Boolean = True);
Public procedure CommandImportXMP (AImage: TImageItem; AXMPFileName: WideString; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
Public procedure CommandExportXMP (AImage: TImageItem; ASettings: TRenameSettings; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
Public procedure CommandConvertMetaToXMP (AImage: TImageItem);
Public procedure CommandRemoveExif (AImage: TImageItem);
Public procedure CommandUpdateExifThumb (AImage: TImageItem);
Public procedure CommandSave (AImage: TImageItem; ASaveSettings: TSaveSettings);
Public procedure CommandLoad (AImage: TImageItem; const AFileName: WideString; AFastRAWLoad: Boolean = False; AExifOriented: Boolean = True);
Public procedure CommandScript (AImage: TImageItem; const AFileName: WideString; const AParameters: WideString = '');
Public procedure AddUndoGraphic (AGraphic: TGraphic; const AUndoLabel: WideString);

Properties

Public property UseUndo: Boolean read FUseUndo write FUseUndo;
Public property CanUndo: Boolean read GetCanUndo;
Public property CanRedo: Boolean read GetCanRedo;
Public property UndoHint: WideString read GetUndoHint;
Public property RedoHint: WideString read GetRedoHint;
Public property Catalog: TCatalog read GetCatalog;
Public property CatalogAgnostic: Boolean read FCatalogAgnostic write FCatalogAgnostic;
Public property Model: TImageModel read FModel write FModel;
Public property Options: TOptions read GetOptions;
Public property UndoCollection: TImageCollection read FUndoCollection;
Public property UndoLevel: Integer read FUndoLevel;
Published property CreateUndoThumbs: Boolean read FCreateUndoThumbs write FCreateUndoThumbs;
Published property OnProgress : TvxProgressEvent read FOnProgress write FOnProgress;
Published property OnAfterSave : TNotifyEvent read FOnAfterSave write FOnAfterSave;
Published property OnAfterEffect : TNotifyEvent read FOnAfterEffect write FOnAfterEffect;

Description

Methods

Public constructor Create (AOwner: TObject; AUseUndo: Boolean); reintroduce; virtual;
 
Public procedure AfterConstruction; override;
 
Public procedure BeforeDestruction; override;
 
Public procedure Reset;
 
Public function FindAvgImageColor (AGraphic: TGraphic): TvxColor;
 
Public function FindDominantImageColor (AGraphic: TGraphic): TvxColor;
 
Public function FindAvgBitmapColor (ABmp: TvxBitmap32): TvxColor;
 
Public function FindDominantBitmapColor (ABmp: TvxBitmap32): TvxColor;
 
Public procedure EnumUndoSteps (AResult: TxomStrings);
 
Public procedure EnumRedoSteps (AResult: TxomStrings);
 
Public procedure EffectSave (AImage: TImageItem; ASaveSettings: TSaveSettings; AUpdateThumb: Boolean = True);
 
Public procedure EffectUndo (AImage: TImageItem; ALevel: Integer = -1);
 
Public procedure EffectRedo (AImage: TImageItem);
 
Public procedure EffectBrightness (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectContrast (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectTones (AImage: TImageItem; ACurves: TToneCurve; ATemperature: Integer = 5003);
 
Public procedure EffectHueMixer (AImage: TImageItem; AHueCurve: TToneCurve);

D50

Public procedure EffectGamma (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectLighten (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectFillFlash (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectDarkenBackground (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectAutoColorCorrection (AImage: TImageItem; AValue: Integer; const AFilterColor: String);
 
Public procedure EffectEnrichShadow (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectHighKey (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectHighlightShadow (AImage: TImageItem; AShadows, AMids, AHighlights, AWhites, ABlacks: Integer);
 
Public procedure EffectSpotHealing (AImage: TImageItem; APath: TidPath);
 
Public procedure EffectRedEye (AImage: TImageItem; AMarkers: TidElement);
 
Public procedure EffectRecipe (AImage: TImageItem; ARecipe: TRecipe);
 
Public procedure EffectFlattenRecipe (AImage: TImageItem; ARecipe: TRecipe);
 
Public procedure EffectReplaceRecipe (AImage: TImageItem; ARecipe: TRecipe);
 
Public procedure EffectApplyAreas (AImage: TImageItem; AAreaColor: TvxColor = $FFFFFFFF; AWithText: Boolean = True);
 
Public procedure EffectWhiteBalance (AImage: TImageItem; ATemperature, ATint: Integer; AWhitePointTemp: Integer = 5504);
 
Public procedure EffectWhitePoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
 
Public procedure EffectGrayPoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
 
Public procedure EffectBlackPoint (AImage: TImageItem; ARed, AGreen, ABlue: Byte);
 
Public procedure EffectGlamour (AImage: TImageItem; AValue: Integer; ASoftFocus: Integer = 0; ASaturation: Integer = 0; AMaskValue: Integer = 255);
 
Public procedure EffectEnhContrast (AImage: TImageItem);
 
Public procedure EffectRotate (AImage: TImageItem; AValue: Single; ALossless: Boolean = False; const ABackColor: String = vcWhite; ACrop: Boolean = False);
 
Public procedure EffectQuickRotate (AImage: TImageItem; ADegrees: Single; ALossless: Boolean = False);
 
Public procedure EffectFlip (AImage: TImageItem; AHorizontal, AVertical: Boolean);
 
Public procedure EffectCrop (AImage: TImageItem; ARelativeRect: TvxRect; ACropAngle: Single = 0);
 
Public procedure EffectResize (AImage: TImageItem; ASettings: TResizeSettings);
 
Public procedure EffectResizeRelative (AImage: TImageItem; AWidthFactor, AHeightFactor: Double; ASettings: TResizeSettings);
 
Public function EffectCanvasSize (AImage: TImageItem; AWidth, AHeight: Integer; const ABackColor: String = vcWhite; APosition: TWindDirection = wdCenter; ACropToFit: Boolean = False; AStretchToFit: Boolean = False; AProportional: Boolean = False): TRect;
 
Public function EffectCanvasSizeRelative (AImage: TImageItem; AWidthFactor, AHeightFactor: Double; const ABackColor: String = vcWhite; APosition: TWindDirection = wdCenter; ACropToFit: Boolean = False; AStretchToFit: Boolean = False; AProportional: Boolean = False): TRect;
 
Public procedure EffectBlend (AImage: TImageItem; ABlendImage: TGraphic; ABlendMode: TvxBlendMode; AOpacity: Integer = 255);
 
Public procedure EffectSharpen (AImage: TImageItem; AFactor: Integer = 0);
 
Public procedure EffectDynamicSharpen (AImage: TImageItem; AFactor: Integer = 0);
 
Public procedure EffectAdvancedSharpen (AImage: TImageItem; AFactor: Integer = 30);
 
Public procedure EffectSmooth (AImage: TImageItem; AFactor: Integer = 20);
 
Public procedure EffectGaussianBlur (AImage: TImageItem; ARadius: Double = 2; AHorizontal: Boolean = True; AVertical: Boolean = True);
 
Public procedure EffectGray (AImage: TImageItem; AValue: Integer = 0);
 
Public procedure EffectBW (AImage: TImageItem; AFilterPerc: Integer = 0; AFilterColor: TvxGrayFilter = gfOrange; AGrayValue: Integer = 0; AFilmGrainPerc: Integer = 0);
 
Public procedure EffectMono (AImage: TImageItem; ADithered: Boolean = False);
 
Public procedure EffectSepia (AImage: TImageItem; AContrastPercent: Integer = 0; ATemperature: Integer = 7000);
 
Public procedure EffectAlphaChannelRemoval (AImage: TImageItem; const AColor: String = vcBlack);
 
Public procedure EffectDuotone (AImage: TImageItem; AColors: TAutoLevelColorValues);
 
Public procedure EffectColorCorrection (AImage: TImageItem; AColors: TAutoLevelColorValues);
 
Public procedure EffectColorFilter (AImage: TImageItem; ALevel: Byte; const AFilterColor: String; AMono: Boolean = False; APSMode: Boolean = True);
 
Public procedure EffectICSColors (AImage: TImageItem; AICSSettings: TICSSettings; var ASourceProfile: WideString; var ATargetProfile: WideString; var AProofProfile: WideString; AReversed: Boolean; var AIsEmbeddedProfile: Boolean);
 
Public procedure EffectFrame (AImage: TImageItem; AFrameDesign: TFrameDesign; AOptions: TOptions = nil);
 
Public procedure EffectCaption (AImage: TImageItem; ACaption: TImageCaption; AOptions: TOptions = nil);
 
Public procedure EffectCaptions (AImage: TImageItem; ACaptions: TImageCaptions; AOptions: TOptions = nil; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
 
Public procedure EffectDrawAreas (AImage: TImageItem; AAreas: TCatalogAreas; ADrawAreas: TDrawAreaParts);
 
Public procedure EffectTitle (AImage: TImageItem; ATitle: TImageTitle; AOptions: TOptions = nil; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
 
Public procedure EffectWatermarks (AImage: TImageItem; AWatermarks: TImageWatermarks);
 
Public procedure EffectDrawGraphic (AImage: TImageItem; AGraphic: TGraphic; ADrawStyle: TvxDrawStyle; AOpacity: Byte = 255);
 
Public procedure EffectAddNoise (AImage: TImageItem; AValue: Byte);
 
Public procedure EffectFilmGrain (AImage: TImageItem; AValue: Byte);
 
Public procedure EffectSoftFocus (AImage: TImageItem; AValue: Byte);
 
Public procedure EffectCropToRatio (AImage: TImageItem; AXFactor, AYFactor: Real; DoDynamic: Boolean = True);
 
Public procedure EffectSaturate (AImage: TImageItem; AValue: Integer = 1);
 
Public procedure EffectClarity (AImage: TImageItem; AValue: Integer = 0);
 
Public procedure EffectExposure (AImage: TImageItem; AValue: Integer = 0; ABrightness: Integer = 0);
 
Public procedure EffectHue (AImage: TImageItem; AValue: Integer = 0);
 
Public procedure EffectHueShift (AImage: TImageItem; AValue: Integer = 0);
 
Public procedure EffectHSL (AImage: TImageItem; AHueDelta, ASatDelta, ALumDelta: Integer);
 
Public procedure EffectAutoFix (AImage: TImageItem);
 
Public procedure EffectEmboss (AImage: TImageItem);
 
Public procedure EffectPolarize (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectPolarizeAdv (AImage: TImageItem; AValue: Integer);
 
Public procedure EffectNegative (AImage: TImageItem);
 
Public procedure EffectAutoLevels (AImage: TImageItem; AValue: Integer; AColors: TAutoLevelColorValues);
 
Public procedure EffectDynamicRange (AImage: TImageItem; ALightBmp, ADarkBmp: TvxBitmap; AMaskValue: Integer; ABlurValue: Double = 4; AReversed: Boolean = False);
 
Public procedure EffectDynamicRangeQuick (AImage: TImageItem; ALevel: Integer);
 
Public procedure EffectMask (AImage: TImageItem; AGrayClipPoint: Byte);
 
Public procedure CommandRename (AImage: TImageItem; ASettings: TRenameSettings; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
 
Public procedure CommandRedate (AImage: TImageItem; ASettings: TRedateSettings; var ACumulation: TDateTimeEditTypeArray);
 
Public procedure CommandStack (AImage: TImageItem; const AGroupGUID: String);
 
Public procedure CommandUnstack (AImage: TImageItem);
 
Public procedure CommandDetectFaces (AImage: TImageItem);
 
Public procedure CommandDetectObjects (AImage: TImageItem);
 
Public procedure CommandAIOpenAI_Metadata (AImage: TImageItem; const AContext: WideString; const AResultHandling: TOpenAIResultHandling; const AAutoProcess: Boolean);
 
Public procedure CommandAIVision_DetectLabels (AImage: TImageItem; AAssignLabels: TAIAssignLabels);
 
Public procedure CommandAIVision_DetectFaces (AImage: TImageItem);
 
Public procedure CommandAIVision_DetectObjects (AImage: TImageItem);
 
Public procedure CommandAIVision_DetectLandmarks(AImage: TImageItem);
 
Public procedure CommandAIVision_DetectTexts (AImage: TImageItem);
 
Public procedure CommandGEOTag (AImage: TImageItem; ASettings: TidElement);
 
Public procedure CommandGEOGPXTag (AImage: TImageItem; const AGPXFileName: WideString; const ADelta: TGPSDeltaTime);
 
Public procedure CommandGEOForwardLookup (AImage: TImageItem; const ALocation: WideString);
 
Public procedure CommandGEOReverseLookup (AImage: TImageItem);
 
Public procedure CommandGEOLookupAltitude (AImage: TImageItem);
 
Public procedure CommandGEORemove (AImage: TImageItem);
 
Public procedure CommandConvert (AImage: TImageItem; ASaveSettings: TSaveSettings);
 
Public procedure CommandProperties (AImage: TImageItem; AProperties: TImageDetail; ATargetXMP: TObject = nil; AOnlyFilled: Boolean = False; OnlyFilledIPTC: Boolean = True; AResult: TxomStrings = nil; AMigrateKeywords: Boolean = True; AUserCache: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil; ACustomValues: TMacroValues = nil; const AFilenameToPreserve: WideString = ''; AAllowTechnical: Boolean = True);
 
Public procedure CommandImportXMP (AImage: TImageItem; AXMPFileName: WideString; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
 
Public procedure CommandExportXMP (AImage: TImageItem; ASettings: TRenameSettings; AUserVars: TxomStrings = nil; ACustoms: TCustomScriptObjects = nil);
 
Public procedure CommandConvertMetaToXMP (AImage: TImageItem);
 
Public procedure CommandRemoveExif (AImage: TImageItem);
 
Public procedure CommandUpdateExifThumb (AImage: TImageItem);
 
Public procedure CommandSave (AImage: TImageItem; ASaveSettings: TSaveSettings);
 
Public procedure CommandLoad (AImage: TImageItem; const AFileName: WideString; AFastRAWLoad: Boolean = False; AExifOriented: Boolean = True);
 
Public procedure CommandScript (AImage: TImageItem; const AFileName: WideString; const AParameters: WideString = '');
 
Public procedure AddUndoGraphic (AGraphic: TGraphic; const AUndoLabel: WideString);
 

Properties

Public property UseUndo: Boolean read FUseUndo write FUseUndo;
 
Public property CanUndo: Boolean read GetCanUndo;
 
Public property CanRedo: Boolean read GetCanRedo;
 
Public property UndoHint: WideString read GetUndoHint;
 
Public property RedoHint: WideString read GetRedoHint;
 
Public property Catalog: TCatalog read GetCatalog;
 
Public property CatalogAgnostic: Boolean read FCatalogAgnostic write FCatalogAgnostic;
 
Public property Model: TImageModel read FModel write FModel;
 
Public property Options: TOptions read GetOptions;
 
Public property UndoCollection: TImageCollection read FUndoCollection;
 
Public property UndoLevel: Integer read FUndoLevel;
 
Published property CreateUndoThumbs: Boolean read FCreateUndoThumbs write FCreateUndoThumbs;
 
Published property OnProgress : TvxProgressEvent read FOnProgress write FOnProgress;
 
Published property OnAfterSave : TNotifyEvent read FOnAfterSave write FOnAfterSave;
 
Published property OnAfterEffect : TNotifyEvent read FOnAfterEffect write FOnAfterEffect;
 

Generated by PasDoc 0.15.0.