Zitat von nailor:

über ne exception zu testen, ob was noch da ist...

Eben das sollst Du ja nicht machen
Sieh Dir mal FreeOnTerminate und OnTerminate an (letzteres wird IIRC mit dem Haupt/VCL-Thread synchronisiert).

Zitat von nailor:

von einem locking objekt hab ich keine ahnung.

Es gibt kein Locking-Objekt (ok, es gibt fertige Objekte in der Delphi-RTL dafür). Ich meinte damit nur, dass man den gemeinsamen Zugriff auf eine Variable durch was auch immer (Locking ) synchronisieren muss. Entweder man benutzt dafür eine fertige Klasse (Namen vergessen) oder bei Integern die Win32 API-Funktionen InterlockedExchange und Konsorten...

terminate: werd mir was einfallen lassen

locking: am anfang um den thread zu initialisieren werde ich mir wohl über "synchronize" ein paar daten aus dem hauptprogramm ziehen. der rest (eine gelegentliche rückmeldung) sollte über interlockXXX klappen. allerdings erklär mir mal einer den sinn hiervon:

Zitat:

InterlockedIncrement (Funktion)

Die Funktion inkrementiert zwei Integer-Werte thread-sicher.

Unit

SysUtils

Kategorie

Thread-Verwaltung

Delphi-Syntax:

function InterlockedIncrement(var I: Integer): Integer;

C++ Syntax:

extern PACKAGE int __fastcall InterlockedIncrement(int &I);

Beschreibung

InterlockedIncrement inkrementiert die in I übergebene Variable so, dass während dieser Operation kein Zugriff durch andere Threads möglicht ist. Der Rückgabewert hat dasselbe Vorzeichen wie das inkrementierte Ergebnis, aber nicht zwangsläufig einen identischen Wert.

Die in der Unit SysUtils definierte Funktion InterlockedIncrement ist nur unter Linux verfügbar. Unter Windows verwenden Anwendungen die Win32-API mit demselben Namen.

ich glaub ich mach jetzt schluss für heute. oder zumnidest mal pause...

Zitat von nailor:

allerdings erklär mir mal einer den sinn hiervon

Die Funktion gibt den, um eins, erhöhten Wert zurück.
Da auch ein anderer Thread der Variable gerade Inkrementieren kann, ist nach folgendem Code (der nicht nur Nachahmung empfohlen ist!):

markieren

Delphi-Quellcode:

if i = 42 then
  i := InterlockedIncrement(i);

...der Wert von i nicht zwangsläufig 43.

Kurz, Du kannst keine Annahmeen über den Wert machen - und solltest/kannst nur die Interlocked-Funktionen zum Auslesen/Setzen verwenden.

so, hab jetzt ne in meinen augen zum fortschritt übermitteln sehr schöne methode gefunden: ich feuer einfach von zeit zu zeit ne windowsmessage ab, nach dem motto

PostMessage(mainhandle, WM_USER, bla, blubb);

da es sich ja nicht um daten handelt, mit denen zeitkritisch weitergearbeitet werden soll, sondern nur der förmliche antrag an die hauptform mal ne progressbar nen stück rüberzuschieben, glaube ich ist das so ziemlich gut.

nailor

Und as mit dem "Leinwand erlaubt kein zeichen" liegt an der VCL, da selbige nicht threadsafe ist. Ersetz mal dein ShowMessage durch Messagebox, dann sollte es gehen.

Zitat von Luckie:

Und as mit dem "Leinwand erlaubt kein zeichen" liegt an der VCL, da selbige nicht threadsafe ist. Ersetz mal dein ShowMessage durch Messagebox, dann sollte es gehen.

Wie es bereits in meinem ersten Post dieses Threads geschrieben steht

stimmt schon. das gleiche scheint auch noch für so nen kram wie MessageDlg und konsorten zu gelten. aber das eigentliche problem (welches sich mittlerweile in wohlgefallen aufgelöst hat) muss ein anderes gewesen sein, da ich die showmessages nur zum debuggen eingebaut hatte.

so langsam find ich mich in die DOs und DONTs der threaderei hinein.

MessageDlg ist auch eine VCL-Form. messagebox ist die Messagebox von Windows direkt.

ich hab schon kapiert. alle dialoge werden jetzt so ersetzt, dass sie keinen stopp des haupt-threads mehr erzwingen

problem: ich brauch ne messagebox mit:

markieren

Code:

ja
nein
ja zu allen
nein zu allen

das windows-dingen bietet nur

markieren

Code:

MB_ABORTRETRYIGNORE   The message box contains three push buttons: Abort, Retry, and Ignore.
MB_OK   The message box contains one push button: OK. This is the default.
MB_OKCANCEL   The message box contains two push buttons: OK and Cancel.
MB_RETRYCANCEL   The message box contains two push buttons: Retry and Cancel.
MB_YESNO   The message box contains two push buttons: Yes and No.
MB_YESNOCANCEL   The message box contains three push buttons: Yes, No, and Cancel.

das ist zu wenig. wie mach ich mir das jetzt am einfachsten?