Trojaner problem mit UrlDownloadToFile

[sx2008]

Zitat von Luckie:

Solche Fehlermeldungen liebe ich.

Dito!
Hier braucht man eine Fehlerinformationsanreicherungs-Strategie:

Delphi-Quellcode:

try
  // hier der Code für Download
  ...
on E:Exception do
begin
  E.Message := Format('Update konnte nicht von heruntergeladen werden.'#13#10'Url: %s'#13#10, [url+downloadFile])+
    E.Message;  // Orginale Fehlermeldung anhängen
  raise;  // Exception neu auslösen; MessageDlg zu verwenden wäre ungeschickt
end;

[Luckie]

Zitat von sx2008:

raise; // Exception neu auslösen; MessageDlg zu verwenden wäre ungeschickt

Da die Routine aber direkt in der Ereignisprozedur der Schaltfläche implementiert ist, was auch ungeschickt ist, bleibt an der Stelle nichts anderes übrig, da es keinen übergeordneten Code gibt.

[sx2008]

Zitat von Luckie:

Da die Routine aber direkt in der Ereignisprozedur der Schaltfläche implementiert ist, was auch ungeschickt ist, bleibt an der Stelle nichts anderes übrig, da es keinen übergeordneten Code gibt.

Ein simples Raise löst die Exception neu aus.
Diese wird von der VCL auf oberster Ebene abgefangen und über Application.ShowException angezeigt.
Dieses Standardverhalten macht "im Prinzip" genau das Gleiche wie MessageDlg: es zeigt die Fehlermeldung in einem modalen Fenster an.
Aber ein raise macht noch etwas mehr: es unterbricht den Programmfluss und gibt die Kontrolle an die Windows-Message-Loop zurück.
Dieses Verhalten ist hier ebenfalls erwünscht, denn welchen Sinn macht es wenn der Download des Updates gescheitert ist das Programm weiterlaufen zu lassen?