[Delphi] Exception in thread

[jelmervos]

Ik heb deze functie in een thread:

code:

procedure THTTPThread.Execute;
begin
  HTTPResult := '';
  try
    HTTPResult := HTTP.Get(FURL);
  finally
    HTTP.Free;
  end;

  PostMessage(FCallHandle, WM_USER_THREADDONE, 0, 0);
end;

Maar zodra er een Exception optreed bij die HTTP.Get (bijvoorbeeld een 404 ofzo) dan gaat hij niet verder, dus geen finally en geen PostMessage. Hoe kan dit?

Overigens zit deze thread wel in een DLL, maakt dat wat uit?

[jelmervos]

Volgens mij komt het omdat ik de DLL aan een ander process attach.
Want draai ik hem zonder de debugger dan werkt het wel goed.

[Tomatoman]

Zorg dat je heel goed begrijpt wanneer je code in een thread moet laten uitvoeren door de main thread - dat doe je via Synchronize. In het algemeen moet alle VCL-code worden gesynchroniseerd. Het zou weleens kunnen dat dat hier het probleem is. Je benadert HTTP, dat waarschijnlijk verbonden is met je user interface. In dat geval moet je HTTP.Get uitvoeren via Synchronize, waarmee de hele essentie van een aparte thread teniet wordt gedaan. Je de code wordt dan niet parellel uitgevoerd aan je main thread, maar door je main thread.

[jelmervos]

De thread doet niks met de MainThread/UI, die zit zelfs niet eens in de uses. Maar het werkt al goed, zolang ik hem niet in de debugger draai.