procedure   TfmInvestReport.DBReportDblClick(Sender:   TObject);
var
    sFileName:   string;
begin
    sFileName   :=   '';    begin
    //     sFileName   :=   ExtractFileDir(application.ExeName)   +   '\report\'   +   DBReport.Fields[1].Text   +   '.PDF';
        sFileName   :=   'http://www.xxxxxxxx.cn/xxxxx/'   +   DBReport.Fields[1].Text   +   '.PDF';
//         shellexecute(handle,   'open',   pchar(sFileName),   nil,   nil,   SW_SHOW);
        ShellExecute(Application.Handle,   'Open',   'AcroRd32.exe',   PChar(sFileName),nil,SW_SHOWNORMAL);
    end;
end;文件的路径如何写?