brauche bishen hilfe damit die zeit im Edit runter leuft

[Luckie]

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
    StartTime: Cardinal;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Dec(StartTime);
  Edit1.Text := IntToStr(StartTime);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  StartTime := 20;
  Timer1.Interval := 6000;
end;

Und könntest du uns allen mal einen Gefallen tun und etwas mehr auf deine Rechtschreibung achten? das ist ja absolut grausam, was du da fabrizierst.