有如下一代码,运行时,报"Undeclared indentifier:'recordcount'"错误,不知该如何解决??????是不是和在Delphi里一样要USES????var
i:integer;
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
if ((<Line#>-1) mod 9 =0)and ((<Line#>-1)>0) then
begin
engine.newpage;
end;
i:=<line#>+1;end;procedure MasterData1OnAfterPrint(Sender: TfrxComponent);
var
j:integer;
t:integer;begin
if (<Page#>=<TotalPages#>) then
begin
if engine.finalpass then
if (MasterData1.dataset.recordcount=<line>) then
begin
j:=9-(MasterData1.dataset.recordcount mod 9) ;
if ((MasterData1.dataset.recordcount mod 9))<>0 then
for t:=1 to j do
engine.showband(child1);
end;
//engine.showband(child1);
end;
end;beginend.
i:integer;
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
if ((<Line#>-1) mod 9 =0)and ((<Line#>-1)>0) then
begin
engine.newpage;
end;
i:=<line#>+1;end;procedure MasterData1OnAfterPrint(Sender: TfrxComponent);
var
j:integer;
t:integer;begin
if (<Page#>=<TotalPages#>) then
begin
if engine.finalpass then
if (MasterData1.dataset.recordcount=<line>) then
begin
j:=9-(MasterData1.dataset.recordcount mod 9) ;
if ((MasterData1.dataset.recordcount mod 9))<>0 then
for t:=1 to j do
engine.showband(child1);
end;
//engine.showband(child1);
end;
end;beginend.
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货