Probleme beim Stoppuhr minispiel

[Christof_S]

hallo,
ich wollte ein kleines minispiel mit einer stoppuhr programmieren. dabei soll man die zeit schätzen. mittels button startet man einem time und wenn man glaubt das 10 sekunden vergangen sind drückt man stopp. dann wird der vorher verdeckte timer sichtbar und man sieht wie nah man dran war. hier unten seht ihr meinem quelltext.


Meine konkreten fragen: Wie mache ich das das das label welches die zeit anzeigt wieder angezeigt wird wenn ich auf stop drücke

wie mache ich es wenn man die zeit genau auf 10 sek. geschätzt hat das ein label mit zb "gewonnen erscheint".

Delphi-Quellcode:

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Image1: TImage;
    Timer: TTimer;
    Button2: TButton;
    Label3: TLabel;
    Label1: TLabel;
    procedure TimerTimer(Sender: TObject);
  
    procedure Button2Click(Sender: TObject);


      private

    StartZeit: TDateTime;
    StopZeit:  TDateTime;

    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}





  
procedure TForm1.Button2Click(Sender: TObject);
begin
  case Button2.Tag of
    0: begin { wenn die Uhr gestartet wird }
      StartZeit := now;
      Timer.Enabled := true;
      Button2.Caption := '&Stop';
    end; { Ende des Zweigs beim Start der Uhr }
    1: begin { wenn die Uhr angehalten wird }
      StopZeit := now;
      Timer.Enabled := false;
      Button2.Caption := '&Start';
      Label3.Caption := TimeToStr( StopZeit - StartZeit);
    end; { Ende des Zweiges bei anhalten der Uhr }
  end; { Ende der CASE-Anweisung }
  { nun den tag umstellen }
  Button2.Tag := Button2.Tag + 1;
  if Button2.Tag > 1 then Button2.Tag := 0;
end;

procedure TForm1.TimerTimer(Sender: TObject);
begin
Label3.Caption := TimeToStr(now - StartZeit);

end;

end.

vll könnt ihr mir ein wenig helfen danke im vorraus.

hier nochmal falsl ihr das ganze prog sehen wollt : http://rapidshare.de/files/46719784/...r__3_.rar.html