Einzelnen Beitrag anzeigen

CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Button erstellen und Funktion zuweisen....

  Alt 11. Sep 2003, 17:01
Hi,
doch. In dem du die Eigenschaft "Name" des Buttons festlegst und dann schreibst:
Delphi-Quellcode:
procedure TfrmMain.NewButtonClick(Sender: TObject);
begin
  if (Sender as TButton).Text = 'NewButtonthen
    // tu was
  else if (Sender as TButton).Text = 'AndererButtonthen
    // tu was anderes
end;
Chris
  Mit Zitat antworten Zitat