水晶报表(Crystal Reports 9) for delphi

本文主要是介绍水晶报表(Crystal Reports 9) for delphi，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

当安装了Crystal Reports 9后,在delphi的Data Access页中显示Tcrpe和TCrpeDS两个控件,

1)选择报表控件crpe1:Tcrpe和数据源控件qryRptPath:TSQLDataSet及打印设置控件PrintDialog1: TPrintDialog

2)在窗体初始化事件中

var
  CurrentDir:string;
  CFGIniFiles: TIniFile;
begin
  //获取报表的数据库连接信息;
  CurrentDir:=ExtractFileDir(Application.ExeName);
  try
    CFGIniFiles:=TIniFile.Create(CurrentDir +'/'+ 'dbxmtsconf.ini');
    servername:=CFGIniFiles.ReadString('EXMTNCUS', 'HostName', 'Localhost');
    dbuser:= CFGIniFiles.ReadString('EXMTNCUS', 'User_Name', 'LGSAS');
    dbPswd:= CFGIniFiles.ReadString('EXMTNCUS', 'Password', 'LGSAS');
    dbName:= CFGIniFiles.ReadString('EXMTNCUS', 'DataBase', 'MTNCUS');
  finally
    CFGIniFiles.Free;
  end;
  //获取参数报表路径
  with qryRptPath do
  begin
    Close;<

这篇关于水晶报表(Crystal Reports 9) for delphi的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---