dlg_print.dfm

用于家庭养殖的财务进出

object Dlg_printf: TDlg_printf
  Left = 392
  Top = 147
  BorderStyle = bsDialog
  Caption = #25171#24320#25991#20214'....'
  ClientHeight = 421
  ClientWidth = 327
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 1
    Top = 2
    Width = 327
    Height = 335
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 8
    Top = 88
    Width = 153
    Height = 17
    AutoSize = False
    Caption = #36873#25321#35201#25171#21360#30340#34920
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 352
    Width = 97
    Height = 16
    AutoSize = False
    Caption = #25171#24320#30340#34920#21517#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object OKBtn: TButton
    Left = 47
    Top = 390
    Width = 75
    Height = 25
    Caption = #30830#35748
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = OKBtnClick
  end
  object CancelBtn: TButton
    Left = 191
    Top = 391
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 1
  end
  object RadioGroup1: TRadioGroup
    Left = 8
    Top = 8
    Width = 313
    Height = 73
    Caption = #36873#25321#25253#34920#31867#22411
    Columns = 2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Items.Strings = (
      #21333#34920
      #21517#20876)
    ParentFont = False
    TabOrder = 2
    OnClick = RadioGroup1Click
  end
  object Panel1: TPanel
    Left = 2
    Top = 112
    Width = 324
    Height = 225
    TabOrder = 3
    object ValueListEditor1: TValueListEditor
      Left = 1
      Top = 1
      Width = 322
      Height = 223
      TabStop = False
      Align = alClient
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goColSizing, goEditing, goRowSelect, goThumbTracking]
      Strings.Strings = (
        '')
      TabOrder = 0
      TitleCaptions.Strings = (
        '')
      OnClick = ValueListEditor1Click
      OnSelectCell = ValueListEditor1SelectCell
      ColWidths = (
        3
        313)
    end
  end
  object Edit1: TEdit
    Left = 104
    Top = 350
    Width = 214
    Height = 21
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 4
  end
end