unit1.dfm

来自「将fastreport2系列frf文件自动生成form」· DFM 代码 · 共 66 行

object Form1: TForm1
  Left = 192
  Top = 140
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object btnGenForm: TButton
    Left = 432
    Top = 192
    Width = 75
    Height = 25
    Caption = 'btnGenForm'
    TabOrder = 0
    OnClick = btnGenFormClick
  end
  object mPas: TdxMemo
    Left = 20
    Top = 12
    Width = 401
    TabOrder = 1
    Lines.Strings = (
      'mPas')
    Height = 209
  end
  object mDfm: TdxMemo
    Left = 20
    Top = 228
    Width = 401
    TabOrder = 2
    Lines.Strings = (
      'mDfm')
    Height = 213
  end
  object btnClose: TButton
    Left = 432
    Top = 224
    Width = 75
    Height = 25
    Caption = 'btnClose'
    TabOrder = 3
    OnClick = btnCloseClick
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    RebuildPrinter = False
    Left = 456
    Top = 68
    ReportForm = {19000000}
  end
  object odFile: TOpenDialog
    DefaultExt = '.frf'
    Left = 484
    Top = 68
  end
end