很开心:完全用代码实现多页rave报表,每一根线都是自己画的:)散分庆祝! 另外感谢各位在rave方面的帮助;) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 贴出来观摩一下[email protected] rave控件相比QuickRep ,哪个好用? 我覺得rave還沒QuickRep好用呢﹐可能是我沒用習慣的緣故吧﹐ (兔)兄竟然每根線都是自己畫的﹐可見熟練程度 ﹐祝賀﹗﹗﹗ 就先贴一个在报表上增加一个字符串的函数procedure TForm1.CreateRaveTextTitle(pPage:TRavePage;sName,sText:String;dLeft,dTop:Double);var MyText:TRaveText;begin MyText:=TRaveText.Create(pPage); MyText.Parent:=pPage; MyText.Name:=sName; MyText.Top:=dTop-0.1; MyText.Left:=dLeft; MyText.Width:=200; MyText.Height:=200; MyText.Font.Size :=22; MyText.BackColor :=clWhite; MyText.Text:=sText; AddComponent(MyText);end; 强!学习一下![email protected] 搞懂delphi的几个问题? delphi数据库客户端软件如何获知数据库更新? delphi程序设计基础问题 怎样才能隐藏和显示窗体 关于数据集的问题 如何设置delphi使得在调试程序时不进入delphi自带的单元文件? 紧急求助!关于Dbgrid的问题! ?请问哪里有萨师煊的数据库原理及《SQL SERVER 2000开发指南》的电子书下载???(hcy8004) 自定义过程和变量的问题 没有.PAS,只有.DCU可以安装控件吗? 调试debugger不可用,如何解决? 关于自定义 单元!!!!
[email protected]
procedure TForm1.CreateRaveTextTitle(pPage:TRavePage;sName,sText:String;dLeft,dTop:Double);
var MyText:TRaveText;
begin
MyText:=TRaveText.Create(pPage);
MyText.Parent:=pPage;
MyText.Name:=sName;
MyText.Top:=dTop-0.1;
MyText.Left:=dLeft;
MyText.Width:=200;
MyText.Height:=200;
MyText.Font.Size :=22;
MyText.BackColor :=clWhite;
MyText.Text:=sText;
AddComponent(MyText);
end;
[email protected]