Einzelnen Beitrag anzeigen

rebugger

Registriert seit: 29. Okt 2002
Ort: Auerbach
190 Beiträge
 
Delphi 7 Professional
 
#6

Re: procedure läuft, und ide buttons sind "tot"

  Alt 24. Mär 2004, 18:45
Timer-Beispiel:
1. Setz nen Timer auf die Form.
2. Intervall wird in Millisekunden angegeben.
3. Active auf False setzen
4. onTimer-Event:
Delphi-Quellcode:
begin
  if Gauge1.Position = 100 then
    Timer1.Enabled := False
  else
  begin
    Gauge1.Position := Gauge1.Position + 1; //War doch Position, oder ??? Oder wars Value ?
  end;
end;
5. einen Button setzen, in dessen onClick-Event du schreibst:
Timer1.Enabled := True;

Thats it !
  Mit Zitat antworten Zitat