Registriert seit: 18. Apr 2003
1.037 Beiträge
|
Re: dynamischen Panels Ereignisse zuordnen
27. Mär 2005, 13:21
OnClick erfordert eine Prozedur vom Typ TNotifyEvent:
type TNotifyEvent = procedure (Sender: TObject) of object;
Deine zuweisen-Prozedur muss also so aussehen:
Delphi-Quellcode:
TForm1 = class(TForm)
procedure zuweisen(Sender: TObject);
procedure FormCreate(Sender: TObject);
[...]
procedure TForm1.zuweisen(Sender: TObject);
begin
ShowMessage(TPanel(Sender).Name); // So kommst du außerdem an den Namen des auslösenden
// Panels. Mit TPanel(Sender) kannst du auf die Eigen-
// schaften davon zugreifen. Du könnest zum Beispiel im
// Tag des Panels eine ID speichern, etc.
end;
Gruß, Moritz
"Optimistisch ist diejenige Weltanschauung, die das Sein höher als das Nichts stellt und so die Welt und das Leben als etwas an sich Wertvolles bejaht."
Albert Schweitzer
|