Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: schleife unterbrechech und fortsetzen?

    Delphi
    by tomsel, 4. Jan 2006
  Ja nee, iss klar. Wenn du in der inneren Schleife Tick neu initialisierst, sollte es gehen. GetTickCount repräsentiert ja in gewissem Sinne die Systemuhr, und die läuft natürlich ständig weiter.
  
  while a <> 0 do begin
  Application.ProcessMessages;
  a:=strtoint(edit4.text);
  Tick := GetTickCount + DWord(Millisec);
  end;
• Forum: Sonstige Fragen zu Delphi

  Re: schleife unterbrechech und fortsetzen?

    Delphi
    by tomsel, 4. Jan 2006
  if a=0 then
  repeat Application.ProcessMessages; until begin
  a:=strtoint(edit4.text); a<>0 end;
  
  Nee, jetzt hakt's.
  
  Guckst du hier:
  
  procedure delay(MILLISEC:integer;edit2,edit3,edit4:tedit);
  var
• Forum: Sonstige Fragen zu Delphi

  Re: schleife unterbrechech und fortsetzen?

    Delphi
    by tomsel, 4. Jan 2006
  Du willst das Delay in Abhängigkeit von der Eingabe in Edit4 quasi "aussetzen" oder weiterlaufen lassen, ist das richtig? Dann prüfe die "Anhalte"-Bedingung doch in einer inneren Schleife, in der ein Application.ProcessMessages jedoch nicht fehlen sollte.
  
  -----
  
  O.K. - zu spät...