📄 pd.dfm

📁 窗口中的多个文本框的值使用循环方式取得
💻 DFM
📖 第 1 页 / 共 4 页
字号:
12 3 4 下一页
object pdform: Tpdform
  Left = 258
  Top = 116
  Width = 730
  Height = 580
  Caption = #30424#24213#35745#31639#22788#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAAAAAAAFFFCCCCCFFFFFFFFFFFFFFF
    AAAAAAAAAAFFCCCCCFFFFFFFFFFFFFFFAAAAAAAAAAAFCCCCCFFFFFFFFFFFFFFA
    AAAAFFFAAAAACCCCCFFFFFFFFFFFFFFAAAAAFFFAAAAACCCCCFFFFFFFFFFFFFFF
    FFFFFFFAAAAACCCCCCCCCCFFFFFFFFFFFFFAAAAAAAAACCCCCCCCCCCFFFFFFFFF
    FAAAAAAAAAAFCCCCCCCCCCCCFFFFFFFFAAAAAAAAAAFFCCCCCFFFCCCCCFFFFFFA
    AAAAAAAFFFFFCCCCCFFFCCCCCFFFFFFAAAAAAFFFAAAACCCCCFFFCCCCCFFFFFFA
    AAAAFFFAAAAACCCCCFFFCCCCCFFFFFFFAAAAAAAAAAAFCCCCCCCCCCCCCFFFFFFF
    AAAAAAAAAAFFCCCCCCCCCCCCFFFFFFFFFFAAAAAAAAFFCCCCCCCCCCCFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9999999FFFFFF9999999FFFFFFFFFF
    FF9999999FFFFFF9999999FFFFFFFFFFFF9999999FFFFFF9999999FFFFFFFFFF
    FF9999999FFFFFF9999999FFFFFFFFFFFF9999999FFFFFF9999999FFFFFFFFFF
    FF99999999999999999999FFFFFFFFFFFF99999999999999999999FFFFFFFFFF
    FF99999999999999999999FFFFFFFFFFFF99999999999999999999FFFFFFFFFF
    FF9999999FFFFFF9999999FFFFFFFFFFFF9999999FFFFFF9999999FFFFFFFFFF
    FF9999999FFFFFF9999999FFFFFFFFFFFF9999999FFFFFF9999999FFFFFFFFFF
    FF9999999FFFFFF9999999FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 28
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '01'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 59
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '02'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 8
    Top = 90
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '03'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 8
    Top = 121
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '04'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 8
    Top = 152
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '05'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 8
    Top = 183
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '06'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 8
    Top = 214
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '07'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 8
    Top = 245
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '08'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 8
    Top = 276
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '09'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 8
    Top = 307
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '10'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 8
    Top = 338
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '11'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 8
    Top = 369
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '12'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 8
    Top = 400
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '13'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 8
    Top = 431
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '14'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 8
    Top = 462
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '15'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label16: TLabel
    Left = 8
    Top = 493
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '16'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label17: TLabel
    Left = 8
    Top = 524
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '17'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label18: TLabel
    Left = 123
    Top = 28
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '18'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label19: TLabel
    Left = 123
    Top = 59
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '19'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label20: TLabel
    Left = 123
    Top = 90
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '20'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label21: TLabel
    Left = 123
    Top = 121
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '21'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label22: TLabel
    Left = 123
    Top = 152
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '22'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label23: TLabel
    Left = 123
    Top = 183
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '23'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label24: TLabel
    Left = 123
    Top = 214
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '24'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label25: TLabel
    Left = 123
    Top = 245
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '25'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label26: TLabel
    Left = 123
    Top = 276
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '26'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label27: TLabel
    Left = 123
    Top = 307
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '27'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label28: TLabel
    Left = 123
    Top = 338
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '28'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label29: TLabel
    Left = 123
    Top = 369
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '29'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label30: TLabel
    Left = 123
    Top = 400
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '30'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label31: TLabel
    Left = 123
    Top = 431
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '31'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label32: TLabel
    Left = 123
    Top = 462
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '32'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label33: TLabel
    Left = 123
    Top = 493
    Width = 45
    Height = 20
    AutoSize = False
    Caption = #39044#30041
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label34: TLabel
    Left = 123
    Top = 524
    Width = 45
    Height = 20
    AutoSize = False
    Caption = #23567#35745
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label35: TLabel
    Left = 268
    Top = 28
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '01'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label36: TLabel
    Left = 268
    Top = 59
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '02'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label37: TLabel
    Left = 268
    Top = 90
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '03'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label38: TLabel
    Left = 268
    Top = 121
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '04'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label39: TLabel
    Left = 268
    Top = 152
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '05'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label40: TLabel
    Left = 268
    Top = 183
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '06'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label41: TLabel
    Left = 268
    Top = 214
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '07'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label42: TLabel
    Left = 268
    Top = 245
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '08'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label43: TLabel
    Left = 268
    Top = 276
    Width = 45
    Height = 20
    AutoSize = False
    Caption = '09'#31508
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label44: TLabel
    Left = 268
12 3 4 下一页
⌨️ 快捷键说明

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