[结贴]BizBrowseDialog问题

dynasty0628 · 发表于 2009-9-10 16:44:25

选择完成后文件不存在错误。选择数据库URL和FormDoc URL都正常，就是这个选择数据集的不正常。代码停在最后一行
---------------------------
X3 Studio
---------------------------
运行系统初始化的时候发生异常：在操作文件：Biz:\OWFSPACE\HTGL\HTGLXXINFO.INFO\HTLB.DataSet的时候出现异常，操作代码：18，异常信息：文件"\OWFSPACE\HTGL\HTGLXXINFO.INFO\HTLB.DataSet"不存在

类型：EFileExecuteAction。
---------------------------
确定
---------------------------

代码：
procedure TMainForm.btnSelectDataSetURLClick(Sender: TObject);
begin
BizBrowseDialog.ShowOptions := [TBizObjectKind.boServer,
      TBizObjectKind.boBizServer, TBizObjectKind.boSpace, TBizObjectKind.boInfo,
      TBizObjectKind.boDataSet, TBizObjectKind.boFolder];
if  DataEdit12.Text <> '' then
BizBrowseDialog.InitialDir:= BizSys.BizSystem.URL2FileName(DataEdit12.Text);
BizBrowseDialog.MustSelectedNode:= [TBizObjectKind.boDataSet];
BizBrowseDialog.Title:= '请选择数据集的URL';
if BizBrowseDialog.Execute then
begin
   DataSetBrokerStatistics.DataSet.Edit;
   DataSetBrokerStatistics.DataSet.FieldByName(DataEdit12.DataField).AsString:= BizSys.BizSystem.FileName2URL(BizBrowseDialog.filename);
end;
end;

lixy · 发表于 2009-9-10 17:00:18

我试试

lixy · 发表于 2009-9-10 17:08:39

BizSys.BizSystem.FileName2URL是这个函数导致的错误，
你可以改成
DataSetBrokerStatistics.DataSet.FieldByName(DataEdit12.DataField).AsString:= BizBrowseDialog.filename;
就不报错了。

dynasty0628 · 发表于 2009-9-10 17:10:40

不行啊
不是简单的存数据，对于这个URL将来还会用的
这样会把文件夹的路径也加上

lixy · 发表于 2009-9-10 17:13:43

****.DataSet是不存在于文件系统的，没办法转化成filename

lixy · 发表于 2009-9-10 17:14:42

也就是这个对象只有bizurl

dynasty0628 · 发表于 2009-9-10 17:15:40

那有什么好的方法没

dynasty0628 · 发表于 2009-9-10 17:16:57

奥，也就是说直接用BizBrowseDialog.filename取的就是URL吧

lixy · 发表于 2009-9-10 17:22:39

你可以show出来看看。

dynasty0628 · 发表于 2009-9-10 17:23:04

试了一下，还是把文件夹给加上了
结贴吧，用的时候自己处理一下吧

		自动登录	找回密码
密码			立即注册