Delphi: OpenFileDialog plante avec l'URL

Question

En donnant une URL au TOpenFileDialog, la méthode Execute lève une exception:

OpenDialog1.Filename := 'http://www.osfi-bsif.gc.ca/app/DocRepository/1/eng/issues/terrorism/indstld_e.xls';
bResult := OpenDialog1.Execute;

Mais vous êtes autorisé à ouvrir des fichiers à partir d'une URL.

Delphi 5

Answer 1

TOpenDialog est juste un wrapper pour la fonction Windows GetOpenFileName dans comdlg32.dll.

function TOpenDialog.Execute(ParentWnd: HWND): Boolean;
begin
  Result := DoExecute(@GetOpenFileName, ParentWnd);
end;

Malheureusement, la documentation pour cette fonction n'est pas terrible . Mais je suis sûr qu'il ne supporte pas http.