AW: Code vom Thread in einen Timer umziehen?
Liste der Anhänge anzeigen (Anzahl: 1)
So würde ich es machen (XE3)...
Mit Events ist es noch besser strukturiert als mit Übergabe des Formulars. Nachrichten verschicken ginge natürlich auch, aber das habe ich schon Jahre nicht mehr gemacht. :oops: |
AW: Code vom Thread in einen Timer umziehen?
Bedrohung blockiert
Objekt: delphipraxis.net/attachments/.... Infektion: Win32:Evo-gen [Susp] :stupid: Sieht aber interessant aus. Wusste ich gar nicht, dass das überhaupt so möglich ist. Edit: da steht zwar "0x aufgerufen" aber ich habs runtergeladen und angeguckt. |
AW: Code vom Thread in einen Timer umziehen?
Zitat:
Zitat:
Edit: Fehlendes [/QUOTE] eingefühgt. |
AW: Code vom Thread in einen Timer umziehen?
Ist zwar offTopic aber... in Threads dann doch besser ein simples Sleep() verwenden?
|
AW: Code vom Thread in einen Timer umziehen?
Ich hatte noch das FreeOnTerminate vergessen, so dass der Thread nach Beendigung nicht freigegeben wurde:
Delphi-Quellcode:
constructor TArbeiterThread.Create(aMinValue, aMaxValue: Integer; aProgressInitEvent: TProgressInitEvent;
aProgressStepEvent: TProgressStepEvent; aProgressCloseEvent: TProgressCloseEvent); begin fMinValue := aMinValue; fMaxValue := aMaxValue; fProgressInitEvent := aProgressInitEvent; fProgressStepEvent := aProgressStepEvent; fProgressCloseEvent := aProgressCloseEvent; FreeOnTerminate := True; // <------------ inherited Create(False); end; Ja, ein Sleep(1 oder höher) im Thread gibt anderen Prozessen auch mal die Möglichkeit, etwas auszuführen. Sleep(0) prinzipiell auch, aber ich hatte dennoch schon den Effekt, dass die CPU mit 100% weiter lief. |
AW: Code vom Thread in einen Timer umziehen?
Ich habe irgendwann angefangen negaH's Version zu verwenden, weil ich zu oft Fehler gemacht habe.
Mein letzter war eine while-Schleife im OnCreate etwa wie...
Delphi-Quellcode:
Das hat mir den Rechner fast zerlegt. Seitdem benutzte ich immer die Version mit ProcessMessages als Sicherung.
while True do Caption := IntToStr(Random(1234));
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:42 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