title image


Smiley eigentlich ganz einfach ...
... wenn man es richtig macht.

Schau dir ein Delphi-Programm einmal genauer an, und vergiß die Delphi-Hilfe nicht!

type

TForm1 = class(TForm)

procedure MyButtonClick(Sender: TObject);

public

{ Public-Deklarationen }

end;

end;



implementation

Hier die Definition der Methode:

{$R *.DFM}



procedure TForm1.MyButtonClick(Sender: TObject);

begin

Â…

end;



procedure TForm1.Button1Click(Sender: TObject);

begin

but := TButton.Create(self);

but.Parent := self;

but.Caption := 'HALT';

but.SetBounds(300, 200, 50, 60);

but.OnClick:=MyButtonClick(Sender:TObject); Hier die Onklick Anweisung!

end;

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: