car_select.dfm

来自「软件类别: 数据库 软件大小: 2.60M 运行环境: Win9xNT/」· DFM 代码 · 共 142 行

DFM
142
字号
object frm_Car_Select: Tfrm_Car_Select
  Left = 164
  Top = 146
  Width = 424
  Height = 331
  AutoSize = True
  BorderIcons = []
  Caption = 'frm_Car_Select'
  Color = clSkyBlue
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 15
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 416
    Height = 304
    Align = alClient
    Caption = 'Panel1'
    ParentColor = True
    TabOrder = 0
    object Cmd_Select: TSpeedButton
      Left = 294
      Top = 67
      Width = 52
      Height = 22
      Caption = #36873#25321
      OnClick = Cmd_SelectClick
    end
    object Cmd_Exit: TSpeedButton
      Left = 358
      Top = 67
      Width = 52
      Height = 22
      Caption = #21462#28040
      OnClick = Cmd_ExitClick
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 92
      Width = 414
      Height = 211
      Align = alBottom
      DataSource = frm_Data.DataS_Pro_Car
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -15
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
      Columns = <
        item
          Expanded = False
          FieldName = 'C_NO'
          Title.Caption = #36710#36742#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'C_ID'
          Title.Caption = #36710#29260#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Man'
          Title.Caption = #36710#29482#22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Drive_ID'
          Title.Caption = #34892#39542#35777#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'C_Telphon'
          Title.Caption = #23450#20301#30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Type'
          Title.Caption = #36710#22411
          Visible = True
        end>
    end
    object EditC_NO: TLabeledEdit
      Left = 100
      Top = 16
      Width = 161
      Height = 23
      EditLabel.Width = 75
      EditLabel.Height = 15
      EditLabel.Caption = #36710#36742#32534#21495#65306
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 1
    end
    object EditC_ID: TLabeledEdit
      Left = 100
      Top = 40
      Width = 161
      Height = 23
      EditLabel.Width = 60
      EditLabel.Height = 15
      EditLabel.Caption = #36710#29260#21495#65306
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 2
    end
    object Editman: TLabeledEdit
      Left = 101
      Top = 65
      Width = 161
      Height = 23
      EditLabel.Width = 75
      EditLabel.Height = 15
      EditLabel.Caption = #36710#20027#22995#21517#65306
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 3
    end
  end
end

⌨️ 快捷键说明

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