5,388
社区成员
发帖
与我相关
我的任务
分享fastreport的dialogpage问题
各位高手,
请问,diglogpage里的edit的值为什么丢失?
我写的:
var
sumpro:real;
planqty:real;
cmpqty:real;
procedure Button1OnClick(Sender: TfrxComponent);
begin
{ masterdata1.rowcount:= strtoint(edit1.text);}
masterdata1.rowcount := strtoint(edit1.text) ; -- 这里系统提示(masterdata1.rowcount:not accessible) end;
begin
sumpro:=<frxdbdataset1."u_sumpro">;
planqty:=<frxdbdataset1."plannedqty">;
edit2.text:=<frxdbdataset1."u_sumpro">;
cmpqty:=<frxdbdataset1."cmpltqty">;
if (sumPro <> 0) then
begin
edit1.text := floattostr( round( planqty /sumpro )) ;
end else
begin
edit1.text := '1' ;
end
end.
在程序运行的时候EDIT1里是有值的,当点确定按钮后就没了.在程序段点跟踪里发现
这里系统提示(masterdata1.rowcount:not accessible) end;
这个错误.
请问,diglogpage里的edit的值为什么丢失?
我写的:
var
sumpro:real;
planqty:real;
cmpqty:real;
procedure Button1OnClick(Sender: TfrxComponent);
begin
{ masterdata1.rowcount:= strtoint(edit1.text);}
masterdata1.rowcount := strtoint(edit1.text) ; -- 这里系统提示(masterdata1.rowcount:not accessible) end;
begin
sumpro:=<frxdbdataset1."u_sumpro">;
planqty:=<frxdbdataset1."plannedqty">;
edit2.text:=<frxdbdataset1."u_sumpro">;
cmpqty:=<frxdbdataset1."cmpltqty">;
if (sumPro <> 0) then
begin
edit1.text := floattostr( round( planqty /sumpro )) ;
end else
begin
edit1.text := '1' ;
end
end.
在程序运行的时候EDIT1里是有值的,当点确定按钮后就没了.在程序段点跟踪里发现
这里系统提示(masterdata1.rowcount:not accessible) end;
这个错误.
...全文
请发表友善的回复…
发表回复
pbray 2011-02-11
- 打赏
- 举报
怎么还是没人理啊?
pbray 2011-02-08
- 打赏
- 举报
确实很认真的跟踪过,系统提示 "masterdata1.rowcount:not accessible" 这个错误!
kye_jufei 2011-02-07
- 打赏
- 举报
无法得到masterdata1.rowcount，認真檢查跟蹤一下程序代碼。。。
pbray 2011-02-06
- 打赏
- 举报
有没有高手指点下啊.
我做个程序的目的是,可以让用户自由的选择打印张数.
例如:程序根据planqty(计划数量)/产品包装数量=需要打印的标签数量,而这个标签数量是可以根据需要来更改的.
目前我是想用masterdata.rowcount来控制打印页数,但EDIT里的值总是不能传给ROWCOUNT,所以想请高手们帮帮忙.谢谢!
我做个程序的目的是,可以让用户自由的选择打印张数.
例如:程序根据planqty(计划数量)/产品包装数量=需要打印的标签数量,而这个标签数量是可以根据需要来更改的.
目前我是想用masterdata.rowcount来控制打印页数,但EDIT里的值总是不能传给ROWCOUNT,所以想请高手们帮帮忙.谢谢!
pbray 2011-02-06
- 打赏
- 举报
是我问题描述的不清楚吗?
怎么没人帮忙分析下啊!
怎么没人帮忙分析下啊!
