Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Prozedur unabhängig starten (https://www.delphipraxis.net/10130-prozedur-unabhaengig-starten.html)

daniel-volk 12. Okt 2003 10:48


Prozedur unabhängig starten
 
Hi,

ist stelle jetzt eine Frage, deren Antowrt wahrscheinlich nicht so ausfallen wird, wie ich es wünsche:

Ist es möglich, dass ich Delphi sage, dass es eine bestimmte Prozedur so ausführen soll, dass dabei das Programm nicht hängt? Ich hab eine sehr lange Routine, bei der eine Datei verschlüsselt wird. Dieses besteht alles aus einem recht umfangreichen Gebilde an Prozeduren. Das ist auch der Grund dafür, dass ich keinen Thread verwenden will. Außerdem kann ich in einem Thred Funktionen wie "ShowMessage()" nicht verwenden.

Also ich Klartext: Das Prog soll die Haupt- und Unterprozedur ganz normal abarbeiten wie sonst, aber es soll dennoch ein offenes Ohr für andere Gegebenheiten haben!
Es wäre auch schön, wenn es möglich wäre, dass ich einen Button "Abbrechen" einbauen könnte, der dann einfach die besagte Prozedur killen würde!

MfG,
Daniel.

Daniel B 12. Okt 2003 10:52

Re: Prozedur unabhängig starten
 
Hi,

da Du keinen Thread haben willst, wie wäre es mit einer "unmenge" an App.Processmessages? An den richtigen Stellen und in Menge müsstest Du sehr wohl noch auf Buttons usw. reagieren können. ;)

Duffy 12. Okt 2003 10:53

Re: Prozedur unabhängig starten
 
Hallo daniel-volk,
schau Dir mal "Application.ProcessMessages" an
bye

APP 12. Okt 2003 11:40

Re: Prozedur unabhängig starten
 
Hallo Daniel Volk,
ich finde aber trotzdem, dass sich für Deine Anforderung ein Thread geradezu anbietet.

Du kannst sehr wohl mit dem Hauptthread kommunizieren, sogar in beide Richtungen!
Stichwörter: Synchronize, PeekMessage, PostMessage, ...

daniel-volk 13. Okt 2003 19:40

Re: Prozedur unabhängig starten
 
Ok, danke.

Hab's mit Application.ProcessMessage geschafft! :thuimb:

THX,
Daniel.


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz