Einzelnen Beitrag anzeigen

Gerkey

Registriert seit: 18. Okt 2016
Ort: Bad Kreuznach
55 Beiträge
 
Delphi XE Professional
 
#1

Laufzeit: Erzeugung von Komponenten

  Alt 18. Nov 2016, 10:45
Delphi-Version: XE
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

Geändert von mkinzler (18. Nov 2016 um 12:09 Uhr) Grund: Delphi-Tag eingefügt
  Mit Zitat antworten Zitat