FormKeyDown Problem

[hanfy]

Also ich bin nicht wirklcih gut in delphi aber das sag ja mal jedr de neu anfängt und zwar verstehe ich ncith wieso ich formkeydown nicht verwenden kann

ich habe meine programm so getestet das ich das bild mit 4 buttons steuern kann das geht wunderbar nur halt nicht mit dem befehl keydown
ich habe dieses KeyPreview auf True

und das ist meine fehler meldung:

Code:

Build
  [Error] Unit1.pas(53): Undeclared identifier: 'FormKeyDown'
  [Error] Unit1.pas(53): ';' expected but '(' found
  [Error] Unit1.pas(53): ';' expected but ')' found
  [Error] Unit1.pas(56): Undeclared identifier: 'Image1'
  [Error] Unit1.pas(56): Missing operator or semicolon
  [Error] Unit1.pas(57): Missing operator or semicolon
  [Error] Unit1.pas(60): ';' expected but '.' found
  [Error] Unit1.pas(62): Declaration expected but end of file found
  [Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

hier mal mein quelltext:

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, jpeg;

type
  TForm1 = class(TForm)
    Image1: TImage;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Button4: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Top := Image1.Top -5
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Image1.Left := Image1.Left +5
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Image1.Left := Image1.Left -5
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
Image1.Top := Image1.Top +5
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key : Char);
begin
if key=#87 then
Image1.Top := Image1.Top -5
begin

end;
end.

MFG Hanfy