Per Quelltext Sender und Key übergeben -> Fehler

[Jens Schumann]

Hallo,
himitsu hat recht. Evt hat er es vielleicht etwas verschlüsselt ausgedrückt.
procedure TForm1.AuftragArtikel(Sender: TObject; var Key: Char); Das Parameter Key ist ein VAR-Parameter. Da kann man keine Konstante übergeben.
So geht es:

Delphi-Quellcode:

var
  aChar : Char
begin
  aChar:=#13;
  Form1.AuftragArtikel(TEdit(Form1.FindComponent('NewEditAuftragArtNr_' + inttostr(i))), aChar);
end;