📄 pd.dfm

📁 窗口中的多个文本框的值使用循环方式取得
💻 DFM
📖 第 1 页 / 共 4 页
字号:
上一页 1 2 34
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 42
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit44: TEdit
    Left = 324
    Top = 304
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 43
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit45: TEdit
    Left = 324
    Top = 335
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 44
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit46: TEdit
    Left = 324
    Top = 366
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 45
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit47: TEdit
    Left = 324
    Top = 397
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 46
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit48: TEdit
    Left = 324
    Top = 428
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 47
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit49: TEdit
    Left = 324
    Top = 459
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 48
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit50: TEdit
    Left = 324
    Top = 490
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 49
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit51: TEdit
    Left = 324
    Top = 521
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 50
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit52: TEdit
    Left = 468
    Top = 25
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 51
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit53: TEdit
    Left = 468
    Top = 56
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 52
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit54: TEdit
    Left = 468
    Top = 87
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 53
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit55: TEdit
    Left = 468
    Top = 118
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 54
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit56: TEdit
    Left = 468
    Top = 149
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 55
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit57: TEdit
    Left = 468
    Top = 180
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 56
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit58: TEdit
    Left = 468
    Top = 211
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 57
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit59: TEdit
    Left = 468
    Top = 242
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 58
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit60: TEdit
    Left = 468
    Top = 273
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 59
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit61: TEdit
    Left = 468
    Top = 304
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 60
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit62: TEdit
    Left = 468
    Top = 335
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 61
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit63: TEdit
    Left = 468
    Top = 366
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 62
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit64: TEdit
    Left = 468
    Top = 397
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 63
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit65: TEdit
    Left = 468
    Top = 428
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 64
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit66: TEdit
    Left = 468
    Top = 459
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 65
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit67: TEdit
    Left = 468
    Top = 490
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 66
  end
  object Edit68: TEdit
    Left = 468
    Top = 521
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 67
  end
  object Edit69: TEdit
    Left = 656
    Top = 25
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 68
    OnClick = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit70: TEdit
    Left = 656
    Top = 57
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 69
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit71: TEdit
    Left = 656
    Top = 89
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 70
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit72: TEdit
    Left = 656
    Top = 121
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 71
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit73: TEdit
    Left = 656
    Top = 154
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 72
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit74: TEdit
    Left = 656
    Top = 186
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 73
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit75: TEdit
    Left = 656
    Top = 218
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 74
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit76: TEdit
    Left = 656
    Top = 250
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 75
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit77: TEdit
    Left = 656
    Top = 283
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 76
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit78: TEdit
    Left = 656
    Top = 315
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 77
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit79: TEdit
    Left = 656
    Top = 347
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 78
  end
  object Edit80: TEdit
    Left = 656
    Top = 380
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 79
  end
  object Edit81: TEdit
    Left = 656
    Top = 421
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 80
    OnChange = Edit1Change
    OnKeyPress = Edit1KeyPress
  end
  object Edit82: TEdit
    Left = 656
    Top = 457
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 81
  end
  object Edit83: TEdit
    Left = 656
    Top = 493
    Width = 60
    Height = 28
    AutoSize = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 82
  end
end
上一页 1 2 34
⌨️ 快捷键说明

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