hallo, hab folgendes von delphi hilfen.
Delphi-Quellcode:
procedure TForm1.ChangeColor(Sender: TObject);
begin
{ randomly change the color of the form }
Color := Random($FFFF);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
{ allocate memory for the Action property }
Action := TBasicAction.Create(Self);
{ set the OnExecute event handler }
Action.OnExecute := ChangeColor;
{ initialize the random number generator }
Randomize;
end;
ersten hier wird ChangeColor durch OnClick ausgeloest, OnClick sei default event, kann man diese default event auch OnMouseUp sein oder geht es nicht?
2. Frage ist die Aktion Eigentschaft, wie kann ich diese Eigenschaft in Objektinspektor setzen bzw aendern?