?? cgddcx1.dfm
字號:
object cgddcx: Tcgddcx
Left = 241
Top = 326
Width = 601
Height = 440
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 dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 593
Height = 376
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 = 0
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\cgddcx'
object dxDBGrid1code: TdxDBGridMaskColumn
Width = 75
BandIndex = 0
RowIndex = 0
FieldName = 'code'
end
object dxDBGrid1ghsname: TdxDBGridMaskColumn
Width = 169
BandIndex = 0
RowIndex = 0
FieldName = 'ghsname'
end
object dxDBGrid1zje: TdxDBGridMaskColumn
Width = 69
BandIndex = 0
RowIndex = 0
FieldName = 'zje'
end
object dxDBGrid1jhrq: TdxDBGridDateColumn
Width = 83
BandIndex = 0
RowIndex = 0
FieldName = 'jhrq'
end
object dxDBGrid1jhdz: TdxDBGridMaskColumn
Width = 103
BandIndex = 0
RowIndex = 0
FieldName = 'jhdz'
end
object dxDBGrid1ywy: TdxDBGridMaskColumn
Width = 67
BandIndex = 0
RowIndex = 0
FieldName = 'ywy'
end
object dxDBGrid1kdr: TdxDBGridMaskColumn
Width = 68
BandIndex = 0
RowIndex = 0
FieldName = 'kdr'
end
object dxDBGrid1kdrq: TdxDBGridDateColumn
Width = 81
BandIndex = 0
RowIndex = 0
FieldName = 'kdrq'
end
object dxDBGrid1ghs: TdxDBGridMaskColumn
Width = 95
BandIndex = 0
RowIndex = 0
FieldName = 'ghs'
end
object dxDBGrid1zt: TdxDBGridMaskColumn
Width = 86
BandIndex = 0
RowIndex = 0
FieldName = 'zt'
end
object dxDBGrid1zzzx: TdxDBGridCheckColumn
Width = 86
BandIndex = 0
RowIndex = 0
FieldName = 'zzzx'
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object dxDBGrid1bz: TdxDBGridMaskColumn
Width = 187
BandIndex = 0
RowIndex = 0
FieldName = 'bz'
end
end
object Panel1: TPanel
Left = 0
Top = 376
Width = 593
Height = 37
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object BitBtn1: TBitBtn
Left = 424
Top = 8
Width = 75
Height = 25
Caption = '確定'
TabOrder = 0
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 504
Top = 8
Width = 75
Height = 25
Caption = '取消'
TabOrder = 1
Kind = bkCancel
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 304
Top = 176
end
object ADOQuery1: TADOQuery
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from cgddcx_v')
Left = 256
Top = 176
object ADOQuery1code: TStringField
DisplayLabel = '單號'
FieldName = 'code'
end
object ADOQuery1kdrq: TDateTimeField
DisplayLabel = '開單日期'
FieldName = 'kdrq'
end
object ADOQuery1ghs: TStringField
DisplayLabel = '供貨商編碼'
FieldName = 'ghs'
Size = 5
end
object ADOQuery1ghsname: TStringField
DisplayLabel = '供貨商名稱'
FieldName = 'ghsname'
Size = 200
end
object ADOQuery1kdr: TStringField
DisplayLabel = '開單人'
FieldName = 'kdr'
Size = 10
end
object ADOQuery1jhrq: TDateTimeField
DisplayLabel = '交貨日期'
FieldName = 'jhrq'
end
object ADOQuery1jhdz: TStringField
DisplayLabel = '交貨地址'
FieldName = 'jhdz'
Size = 200
end
object ADOQuery1zje: TBCDField
DisplayLabel = '總金額'
FieldName = 'zje'
Precision = 18
Size = 3
end
object ADOQuery1ywy: TStringField
DisplayLabel = '業(yè)務員'
FieldName = 'ywy'
Size = 10
end
object ADOQuery1bz: TStringField
DisplayLabel = '備注'
FieldName = 'bz'
Size = 200
end
object ADOQuery1zt: TStringField
DisplayLabel = '單據(jù)狀態(tài)'
FieldName = 'zt'
Size = 10
end
object ADOQuery1zzzx: TBooleanField
DisplayLabel = '中止訂單'
FieldName = 'zzzx'
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -