?? ywyxx.dfm
字號:
object frmywyxx: Tfrmywyxx
Left = 69
Top = 118
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = '業務員信息'
ClientHeight = 241
ClientWidth = 654
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object DBGrid1: TDBGrid
Left = 5
Top = 0
Width = 401
Height = 237
DataSource = DataSource_ywy
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋體'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Expanded = False
FieldName = 'ywy_bh'
Title.Alignment = taCenter
Title.Caption = '編號'
Width = 79
Visible = True
end
item
Expanded = False
FieldName = 'ywy_xm'
Title.Alignment = taCenter
Title.Caption = '業務員姓名'
Width = 81
Visible = True
end
item
Expanded = False
FieldName = 'xb'
Title.Alignment = taCenter
Title.Caption = '性別'
Width = 57
Visible = True
end
item
Expanded = False
FieldName = 'nl'
Title.Alignment = taCenter
Title.Caption = '年齡'
Width = 51
Visible = True
end
item
Expanded = False
FieldName = 'bm_mc'
Title.Alignment = taCenter
Title.Caption = '部門名稱'
Width = 85
Visible = True
end>
end
object GroupBox1: TGroupBox
Left = 412
Top = 6
Width = 237
Height = 163
Caption = '業務員信息'
TabOrder = 1
object Label2: TLabel
Left = 8
Top = 29
Width = 36
Height = 12
Caption = '姓 名'
end
object Label3: TLabel
Left = 8
Top = 61
Width = 36
Height = 12
Caption = '性 別'
end
object Label4: TLabel
Left = 8
Top = 125
Width = 48
Height = 12
Caption = '部門名稱'
end
object Label1: TLabel
Left = 8
Top = 94
Width = 36
Height = 12
Caption = '年 齡'
end
object Edit_mc: TEdit
Left = 64
Top = 24
Width = 153
Height = 20
TabOrder = 0
end
object Edit_nl: TEdit
Left = 64
Top = 88
Width = 153
Height = 20
CharCase = ecUpperCase
TabOrder = 1
end
object RadioButton1: TRadioButton
Left = 80
Top = 56
Width = 57
Height = 17
Caption = '男'
Checked = True
TabOrder = 2
TabStop = True
end
object RadioButton2: TRadioButton
Left = 136
Top = 56
Width = 57
Height = 17
Caption = '女'
TabOrder = 3
end
object ComboBox1: TComboBox
Left = 64
Top = 120
Width = 153
Height = 20
ItemHeight = 12
TabOrder = 4
end
end
object BitBtn1: TBitBtn
Left = 456
Top = 178
Width = 75
Height = 25
Caption = '&A添加'
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 553
Top = 178
Width = 75
Height = 25
Caption = '更改屬性'
TabOrder = 3
OnClick = BitBtn2Click
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 553
Top = 210
Width = 75
Height = 25
Caption = '&X退出'
TabOrder = 4
OnClick = BitBtn3Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object btnDel: TBitBtn
Left = 456
Top = 210
Width = 75
Height = 25
Caption = '刪除'
TabOrder = 5
OnClick = btnDelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object Query_bm: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 96
Top = 56
end
object Query_ywy: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 176
Top = 56
object Query_ywyywy_bh: TStringField
FieldName = 'ywy_bh'
Origin = 'YYGL.ywyb.ywy_bh'
Size = 3
end
object Query_ywyywy_xm: TStringField
FieldName = 'ywy_xm'
Origin = 'YYGL.ywyb.ywy_xm'
Size = 8
end
object Query_ywyxb: TStringField
FieldName = 'xb'
Origin = 'YYGL.ywyb.xb'
Size = 2
end
object Query_ywynl: TStringField
FieldName = 'nl'
Origin = 'YYGL.ywyb.nl'
Size = 2
end
object Query_ywybm_bh: TStringField
FieldName = 'bm_bh'
Origin = 'YYGL.ywyb.bm_bh'
Size = 2
end
object Query_ywybm_mc: TStringField
FieldKind = fkLookup
FieldName = 'bm_mc'
LookupDataSet = Query_bm
LookupKeyFields = 'bm_bh'
LookupResultField = 'bm_mc'
KeyFields = 'bm_bh'
Size = 10
Lookup = True
end
end
object DataSource_ywy: TDataSource
DataSet = Query_ywy
Left = 176
Top = 88
end
object Query_bhb: TQuery
DatabaseName = 'yygl'
RequestLive = True
Left = 136
Top = 56
end
object Database: TDatabase
AliasName = 'yygl'
Connected = True
DatabaseName = 'yygl'
LoginPrompt = False
Params.Strings = (
'user name='#39#39
'password='#39#39)
SessionName = 'Default'
TransIsolation = tiRepeatableRead
Left = 112
Top = 24
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -