unit1.~dfm

rave report 使用例子源代码程序

object Form1: TForm1
  Left = 262
  Top = 107
  Width = 474
  Height = 375
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object BitBtn1: TBitBtn
    Left = 160
    Top = 64
    Width = 129
    Height = 41
    Caption = #25171#21360
    TabOrder = 0
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 160
    Top = 184
    Width = 89
    Height = 25
    Caption = #36820#22238
    TabOrder = 1
  end
  object ADODataSet1: TADODataSet
    Active = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;User ID=root;Data' +
      ' Source=mysql_sjfx'
    CursorType = ctStatic
    CommandText = 'select * from stop_nbr'
    Parameters = <>
    Left = 40
    Top = 40
  end
  object RvProject1: TRvProject
    Engine = RvSystem1
    LoadDesigner = True
    ProjectFile = '\myrav.rav'
    Left = 328
    Top = 24
  end
  object RvDataSetConnection1: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = ADODataSet1
    Left = 376
    Top = 48
  end
  object RvSystem1: TRvSystem
    TitleSetup = 'OO'
    TitleStatus = #29983#25104#20449#24687
    TitlePreview = 'pr'
    SystemSetups = [ssAllowSetup, ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowPrinterSetup, ssAllowPreviewSetup]
    SystemOptions = [soShowStatus, soAllowPrintFromPreview]
    SystemFiler.StatusFormat = #29983#25104#39029' %p'
    SystemPreview.ZoomFactor = 100.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = 'Printing page %p'
    SystemPrinter.Title = 'ReportPrinter Report'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    Left = 312
    Top = 96
  end
end