📄 uselectcust.dfm
字号:
object SelectCust: TSelectCust
Left = 82
Top = 53
Width = 631
Height = 463
Caption = #36873#25321#23458#25143
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object CoolBar1: TCoolBar
Left = 0
Top = 0
Width = 623
Height = 28
AutoSize = True
Bands = <
item
Control = ToolBar1
ImageIndex = -1
MinHeight = 24
Width = 619
end>
ParentShowHint = False
ShowHint = True
object ToolBar1: TToolBar
Left = 9
Top = 0
Width = 606
Height = 24
AutoSize = True
ButtonWidth = 51
Caption = 'ToolBar1'
Flat = True
Images = Main.Img_Main
List = True
ParentShowHint = False
ShowCaptions = True
ShowHint = True
TabOrder = 0
object ToolButton11: TToolButton
Left = 0
Top = 0
Action = actSelectAll
end
object ToolButton12: TToolButton
Left = 51
Top = 0
Action = actSelectReverse
end
object ToolButton13: TToolButton
Left = 102
Top = 0
Action = actClearSelected
end
object ToolButton14: TToolButton
Left = 153
Top = 0
Width = 8
Caption = 'ToolButton14'
ImageIndex = 16
Style = tbsSeparator
end
object ToolButton15: TToolButton
Left = 161
Top = 0
Action = actOK
end
object ToolButton1: TToolButton
Left = 212
Top = 0
Width = 8
Caption = 'ToolButton1'
ImageIndex = 21
Style = tbsSeparator
end
object ToolButton16: TToolButton
Left = 220
Top = 0
Action = actClose
end
end
end
object pnlTop: TPanel
Left = 0
Top = 28
Width = 623
Height = 26
Align = alTop
TabOrder = 1
object lblTip_InputCond: TLabel
Left = 0
Top = 7
Width = 137
Height = 13
Alignment = taRightJustify
AutoSize = False
BiDiMode = bdLeftToRight
Caption = #36755#20837#26465#20214#21518#25353'"'#26597#35810'"'#65306
ParentBiDiMode = False
Transparent = True
end
object edtValue: TEdit
Left = 144
Top = 5
Width = 141
Height = 17
AutoSelect = False
BevelInner = bvNone
BevelKind = bkFlat
BevelOuter = bvRaised
BiDiMode = bdLeftToRight
BorderStyle = bsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentBiDiMode = False
ParentFont = False
TabOrder = 0
OnKeyDown = edtValueKeyDown
end
object BitBtn1: TBitBtn
Left = 288
Top = 2
Width = 75
Height = 22
Action = actQuery
Caption = #26597#35810
TabOrder = 1
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00000000000000000000000000FF00FF00FF00FF00FF00
FF00FF00FF000000000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF00000000008484840000000000FF00FF00FF00FF00FF00
FF00FF00FF000000000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF0000000000FF00FF0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000FF00FF0000000000FF00FF00FF00FF00FF00
FF00FF00FF000000000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF0000000000FF00FF00FF00FF008484840000000000FF00FF00FF00
FF00FF00FF000000000000000000000000000000000000000000FF00FF00FF00
FF0000000000FF00FF00FF00FF00FF00FF00FF00FF008484840000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
0000FF00FF00FFFFFF00FFFFFF00FF00FF00FF00FF00FF00FF00848484000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
end
end
object pnlCell: TPanel
Left = 0
Top = 54
Width = 623
Height = 382
Align = alClient
BevelOuter = bvLowered
TabOrder = 2
object Cell: TdxDBGrid
Left = 1
Top = 1
Width = 621
Height = 380
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'FID'
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
TabOrder = 0
DataSource = dsMast
Filter.Criteria = {00000000}
GridLineColor = cl3DDkShadow
GroupNodeTextColor = clInactiveBorder
HideFocusRect = True
HideSelection = True
LookAndFeel = lfFlat
OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoStoreToIniFile]
OptionsDB = [edgoCanNavigation, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator]
object COL_NO: TdxDBGridColumn
Caption = #24207#21495
ReadOnly = True
Width = 41
BandIndex = 0
RowIndex = 0
end
object CellColumn0: TdxDBGridCheckColumn
Caption = #36873#25321
Color = clGradientActiveCaption
Width = 35
BandIndex = 0
RowIndex = 0
FieldName = 'FSELECTED'
ValueChecked = '1'
ValueUnchecked = '0'
OnToggleClick = CellColumn0ToggleClick
end
object CellColumn1: TdxDBGridColumn
Caption = #23458#25143#31616#30721
ReadOnly = True
Width = 95
BandIndex = 0
RowIndex = 0
FieldName = 'FSHORT_CODE'
end
object CellColumn2: TdxDBGridColumn
Caption = #23458#25143#20195#30721
ReadOnly = True
Width = 95
BandIndex = 0
RowIndex = 0
FieldName = 'FCODE'
end
object CellColumn3: TdxDBGridColumn
Caption = #23458#25143#21517#31216
ReadOnly = True
Width = 95
BandIndex = 0
RowIndex = 0
FieldName = 'FNAME'
end
object CellColumn4: TdxDBGridColumn
Caption = #32852#31995#20154
ReadOnly = True
Sorted = csDown
Width = 75
BandIndex = 0
RowIndex = 0
FieldName = 'FLINK_MAN'
end
object CellColumn5: TdxDBGridColumn
Caption = #32852#31995#30005#35805
ReadOnly = True
Width = 96
BandIndex = 0
RowIndex = 0
FieldName = 'FTEL1'
end
end
end
object cdsMast: TClientDataSet
Aggregates = <>
Params = <>
Left = 64
Top = 104
end
object dsMast: TDataSource
DataSet = cdsMast
Left = 112
Top = 112
end
object Actions: TActionList
Images = Main.Img_Main
Left = 224
Top = 136
object actFirst: TAction
Category = 'OrderMethod'
Caption = #39318#35760#24405
Hint = #39318#35760#24405'|'#39318#35760#24405
ImageIndex = 0
ShortCut = 16420
OnExecute = actFirstExecute
end
object actPrior: TAction
Category = 'OrderMethod'
Caption = #19978#19968#26465
Hint = #21069#19968#26465'|'#21069#19968#26465#35760#24405
ImageIndex = 1
OnExecute = actPriorExecute
end
object actNext: TAction
Category = 'OrderMethod'
Caption = #19979#19968#26465
Hint = #19979#19968#26465'|'#19979#19968#26465#35760#24405
ImageIndex = 2
OnExecute = actNextExecute
end
object actLast: TAction
Category = 'OrderMethod'
Caption = #23614#35760#24405
Hint = #23614#35760#24405'|'#23614#35760#24405
ImageIndex = 3
ShortCut = 16419
OnExecute = actLastExecute
end
object actQuery: TAction
Category = 'OrderMethod'
Caption = #26597#35810
Hint = #26597#35810'|'#26597#35810
ImageIndex = 12
ShortCut = 114
OnExecute = actQueryExecute
end
object actClose: TAction
Category = 'OrderMethod'
Caption = #20851#38381
Hint = #20851#38381'|'#20851#38381
ImageIndex = 20
ShortCut = 27
OnExecute = actCloseExecute
end
object actOK: TAction
Category = 'OrderMethod'
Caption = #30830#23450
ImageIndex = 38
ShortCut = 16397
OnExecute = actOKExecute
end
object actSelectReverse: TAction
Category = 'OrderMethod'
Caption = #21453#36873
ImageIndex = 41
ShortCut = 16466
OnExecute = actSelectReverseExecute
end
object actClearSelected: TAction
Category = 'OrderMethod'
Caption = #28165#38500
ImageIndex = 15
ShortCut = 16452
OnExecute = actClearSelectedExecute
end
object actSelectAll: TAction
Category = 'OrderMethod'
Caption = #20840#36873
ImageIndex = 39
ShortCut = 16449
OnExecute = actSelectAllExecute
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -