ein kleines simples grafikprogramm funktioniert nicht

[1.willi]

Hallo liebe Community,

ich hatte mir aus eurer Beispiel Thread mal folgendes Programm ausgeschrieben, und wollte es zum laufen bringen.

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  vx, vy: integer;

implementation

{$R *.DFM}


procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
  vx := -10 + Random(20);
  vy := -10 + Random(20);
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Image1.Left := Image1.Left + vx;
  Image1.Top  := Image1.Top + vy;
  if (Image1.Left > ClientWidth - Image1.Width - 1) or (Image1.Left < 1) then
    vx := vx * -1;
  if (Image1.Top > ClientHeight - Image1.Height - 1) or (Image1.Top < 1) then
    vy := vy * -1;
end;

end.

Leider bekomme ich immer folgende Fehlermeldung:

Die Methode FormCreate initialisiert das Dialogfeld beim ersten Erstellen.

procedure FormCreate(Sender: TObject);

Beschreibung

In Anwendungen sollte FormCreate nicht aufgerufen werden. FormCreate initialisiert das Detailfenster, damit die Schaltfläche Details korrekt arbeitet.

Weiss einer von euch was ich da falsch mache?
Liebe Grüsse Willi

P.S. ich benutze Delphi 4 Professional, unter Windoes XP

[edit=Luckie]Delphi-Tags gesetzt. Beim nächsten mal bitte selber machen. Mfg, Luckie[/edit]

[Luckie]

Du hast zwei Methoden implementiert, aber sie tauchen in deiner Klassendeklaration von TForm1 nicht auf.

[guinnes]

Auch das Image1 fehlt