dialogfrm.~dfm

关于利用DELPHI来进行企业级方案解决的著作的附书源码

object DialogForm: TDialogForm
  Left = 290
  Top = 231
  Width = 373
  Height = 349
  Caption = #26631#20934#23545#35805#26694#28436#31034#31243#24207
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 169
    Height = 265
    Caption = #28040#24687#26694
    TabOrder = 0
    object Button1: TButton
      Left = 16
      Top = 24
      Width = 137
      Height = 25
      Caption = 'ShowMessage'#36807#31243
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button3: TButton
      Left = 16
      Top = 64
      Width = 137
      Height = 25
      Caption = 'ShowMessagePos'#36807#31243
      TabOrder = 1
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 16
      Top = 104
      Width = 137
      Height = 25
      Caption = 'ShowMessageFmt '#36807#31243
      TabOrder = 2
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 16
      Top = 224
      Width = 137
      Height = 25
      Caption = 'MessageBox'#20989#25968
      TabOrder = 3
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 16
      Top = 184
      Width = 137
      Height = 25
      Caption = 'MessageDlgPos'#20989#25968
      TabOrder = 4
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 16
      Top = 144
      Width = 137
      Height = 25
      Caption = 'MessageDlg'#20989#25968
      TabOrder = 5
      OnClick = Button7Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 184
    Top = 8
    Width = 169
    Height = 105
    Caption = #36755#20837#26694
    TabOrder = 1
    object Button8: TButton
      Left = 16
      Top = 56
      Width = 137
      Height = 25
      Caption = 'InputOuery'#20989#25968
      TabOrder = 0
      OnClick = Button8Click
    end
    object Button2: TButton
      Left = 16
      Top = 24
      Width = 137
      Height = 25
      Caption = 'InputBox'#20989#25968
      TabOrder = 1
      OnClick = Button2Click
    end
  end
  object BitBtn1: TBitBtn
    Left = 144
    Top = 288
    Width = 75
    Height = 25
    Caption = #20851#38381
    TabOrder = 2
    Kind = bkClose
  end
  object GroupBox3: TGroupBox
    Left = 184
    Top = 120
    Width = 169
    Height = 153
    Caption = #20301#32622#22352#26631
    TabOrder = 3
    object Label1: TLabel
      Left = 12
      Top = 104
      Width = 143
      Height = 39
      Caption = #27880#24847#65306#65336#21644#65337#22352#26631#20165#23545'ShowMessagePos'#36807#31243#21644'MessageDlgPos'#20989#25968#26377#25928
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Label2: TLabel
      Left = 16
      Top = 16
      Width = 46
      Height = 13
      Caption = 'X '#22352#26631#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 56
      Width = 46
      Height = 13
      Caption = 'Y '#22352#26631#65306
    end
    object XEdit: TSpinEdit
      Left = 16
      Top = 32
      Width = 121
      Height = 22
      MaxValue = 0
      MinValue = 0
      TabOrder = 0
      Value = 0
    end
    object YEdit: TSpinEdit
      Left = 16
      Top = 72
      Width = 121
      Height = 22
      MaxValue = 0
      MinValue = 0
      TabOrder = 1
      Value = 0
    end
  end
end