Habe aus dem Handbuch Borland Delphi 7 (Doberenz und Gewinnus) nachstehenden Beispiel-Code von Seite 314 übernommen (nur geringfügig modifiziert) :
Delphi-Quellcode:
var
M: TM;
edField : Tedit;
implementation {$R *.dfm}
procedure TM.Button1Click(Sender: TObject);
begin
if TEdit(FindComponent('eSpNr')) = nil then
begin
edField := TEdit.Create(self);
edField.Parent := Self;
edField.Name := 'eSpNr';
edField.SetBounds(50,100,50,25);
edField.OnClick := EditClick;
end;
end;
Bei der Ausführung erscheint die Fehlermeldung: undeklarierter Bezeichner “EditClick”.
Ohne das Statement EdField.OnClick klappt’s.
Was mache ich falsch ?
Gerkey