Einfrieren von Form verhindern

[Janek76]

Hallo,

ich habe eine Frage: Ich habe ein kleines Programm geschrieben, das Daten in eine Datenbank importiert. Abhängig von der Menge der Daten, kann das bis zu 3 Stunden und länger dauern. Sobald die Verarbeitung beginnt und ein anderes Fenster den Focus bekommen hatte, "friert" das Programm ein oder der Fortschrittsbalken läuft nicht weiter. D.h. das Fenster ist entweder weiß oder zeigt den Inhalt des vorher darübergelgten Fensters an. Bis die Verarbeitung durchgelaufen ist, dann ist alles wieder normal. Kann man das irgendwie verhindern?

[Thorben86]

Such mal in der Code-Lib nach der procedure "delay", damit nimmt dein Programm weiterhin aktionen war und führt diese aus.

[jfheins]

Du musst ab und zu (vll. alle 200 Einträge) ein Application.Processmessages aufgufen ;)

Mit Delay wird aber das Programm unterbrochen und kann nicht arbeiten ... und ein Delay(0) kämen auf ein Application.Processmessages raus :zwinker:

[Luckie]

Threads sind hier wohl wesentlich sinnvoller.

[Janek76]

Vielen Dank für die Antworten. In Zukunft werde ich dann wohl mit Threads arbeiten.

Eines funktioniert allerding nicht: ich habe "Application.ProcessMessages" in die Schleife eingebaut, aber dadurch hat sich nichts geändert.

[markusj]

Dann reagiert deine Anwendung auf Klicks etc. und zeigt andere Reaktionen,
aber weiterarbeiten im herkömmlichen Sinne kannst du mit ihr nicht, dazu brauchst du Threads.

mfG

Markus

EDIT: Mit denen schlage ich mich übrigens gerade auch rum ... TThread ist fast Idiotensicher^^

[Aenogym]

Zitat:

Zitat von Janek76

Vielen Dank für die Antworten. In Zukunft werde ich dann wohl mit Threads arbeiten.

Eines funktioniert allerding nicht: ich habe "Application.ProcessMessages" in die Schleife eingebaut, aber dadurch hat sich nichts geändert.

:shock: sehr ungewöhnlich.
wenn das aufgerufen wird, verarbeitet dein programm wieder alle anstehenden messages (zB. zeichnet es sich neu). zeig doch mal ein stück code.

aeno

[toyoman]

um zu verhindern dass das Form einfriert (Anzeige wird nicht aktualisiert) kannst du auch einen form1.refresh oder einen form1.update in die schlaufe einbauen....

damit wird das form zwischendurch wieder repainted.

[Muetze1]

@letzte beiden Poster: wenn es ein Befehl der DB ist, welcher nicht zurückkommt bzw. nicht vor Ende zurückkehrt, dann nützen eure Vorschläge nix - und dann ist auch das ausbleibende Verhalten durch eure Vorschläge verständlich...

[Janek76]

Ich habe jetzt Refresh bei Erneuerung des Fortschrittbalkens und über einen Timer eingesetzt und beim Timer außerdem ProcessMessages eingefügt.

Innerhalb der Delphi-IDE funktioniert es, bis auf, daß das Programm nicht auf Usereingaben reagiert. Wenn ich das X zum Schließen des Fensters anklicke, passiert nichts. Erst am Ende der Aktion wird das Fenster dann geschlossen.

Starte ich die EXE-Datei reagiert das Programm allerdings korrekt auf User-Eingaben. Das hatte ich vorhin also wohl falsch getestet. Allerdings schaffe ich es immer wieder, indem ich z.B. dem Internetexplorer den Focus gebe, daß das Anwendungsfenster weiß wird und dann auch bleibt. Das funktioniert also noch nicht.

Schreibe ich Form1.Refresh erhalte ich eine Zugriffsverletzung. Akzeptiert wird nur Refresh.