(Kann ja leider nicht mehr bearbeiten)
Habe die
Exception möglicherweise genauer lokalisiert. Das onWork des IdHTTP sieht so aus:
Delphi-Quellcode:
begin
UDateiA_A := AWorkCount DIV 1024;
UDateiG_A := UDateiA_A + UDateiG_X;
Prz_A := Round((UDateiA_A / UDateiA_M) * 100);
Prz_G := Round((UDateiG_A / UDateiG_M) * 100);
If ((UDateiA_A Mod 2) = 0) then
Synchronize(UploadWork);
If (uStopp) then
Terminate;
If (Terminated) then
IdHTTPC.Disconnect;
end;
- so, also ohne Änderung, kommt am Ende des Uploads die besagte Gleitkomma-Exception.
- kommentiere ich den Code bis auf die 2 Ifs unten aus, kommt beim Beenden des Programms (!) folgende Exception:
Code:
---------------------------
Anwendungsfehler
---------------------------
Exception EOSError in Modul UploadTool.exe bei 0000E08E.
Systemfehler. Code: 1400.
Ungültiges Fensterhandle.
---------------------------
OK
---------------------------
- ergänze ich zum Auskommentieren im onWorkBegin, dass alle dieser Variablen aus dem onWork auf 1 gesetzt werden (ich verwende sie noch außerhalb des Threads), kommt kein Fehler mehr.
Ich glaube, ich verzweifle daran noch...
