| Class TFormMaskProp (unit propintf) |
TForm
| Constructors |
constructor Create(AOwner: TComponent);############################################################ TFormMaskProp ###
| Functions |
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure fImageClick(Sender: TObject);
procedure fImageMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
procedure Panel4Resize(Sender: TObject);
destructor Destroy;
procedure SetMaskedPicture(Value: TMaskedPicture);
procedure SetMskColor(Value:TColor);
procedure SetMskPicture(Value:TBitmap);| Properties |
property EditorMaskedPicture : TMaskedPicture| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
FImage : TImage;
LB_Cursor : TLabel;
LB_Sel : TLabel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
FMaskColor : TColor;
FMaskedPicture : TMaskedPicture;
FPicture : TBitmap;
PicDialog : TOpenDialog;| Constructors |
constructor Create(AOwner: TComponent);Public-Deklarationen
############################################################ TFormMaskProp ###
| Functions |
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure fImageClick(Sender: TObject);
procedure fImageMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
procedure Panel4Resize(Sender: TObject);
destructor Destroy;
procedure SetMaskedPicture(Value: TMaskedPicture);
procedure SetMskColor(Value:TColor);
procedure SetMskPicture(Value:TBitmap);| Properties |
property EditorMaskedPicture : TMaskedPicture| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
FImage : TImage;
LB_Cursor : TLabel;
LB_Sel : TLabel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
FMaskColor : TColor;
FMaskedPicture : TMaskedPicture;
FPicture : TBitmap;
PicDialog : TOpenDialog;