griddlg.~dfm

delphi 和mapx联合开发的例程 实现mapx的相应功能

object GridFrm: TGridFrm
  Left = 369
  Top = 241
  BorderStyle = bsSingle
  Caption = #32593#26684#23646#24615
  ClientHeight = 269
  ClientWidth = 260
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001001010040000000000280100001600000028000000100000002000
    0000010004000000000080000000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000008777087770877700878708787087870087770877708777008888
    0888808888000000000000000000877708777087770087870878708787008777
    0877708777008888088880888800000000000000000087770877708777008787
    0878708787008777087770877700888808888088880000000000000000008421
    0000000100000001000000010000084300008421000000010000000100000001
    0000084300008421000000010000000100000001000008430000FFFF0000}
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 14
    Top = 64
    Width = 232
    Height = 75
    Caption = #22352#26631#65306
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Top = 17
      Width = 36
      Height = 13
      AutoSize = False
      Caption = #36215#28857
    end
    object Label2: TLabel
      Left = 6
      Top = 47
      Width = 35
      Height = 13
      AutoSize = False
      Caption = #32456#28857
    end
    object Label5: TLabel
      Left = 36
      Top = 17
      Width = 23
      Height = 14
      AutoSize = False
      Caption = 'X'#65306
    end
    object Label6: TLabel
      Left = 133
      Top = 17
      Width = 23
      Height = 14
      AutoSize = False
      Caption = 'Y'#65306
    end
    object Label7: TLabel
      Left = 36
      Top = 47
      Width = 24
      Height = 14
      AutoSize = False
      Caption = 'X'#65306
    end
    object Label8: TLabel
      Left = 133
      Top = 47
      Width = 24
      Height = 14
      AutoSize = False
      Caption = 'Y'#65306
    end
    object Edit1: TEdit
      Left = 52
      Top = 13
      Width = 76
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 150
      Top = 13
      Width = 76
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 1
    end
    object Edit5: TEdit
      Left = 52
      Top = 43
      Width = 76
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 2
    end
    object Edit6: TEdit
      Left = 150
      Top = 43
      Width = 76
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 14
    Top = 5
    Width = 232
    Height = 55
    Caption = #25152#22312#22270#23618
    TabOrder = 1
    object ComboBox1: TComboBox
      Left = 12
      Top = 19
      Width = 143
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 16
      ParentFont = False
      TabOrder = 0
    end
    object BitBtn1: TBitBtn
      Left = 168
      Top = 18
      Width = 51
      Height = 25
      Caption = #26032#24314'...'
      TabOrder = 1
      OnClick = BitBtn1Click
    end
  end
  object GroupBox3: TGroupBox
    Left = 14
    Top = 144
    Width = 232
    Height = 83
    Caption = #23646#24615#65306
    TabOrder = 2
    object Label3: TLabel
      Left = 14
      Top = 20
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #34892#25968#65306
    end
    object Label4: TLabel
      Left = 127
      Top = 19
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #21015#25968#65306
    end
    object SpeedButton1: TSpeedButton
      Left = 15
      Top = 50
      Width = 76
      Height = 23
      Caption = #32593#26684#32447#39068#33394
      Flat = True
      OnClick = SpeedButton1Click
    end
    object UpDown1: TUpDown
      Left = 92
      Top = 17
      Width = 15
      Height = 24
      Associate = Edit3
      Position = 5
      TabOrder = 0
    end
    object Edit3: TEdit
      Left = 51
      Top = 17
      Width = 41
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 1
      Text = '5'
    end
    object Edit4: TEdit
      Left = 162
      Top = 17
      Width = 41
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 2
      Text = '5'
    end
    object UpDown2: TUpDown
      Left = 203
      Top = 17
      Width = 15
      Height = 24
      Associate = Edit4
      Position = 5
      TabOrder = 3
    end
    object Panel1: TPanel
      Left = 104
      Top = 50
      Width = 113
      Height = 23
      BevelInner = bvLowered
      Color = clBtnText
      TabOrder = 4
    end
  end
  object BitBtn2: TBitBtn
    Left = 43
    Top = 236
    Width = 59
    Height = 26
    Caption = #30830#23450
    TabOrder = 3
    OnClick = BitBtn2Click
    Kind = bkOK
  end
  object BitBtn3: TBitBtn
    Left = 160
    Top = 236
    Width = 59
    Height = 26
    Caption = #21462#28040
    TabOrder = 4
    Kind = bkCancel
  end
  object ColorDialog1: TColorDialog
    Left = 186
    Top = 196
  end
end