德尔福：OpenFileDialog的崩溃与URL

Question

给人一种URL到TOpenFileDialog，Execute方法抛出一个异常：

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

但你被允许从URL打开的文件。

德尔福5

Answer 1

TOpenDialog只是在COMDLG32.DLL Windows函数GetOpenFileName的包装。

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

不幸的是documentation这个功能并不是那么好。但我很确定它不支持http。