unitsupdetail_data.~dfm

来自「自己做过的工程」· ~DFM 代码 · 共 203 行

~DFM
203
字号
object formsupdetail_data: Tformsupdetail_data
  Left = 127
  Top = 104
  BorderStyle = bsDialog
  Caption = #23458#20154#25509#24453#24405#20837
  ClientHeight = 387
  ClientWidth = 549
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 313
    Width = 549
    Height = 74
    Align = alBottom
    BorderStyle = bsSingle
    TabOrder = 0
    object but_ok: TButton
      Left = 112
      Top = 19
      Width = 81
      Height = 33
      Caption = #30830#23450
      Default = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = but_okClick
    end
    object but_cancel: TButton
      Left = 344
      Top = 19
      Width = 81
      Height = 33
      Caption = #21462#28040
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = but_cancelClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 549
    Height = 313
    Align = alClient
    BorderStyle = bsSingle
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 132
      Width = 56
      Height = 14
      Caption = #23458#20154#22995#21517
    end
    object Label2: TLabel
      Left = 9
      Top = 94
      Width = 56
      Height = 14
      Caption = #21253#38388#32534#21495
    end
    object Label3: TLabel
      Left = 40
      Top = 172
      Width = 28
      Height = 14
      Caption = #20154#25968
    end
    object Label4: TLabel
      Left = 39
      Top = 208
      Width = 28
      Height = 14
      Caption = #22791#27880
    end
    object Label6: TLabel
      Left = 288
      Top = 96
      Width = 28
      Height = 14
      Caption = #26700#21495
    end
    object ed_username: TEdit
      Left = 80
      Top = 126
      Width = 145
      Height = 22
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 1
    end
    object ed_sroomno: TEdit
      Left = 79
      Top = 86
      Width = 145
      Height = 22
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 0
    end
    object ed_userno: TEdit
      Left = 80
      Top = 166
      Width = 145
      Height = 22
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 2
    end
    object riched_remark: TRichEdit
      Left = 80
      Top = 208
      Width = 393
      Height = 89
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      TabOrder = 3
    end
    object RadioGroup1: TRadioGroup
      Left = 48
      Top = 8
      Width = 457
      Height = 65
      Caption = #25509#24453#26041#24335
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object rbut_sroom: TRadioButton
      Left = 155
      Top = 35
      Width = 65
      Height = 17
      Caption = #21253#38388
      Checked = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      TabStop = True
      OnClick = rbut_sroomClick
    end
    object rbut_table: TRadioButton
      Left = 315
      Top = 35
      Width = 57
      Height = 17
      Caption = #25955#24231
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = rbut_tableClick
    end
    object ed_tableno: TEdit
      Left = 327
      Top = 88
      Width = 147
      Height = 22
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 7
    end
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?