Alternative zu While

[himitsu]

Zitat:

function inserts() : string;

Wieso so?

Schau mal wie TFNThreadStartRoutine deklariert ist und wenn da nichts steht, dann schau in der Deklaration der entsprechenden Funktion nach.
Bei dir ist gleich alles komplett falsch ... Parameter, Rückgabetyp und Aufrufkonvention.

Fast immer dann, wenn du solche brutalen Casts machen mußt, welche auch noch Delphis eingebaute Prüfung auf Typsicherheit umgehen, solltest du dir dringend überlegen was du da überhaupt machst und ob du da nicht irgendwelchen Mist baust.

Zitat:

Form1.Memo1.Lines.Add

Und dann greifst du innerhalb deines Threads direkt auf die VCL zu.
Das macht man nicht.
Sowas hat man gefälligst zu synchronisieren!

[Bbommel]

Ich möchte mal fies in die ganze TThread-Lösung hier reingrätschen. Die ist natürlich von der Idee her ein völlig richtiger Ansatz und wenn man sich eh mal mit Threads beschäftigen will, wäre das hier auch ein schönes Ding zum Üben, aber: wenn es nur eine GUI ist, die eh nichts anderes kann, als diese Daten-Migration, und man etwas basteln will, damit die GUI für den Benutzer nicht eingefroren erscheint, dann könnte das gute alte Application.ProcessMessages die einfachere und schnellere Möglichkeit sein, zum Ziel zu kommen.

Man kann alle paar hundert oder auch tausend Durchläufe mal Application.ProcessMessages aufrufen, sodass dann alles, was der Benutzer zwischenzeitlich geklickt und verschoben hat, verarbeitet wird. Auch ein Abbrechen-Button, wenn man dabei eine passende Abbruch-Bedingung für die while-Schleife setzt. Vielleicht hilft das ja weiter, an der richtigen Stelle zu suchen.

Wie gesagt, nichts gegen Threads, fände ich aber hier die einfachere und pragmatischere Lösung.

Bis denn
Bommel

[p80286]

Zitat von Bbommel:

sodass dann alles, was der Benutzer zwischenzeitlich geklickt und verschoben hat, verarbeitet wird.

und in dem "alles" ist dann der Hund begraben. Da bekommst Du unter Umständen Multitasking durch die Hintertür.

Wenn Du mit mehreren Threads arbeitest, dann ist (sollte) Dir bewußt, daß du auf mehreren Hochzeiten tanzt. Ohne Threads arbeiten verleitet da zum schludern.

Gruß
K-H

[Bbommel]

Hm, sehe ich jetzt hier für das einfache Beispiel nicht so als Gefahr. Klar, man könnte etwas falsch machen, weil man irgendwo einen Nebeneffekt übersieht oder einen Button, der während der Laufzeit der while-Schleife dann etwas macht, was er zu der Zeit nicht machen sollte (ich denke mal, so etwas wirst du meinen?).

Aber Stolpersteine hat man bei Threads ja genauso, wie man ja direkt hier in dem Beispiel sehen konnte: mal direkt ohne ein Sync auf die VCL zugegriffen, ist sicherlich genauso ein Klassiker.

Wie gesagt, gilt natürlich alles nur für die einfache GUI, die "value is null" hier beschrieben hatte.

[himitsu]

PS: Siehe letzte Zeile in Beitrag #4

Was man z.B. vergessen kann:
- Button disablen (der Prozess läßt sich mehrfach starten und der Zugriff "globalere" Variablen macht schnell mal Probleme)
- Wenn die Funktion auf die Form/GUI zugreift und man schließt die form, bevor die Prozedur fertig ist.
- ...

Nja, das Selbe trifft aber auch auf den Thread zu:
- den Thread kann man mehrmals starten
- der Zugriff auf globale Dinge muß abgesichert werden (vorallem der unsynchronisierte Zugriff auf die GUI)
- wenn etwas aus der form verwendet wird, dann darf diese auch vorher nicht freigegeben werden
- ...

[Bbommel]

Zitat von himitsu:

PS: Siehe letzte Zeile in Beitrag #4

Ups, hatte ich tatsächlich übersehen, 'tschuldige.

Ansonsten sehe ich es genauso: man muss einfach in beiden Fällen darauf achten, dass in der GUI alles sauber abgefangen wird.

[Captnemo]

Wenn's mal schnell gehen soll, dann mache ich das so:

Also wenn ich so eine Schleife, die so viele Datensätze verarbeiten soll, dann sollte man ggf. mit einer Progressbar dem Anwender zeigen, das die Verbeitung noch läuft, bzw. wielange sie noch läuft. Ich persönlich blende dafür immer einen eigenen Dialog ein, der mit einer Progressbar und einem Abbrechen-Button bestückt ist.
Innerhalb der Schleife, sorge ich mittel Application.Prozessmessages dafür, dass meine Progressbar aktualisiert wird. Dann nehme ich eine globale Bool-Variable, die mit dem Abbrechen-Button setze, und innerhalb der While-Schleife abfrage.