Thema: Delphi Timer mit delay

Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Timer mit delay

  Alt 14. Mai 2006, 15:26
Ganz einfach so:

Delphi-Quellcode:
var
  Form1: TForm1;
  CounterVar: Integer = 0; // <= wichtig, initialisieren!

implementation

{$R *.DFM} 

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Inc(CounterVar);

  // dein normaler Code

  if CounterVar = 2) then
  begin
    // dein verzögerter Code
    CounterVar := 0;
  end;
end;
  Mit Zitat antworten Zitat