?? sydcx1.dfm
字號:
object sydcx: Tsydcx
Left = 309
Top = 149
Width = 578
Height = 420
BorderIcons = [biSystemMenu]
Caption = '查找損溢單'
Color = clBtnFace
DefaultMonitor = dmMainForm
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 356
Width = 570
Height = 37
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object BitBtn1: TBitBtn
Left = 344
Top = 8
Width = 75
Height = 25
Caption = '確定'
TabOrder = 0
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 432
Top = 8
Width = 75
Height = 25
Caption = '取消'
TabOrder = 1
Kind = bkCancel
end
end
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 570
Height = 356
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = 'code'
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
Color = 15524050
Font.Charset = GB2312_CHARSET
Font.Color = 7479077
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
TabOrder = 1
OnDblClick = dxDBGrid1DblClick
BandFont.Charset = GB2312_CHARSET
BandFont.Color = clWindowText
BandFont.Height = -12
BandFont.Name = '宋體'
BandFont.Style = []
DataSource = DataSource1
Filter.Active = True
Filter.Criteria = {00000000}
GridLineColor = clNavy
HeaderFont.Charset = GB2312_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -12
HeaderFont.Name = '宋體'
HeaderFont.Style = []
LookAndFeel = lfFlat
OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoMultiSort, edgoStoreToRegistry, edgoTabThrough, edgoVertThrough]
OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoSmartRefresh, edgoSmartReload, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoRowSelect, edgoUseBitmap]
PreviewFont.Charset = DEFAULT_CHARSET
PreviewFont.Color = clBlue
PreviewFont.Height = -12
PreviewFont.Name = '宋體'
PreviewFont.Style = []
RegistryPath = '\Software\server\sydcx'
object dxDBGrid1code: TdxDBGridMaskColumn
BandIndex = 0
RowIndex = 0
FieldName = 'code'
end
object dxDBGrid1kdrq: TdxDBGridDateColumn
Width = 80
BandIndex = 0
RowIndex = 0
FieldName = 'kdrq'
end
object dxDBGrid1lx: TdxDBGridMaskColumn
Width = 62
BandIndex = 0
RowIndex = 0
FieldName = 'lx'
end
object dxDBGrid1dkr: TdxDBGridMaskColumn
Width = 88
BandIndex = 0
RowIndex = 0
FieldName = 'dkr'
end
object dxDBGrid1ck: TdxDBGridMaskColumn
Width = 67
BandIndex = 0
RowIndex = 0
FieldName = 'ck'
end
object dxDBGrid1ckname: TdxDBGridMaskColumn
Width = 162
BandIndex = 0
RowIndex = 0
FieldName = 'ckname'
end
object dxDBGrid1ywy: TdxDBGridMaskColumn
Width = 67
BandIndex = 0
RowIndex = 0
FieldName = 'ywy'
end
object dxDBGrid1ywyname: TdxDBGridMaskColumn
Width = 95
BandIndex = 0
RowIndex = 0
FieldName = 'ywyname'
end
object dxDBGrid1zt: TdxDBGridMaskColumn
Width = 93
BandIndex = 0
RowIndex = 0
FieldName = 'zt'
end
object dxDBGrid1bz: TdxDBGridMaskColumn
Width = 174
BandIndex = 0
RowIndex = 0
FieldName = 'bz'
end
end
object ADOQuery1: TADOQuery
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from sydcx_v')
Left = 256
Top = 176
object ADOQuery1code: TStringField
DisplayLabel = '單號'
FieldName = 'code'
end
object ADOQuery1kdrq: TDateTimeField
DisplayLabel = '開單日期'
FieldName = 'kdrq'
end
object ADOQuery1dkr: TStringField
DisplayLabel = '操作員編碼'
FieldName = 'dkr'
Size = 6
end
object ADOQuery1ck: TStringField
DisplayLabel = '倉庫'
FieldName = 'ck'
Size = 5
end
object ADOQuery1ckname: TStringField
DisplayLabel = '倉庫'
FieldName = 'ckname'
Size = 200
end
object ADOQuery1ywy: TStringField
DisplayLabel = '業務員'
FieldName = 'ywy'
Size = 5
end
object ADOQuery1ywyname: TStringField
DisplayLabel = '業務員'
FieldName = 'ywyname'
Size = 10
end
object ADOQuery1bz: TStringField
DisplayLabel = '備注'
FieldName = 'bz'
Size = 250
end
object ADOQuery1lx: TStringField
DisplayLabel = '類型'
FieldName = 'lx'
Size = 4
end
object ADOQuery1zt: TStringField
DisplayLabel = '單據狀態'
FieldName = 'zt'
Size = 10
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 304
Top = 176
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -