Thema: Delphi Programm geht nicht

Einzelnen Beitrag anzeigen

AETas

Registriert seit: 21. Jan 2007
Ort: berlin
3 Beiträge
 
#1

Programm geht nicht

  Alt 22. Jan 2007, 21:18
habe ein problem mit nem selbst geschriebenem programm!
es soll (-te) ein wettrenn spiel werden! es gibt 2 ProgressBar, einen "spielt" man selbst und den anderen der computer.
beide funktionieren unabhängig voneinander, aber nicht zusammen!
kann mir jemaand helfen?
vielen dank im vorraus!

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
 while ProgressBar2.Position < 100 do
  begin
   sleep(500);
   ProgressBar2.Position:=ProgressBar2.Position+1;
  end;
 ProgressBar1.position:=ProgressBar1.Position+1;
end;
Es gibt keine hässlichen Frauen! Nur zu wenig Wodka!

"Großes Thema: Brauchen deutsche Schüler eine Schuluniform? Viele Schüler sagen: Uniform ist super! Und welche Waffe dazu?"
  Mit Zitat antworten Zitat