Windows XP beenden

[jfheins]

[NST] (NST = New SubTopic )
Ich weis zwar nicht, was du meinst, aber das muss natürlich so sein:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  dec (Time);
  Label1.Caption := IntToStr (Time);
  if (Time = 0) then
  begin
    Timer1.Enabled := FALSE;
    WasMachen;
  end;
end;

Time ist eine globale Integervariable ...
Man beachte das IntToStr () ...
[/NST]