Delphi: OpenFileDialog falhas com URL

Question

Dando uma URL para o TOpenFileDialog, o método de execução lança uma exceção:

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

Mas você tem permissão para abrir arquivos a partir de uma URL.

Delphi 5

Answer 1

TOpenDialog é apenas um wrapper para as janelas funcionar GetOpenFileName em comdlg32.dll.

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

Infelizmente, a documentação para esta função não é tão grande . Mas eu tenho certeza que ele não suporta http.