AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Ersatz für "repeat...until.." gesucht?

Offene Frage von "htxmlx"
Ein Thema von htxmlx · begonnen am 16. Dez 2008 · letzter Beitrag vom 16. Dez 2008
Antwort Antwort
htxmlx

Registriert seit: 23. Aug 2008
124 Beiträge
 
Delphi 7 Enterprise
 
#1

Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:11
Hallo,
ich suche nach einem Befehl der eine Procedure sagen wir herauszögert unzwar bis etwas geschehen ist.
Also so etwas wie repeat until..nur das bei mir das was passieren soll durch andere proceduren ausgelöst wird, somit kann ich repeat until net mehr benutzen, es soll solange gewartet werden bis eine boolean-variable auf false gesetzt wird, dieser geschieht aber in einer anderen procedure..geht sowas??
Während der verzögerung sollen andere proceduren natürich ausgeführt werden können...

Gruß htxmlx
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#2

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:14
Delphi-Quellcode:
repeat
Sleep(50);
Application.ProcessMessages;
until MyBoolVar;
*den leichten kalten Schauer auf dem Rücken ignorier ...*
  Mit Zitat antworten Zitat
htxmlx

Registriert seit: 23. Aug 2008
124 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:15
THX ich versuchs mal...
  Mit Zitat antworten Zitat
htxmlx

Registriert seit: 23. Aug 2008
124 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:43
Mhh..ich muss es dann ncoh hinbekommen das 2 proceduren darauf warten bis die repeat abfrage fertig ist und dann erst weiterlaufen, geht das auch? Das ich die praktisch von Application.ProcessMessages; ausschließe ?

Gruß, htxmlx
  Mit Zitat antworten Zitat
Benutzerbild von Meflin
Meflin

Registriert seit: 21. Aug 2003
4.856 Beiträge
 
#5

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:44
Füge den obigen Block einfach in alle Prozeduren ein die warten sollen

Und dann überdenke einfach nochmal dein Programmdesign
  Mit Zitat antworten Zitat
htxmlx

Registriert seit: 23. Aug 2008
124 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:46
das hab ich mir auch geadacht aber es scheint nicht zu funktionieren, die laufen einfach weiter, auch wenns drinsteht...

Gruß, htxmlx
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#7

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 18:54
Kann es sein, dass die Bedingung im until erfüllt ist?

Oder dass die gleiche Funktion mehrmals ineinander aufgerufen wird?
  Mit Zitat antworten Zitat
htxmlx

Registriert seit: 23. Aug 2008
124 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 19:08
Jo danke jetzt funktionierts...

Gruß, htxmlx
  Mit Zitat antworten Zitat
Cyf

Registriert seit: 30. Mai 2008
407 Beiträge
 
Lazarus
 
#9

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 22:07
Threads...
  Mit Zitat antworten Zitat
Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#10

Re: Ersatz für "repeat...until.." gesucht?

  Alt 16. Dez 2008, 22:20
Zitat von Cyf:
Threads...
Japp.
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:07 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz