printfrm.~dfm

Delphi + MapX程序框架(地图)源码程序

object frmPrint: TfrmPrint
  Left = 349
  Top = 285
  BorderStyle = bsDialog
  Caption = #22320#22270#25171#21360#35774#32622
  ClientHeight = 172
  ClientWidth = 348
  Color = clBtnFace
  ParentFont = True
  OldCreateOrder = True
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object OKBtn: TButton
    Left = 265
    Top = 15
    Width = 70
    Height = 24
    Caption = #30830'   '#23450
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object CancelBtn: TButton
    Left = 265
    Top = 73
    Width = 70
    Height = 24
    Cancel = True
    Caption = #21462'   '#28040
    ModalResult = 2
    TabOrder = 1
  end
  object GroupBox1: TGroupBox
    Left = 12
    Top = 12
    Width = 245
    Height = 97
    Caption = #25991#26723#22823#23567
    TabOrder = 2
    object Label1: TLabel
      Left = 13
      Top = 28
      Width = 56
      Height = 13
      Caption = #23485#24230'(W):'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 14
      Top = 58
      Width = 56
      Height = 13
      Caption = #39640#24230'(H):'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 77
      Top = 24
      Width = 65
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ParentFont = False
      TabOrder = 0
      OnKeyUp = Edit1KeyUp
    end
    object Edit2: TEdit
      Left = 77
      Top = 56
      Width = 65
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ParentFont = False
      TabOrder = 1
      OnKeyUp = Edit2KeyUp
    end
    object ComboBox1: TComboBox
      Left = 154
      Top = 38
      Width = 78
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      ItemIndex = 0
      ParentFont = False
      TabOrder = 2
      Text = #21400#31859
      OnChange = ComboBox1Change
      Items.Strings = (
        #21400#31859
        #33521#23544
        #27627#31859)
    end
  end
  object CheckBox1: TCheckBox
    Left = 24
    Top = 118
    Width = 73
    Height = 17
    Caption = #32422#26463#27604#20363
    Checked = True
    State = cbChecked
    TabOrder = 3
    OnClick = CheckBox1Click
  end
  object CheckBox2: TCheckBox
    Left = 24
    Top = 144
    Width = 121
    Height = 17
    Caption = #36873#25321#23545#35937#31361#20986#26174#31034
    Checked = True
    State = cbChecked
    TabOrder = 4
    OnClick = CheckBox2Click
  end
  object Button1: TButton
    Left = 265
    Top = 44
    Width = 70
    Height = 24
    Caption = #25171#21360#35774#32622'...'
    TabOrder = 5
    OnClick = Button1Click
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 304
    Top = 112
  end
end