Einzelnen Beitrag anzeigen

Benutzerbild von Stony2k
Stony2k

Registriert seit: 21. Mai 2005
Ort: Moers
76 Beiträge
 
Delphi 7 Enterprise
 
#1

Undefinierter Bezeichner: 'Sender'

  Alt 26. Jun 2005, 12:08
Ich habe eine Prozedur
Delphi-Quellcode:
procedure Tfrm_main.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if Button = mbLeft then
  begin
    sendText(befehle[1].befehl);
    image1.Picture:=img_btn_gedrueckt.Picture;
    Label1.Top:=Label1.Top+2;
    Label1.Left:=Label1.Left-1;
  end;
end;
und diese möchte ich nun über eine andere Prozedur aufrufen:
Delphi-Quellcode:
procedure Tfrm_main.WMHotKey(var Msg: TWMHotKey);
begin
  if Msg.HotKey = id1 then
    Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
.
.
.
Leider bekomme ich nur Fehlermeldungen:
Delphi-Quellcode:
[Fehler] Unit_main.pas(323): Undefinierter Bezeichner: 'Sender'
[Fehler] Unit_main.pas(323): Anweisung erforderlich, aber Ausdruck vom Typ 'Class reference' gefunden
[Fehler] Unit_main.pas(323): '(' erwartet, aber ';' gefunden
[Fehler] Unit_main.pas(323): '(' erwartet, aber ';' gefunden
[Fehler] Unit_main.pas(324): ';' erwartet, aber 'IF' gefunden
[Fehler] Unit_main.pas(362): '.' erwartet, aber ';' gefunden
[Fataler Fehler] Befehlstool.dpr(9): Verwendete Unit 'Unit_main.pas' kann nicht compiliert werden
Da scheint wohl was an der parametern nicht zu stimmen.
Weiss hier vielleicht wer Rat ?
  Mit Zitat antworten Zitat