(1)WPath := ExtractFilePath(ParamStr(0));(wpath是private定义的)
ExtractFilePath(ParamStr(0))返回的是哪个路径?实在是没看明白!(2)下面的语句为什么不能现实窗体,点击按钮时有个窗体一闪而过,哪位大侠帮助解决一下,不胜感激!
procedure TMainForm.Button3Click(Sender: TObject);
begin
form1.frReport3.LoadFromFile(WPath+'.frf');
form1.frReport3.PrepareReport;
form1.frreport3.ShowPreparedReport;
end;
还有LoadFromFile(WPath+'.frf')括号中加其他绝对路径时出现错误,提示没有定义x(x指绝对路径的盘符),怎么回事??
ExtractFilePath(ParamStr(0))返回的是哪个路径?实在是没看明白!(2)下面的语句为什么不能现实窗体,点击按钮时有个窗体一闪而过,哪位大侠帮助解决一下,不胜感激!
procedure TMainForm.Button3Click(Sender: TObject);
begin
form1.frReport3.LoadFromFile(WPath+'.frf');
form1.frReport3.PrepareReport;
form1.frreport3.ShowPreparedReport;
end;
还有LoadFromFile(WPath+'.frf')括号中加其他绝对路径时出现错误,提示没有定义x(x指绝对路径的盘符),怎么回事??
中的'.frf' 这个文件名不全 添全就好了 呵呵 我试了
那要是不用WPath+'.frf'这种形式,而是用不在这个路径下的其他.frf文件怎么用呢?比如e:\1.frf,提示我没有定义e,怎么办呢?不能这么用吗?
那要是不用WPath+'.frf'这种形式,而是用不在这个路径下的其他.frf文件怎么用呢?比如e:\1.frf,提示我没有定义e,怎么办呢?不能这么用吗?