Undeclared identifier: 'Sender'
大家好
我現在網上找到一段代碼,來實現fastreport 打印固定格式的代碼。但運行時總會出錯。代碼如下:
procedure TForm1.frxReport1ManualBuild(Page: TfrxPage);
var
i,j,k:Integer;
begin
k:=trunc(frxDBbomb.DataSource.DataSet.RecordCount/6);
Sender.ShowBandByName('reporttitle1');
for i := 0 to k do
begin
Sender.ShowBandByName('masterdata2');
for j := 1 to 6 do
begin
if not frxDBBomb.Eof then
begin
Sender.ShowBandByName('DetailData1');
frxDBBomb.Next;
end
else
sender.ShowBandByName('child1');
end ;
if i <> k then
Sender.NewPage;
end;
end;
總是會出錯:
1)[Error] Unit1.pas(75): Illegal character in input file: ' ' ($A140)
2)[Error] Unit1.pas(76): Undeclared identifier: 'Sender'
請大家幫我查一下問題出在那裏!多謝!
[解决办法]
1\注意空格
2sender是指page,将它换成page
[解决办法]
Sender.ShowBandByName( 'DetailData1 ');
Sender是控件自己本身事件时可以使用Sender,在这个事件中没有Sender作为参数。怎么能使用Sender呢.