Zitat von
Matze:
Zitat von
Motzi:
Ich hab mir deinen Code mal ein bisschen angeschaut und mir ist dabei aufgefallen, dass du in deinem Decode-Thread direkt auf deine Form zugreifst ...
Äh, und?
Macht Luckie in seinem Programm genauso,
Man jetzt hast du mir aber einen Schrecken eingejagt. Ich dachte schon ich da wirklich so einen Mist verzapft. Ich tue es natürlich nicht! Die Klasse StreamProgressAdapert schick eine eigene Nachricht über den Fortschritt an das Hauptfenster. Ich greife nicht aus der Thread-Klasse auf die Form zu.
Delphi-Quellcode:
procedure TStreamProgressAdapter.DoProgress(Writing: Boolean);
begin
FPercent := Round(100 / FMax * FCurrentPos);
SendMessage(FHandle, SPM_PROGRESS, 0, FPercent);
if FPercent = 100 then
SendMessage(FHandle, SPM_DONE, 0, 0)
end;