Rave Report条码控制类型申明与其Event Edit代码编写问题！ ( 积分: 50 )

[red]1.
procedure TCPN_CpnPrint.Button5Click(Sender: TObject);
var
MyPage: TRavePage;
MyBand: TRaveBand;
MyRegion: TRaveRegion;
// mytext2: Travetext;
//mydataband: Travedataband;
mydatatext1: Travedatatext;
myDatatext2: Travedatatext;
myDatatext3: Travedatatext;
—————————Datatext就是这样申明类型的可是条码控件呢？如何申明就是下面这句怎么写？
//myI2of5BarCode: TRaveBarCode;_________________就是这一句怎么写？如何申明类型？只有先申明了下面查找时有相应的属性时才能查得出！有人知道吗？
myDatatext4: Travedatatext;
mydatatext5: Travedatatext;
myDatatext6: Travedatatext;
mydatatext7: Travedatatext;
myDatatext8: Travedatatext;
mydatatext9: Travedatatext;
myDatatext10: Travedatatext;
myDataView: TRaveDataView;
CPNinfo:string;
begin
RvProject1.open;
CPNinfo:=ExtractFilePath(Paramstr (0))+'Cmts.ini';
iniinfo:=Tinifile.Create(CPNinfo);
RvSystem1.SystemSetups :=[];
With RvProject1.ProjMan do
begin
MyPage := FindRaveComponent('Report1.Page1',nil) as TRavePage;
//查找ＰＡＧＥ
MyBand := FindRaveComponent('DataBand1',MyPage) as TRavedataBand;//.....
MyRegion := FindRaveComponent('Region1',MyPage) as TRaveRegion;//查找打印区域
mydatatext1 := FindRaveComponent('dataText1',MyPage) as Travedatatext;
//查找ＴＥＸＴ1
mydatatext2 := FindRaveComponent('dataText2',MyPage) as Travedatatext;
//查找ＴＥＸＴ2
mydatatext3 := FindRaveComponent('dataText3',MyPage) as Travedatatext;
//查找ＴＥＸＴ3
// myI2of5BarCode1 := FindRaveComponent('text',MyPage) as Ttext;
//查找ＴＥＸＴ3
mydatatext4 := FindRaveComponent('dataText4',MyPage) as Travedatatext;
//查找ＴＥＸＴ4
mydatatext5 := FindRaveComponent('dataText5',MyPage) as Travedatatext;
//查找ＴＥＸＴ5
mydatatext6 := FindRaveComponent('dataText6',MyPage) as Travedatatext;
//查找ＴＥＸＴ6
mydatatext7 := FindRaveComponent('dataText7',MyPage) as Travedatatext;
//查找ＴＥＸＴ7
mydatatext8 := FindRaveComponent('dataText8',MyPage) as Travedatatext;
//查找ＴＥＸＴ8
mydatatext9 := FindRaveComponent('dataText9',MyPage) as Travedatatext;
//查找ＴＥＸＴ9
mydatatext10 := FindRaveComponent('dataText10',MyPage) as Travedatatext;
//查找ＴＥＸＴ10
2.这第二个问题就是有人有关于Rave Report Event Edit代码编写的资料吗？网上很上。哪位高人能指点一下就好。现在我主要是只能用这个制表组件完成一个这样的效果：就是从数据集里取了打印的数据，在打印预览里显示了。然后要按了上面那个打印后。有没有办法把现在显示在打印预览里的数据做一个标记。（如果可以让已经打印过了的数据插入一个标记进数据库里）主要是为了避免重复打印。
郑重申明，有高人知道的分数可以加到200，再高也行。希望 大家帮我下。谢谢。[/red]