Einzelnen Beitrag anzeigen

egarF

Registriert seit: 20. Jan 2005
Ort: Stuttgart
21 Beiträge
 
#32

Re: Dartspiel programmieren mit Delphi

  Alt 21. Jan 2005, 21:39
Ich hab das jetzt so gelöst :

Delphi-Quellcode:
procedure TForm1.Starten1Click(Sender: TObject);
 begin
if progressbar1.Position=100 then
    progressbar1.step:=-10
  else if progressbar1.Position=0 then
    progressbar1.step:=10;
  progressbar1.Stepit;



end;


procedure TForm1.Starten2Click(Sender: TObject);
begin

  if progressbar2.Position=100 then
    progressbar2.step:=-10
  else if progressbar1.Position=0 then
    progressbar2.step:=10;
  progressbar2.Stepit;

end;
Das heißt Starten1 ist für die 1. progressbar und Starten2 für die 2.Progressbar.

Jetzt wollte ich das so machen, das ich halt auf diesen Button klicke, die Progressbar dann automatisch anfängt durchzulaufen, ohne das ich immer weiterdraufklicke...
aber das geht irgendwie nicht...

muss ich das mit der timer funktion machen? wenn ja wie?

PS: danke für deine bemühungen, das find ich echt super, dass es noch leute gibt die anderen echt mal helfen wollen und sich dafür zeit nehmen!
  Mit Zitat antworten Zitat