form_worksel.dfm

来自「一个电力企业的后台管理程序」· DFM 代码 · 共 123 行

object Frm_WorkSel: TFrm_WorkSel
  Left = 192
  Top = 133
  Width = 328
  Height = 318
  Caption = '工号选择'
  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 Pl_Main: TPanel
    Left = 0
    Top = 0
    Width = 320
    Height = 291
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 0
    object GB_SelWork: TGroupBox
      Left = 7
      Top = 9
      Width = 129
      Height = 230
      Caption = '待选工号'
      TabOrder = 0
      object LB_SelWork: TListBox
        Left = 2
        Top = 15
        Width = 125
        Height = 213
        Align = alClient
        ImeName = '中文 (简体) - 微软拼音'
        ItemHeight = 13
        MultiSelect = True
        TabOrder = 0
      end
    end
    object GB_SeledWork: TGroupBox
      Left = 180
      Top = 9
      Width = 129
      Height = 230
      Caption = '已选工号'
      TabOrder = 1
      object LB_SeledWork: TListBox
        Left = 2
        Top = 15
        Width = 125
        Height = 213
        Align = alClient
        ImeName = '中文 (简体) - 微软拼音'
        ItemHeight = 13
        MultiSelect = True
        TabOrder = 0
      end
    end
    object Panel2: TPanel
      Left = 142
      Top = 15
      Width = 33
      Height = 223
      BevelOuter = bvLowered
      TabOrder = 2
      object Sb_InAll: TSpeedButton
        Left = 5
        Top = 15
        Width = 23
        Height = 22
        Caption = '  》'
        OnClick = Sb_InAllClick
      end
      object Sb_InOne: TSpeedButton
        Left = 5
        Top = 72
        Width = 23
        Height = 23
        Caption = '  〉'
        OnClick = Sb_InOneClick
      end
      object Sb_OutOne: TSpeedButton
        Left = 5
        Top = 127
        Width = 23
        Height = 22
        Caption = '〈'
        OnClick = Sb_OutOneClick
      end
      object Sb_OutAll: TSpeedButton
        Left = 5
        Top = 187
        Width = 23
        Height = 22
        Caption = '《'
        OnClick = Sb_OutAllClick
      end
    end
    object Btn_Ok: TBitBtn
      Left = 145
      Top = 256
      Width = 75
      Height = 25
      Caption = '确认'
      TabOrder = 3
      OnClick = Btn_OkClick
    end
    object Btn_Cancel: TBitBtn
      Left = 233
      Top = 256
      Width = 75
      Height = 25
      Caption = '取消'
      TabOrder = 4
      OnClick = Btn_CancelClick
    end
  end
end