📄 frmcreaterequestorder.dfm
字号:
object FormCreateRequestOrder: TFormCreateRequestOrder
Left = 193
Top = 105
Width = 544
Height = 375
Caption = #29983#25104#35831#36141#21333
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
KeyPreview = True
OldCreateOrder = False
OnCreate = FormCreate
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 56
Top = 48
Width = 36
Height = 12
Caption = #21333#21495#65306
end
object Label2: TLabel
Left = 248
Top = 48
Width = 72
Height = 12
Caption = #35831#36141#20154#32534#21495#65306
end
object BtnBegin: TButton
Left = 144
Top = 8
Width = 89
Height = 25
Caption = #26032#24314#35831#36141#21333
TabOrder = 0
OnClick = BtnBeginClick
end
object BtnEnd: TButton
Left = 280
Top = 8
Width = 113
Height = 25
Caption = #35831#36141#21333#21019#24314#23436#27605
Enabled = False
TabOrder = 1
OnClick = BtnEndClick
end
object DBEdtId: TDBEdit
Left = 104
Top = 48
Width = 121
Height = 20
DataField = 'Id'
DataSource = DSMaster
Enabled = False
ReadOnly = True
TabOrder = 2
end
object DBEdtOperatorId: TDBEdit
Left = 320
Top = 48
Width = 145
Height = 20
DataField = 'RequestOperatorId'
DataSource = DSMaster
TabOrder = 3
end
object Button3: TButton
Left = 480
Top = 48
Width = 41
Height = 17
Caption = '...'
TabOrder = 4
OnClick = Button3Click
end
object GroupBox1: TGroupBox
Left = 8
Top = 88
Width = 521
Height = 249
Caption = #35831#36141#21333#35814#32454#20449#24687
TabOrder = 5
object Label3: TLabel
Left = 16
Top = 56
Width = 36
Height = 12
Caption = #26465#30721#65306
end
object Label4: TLabel
Left = 272
Top = 64
Width = 36
Height = 12
Caption = #25968#37327#65306
end
object Label5: TLabel
Left = 16
Top = 96
Width = 84
Height = 12
Caption = #39044#23450#25910#36135#26085#26399#65306
end
object LCDBOperatTool1: TLCDBOperatTool
Left = 16
Top = 16
Width = 489
Height = 25
Enabled = False
VisibleBtn = [tbAdd, tbDel, tbEdit, tbPost, tbCancel]
EnabledBtn = [tbAdd, tbDel, tbEdit]
DataSource = DSSlave
OnModeChange = LCDBOperatTool1ModeChange
end
object DBEdtBarCode: TDBEdit
Left = 64
Top = 56
Width = 105
Height = 20
DataField = 'BarCode'
DataSource = DSSlave
Enabled = False
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 336
Top = 56
Width = 129
Height = 20
DataField = 'Amount'
DataSource = DSSlave
Enabled = False
TabOrder = 2
end
object DBDateTimePicker1: TDBDateTimePicker
Left = 112
Top = 88
Width = 105
Height = 20
Date = 38196.693087476850000000
Time = 38196.693087476850000000
Enabled = False
TabOrder = 3
DataField = 'ReceivableDate'
DataSource = DSSlave
ReadOnly = False
end
object DBGrid1: TDBGrid
Left = 8
Top = 112
Width = 505
Height = 120
DataSource = DSSlave
Enabled = False
TabOrder = 4
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'BarCode'
Title.Caption = #26465#30721
Visible = True
end
item
Expanded = False
FieldName = 'Amount'
Title.Caption = #25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'ReceivableDate'
Title.Caption = #39044#23450#25910#36135#26085#26399
Width = 117
Visible = True
end>
end
object Button1: TButton
Left = 176
Top = 56
Width = 41
Height = 17
Caption = '...'
Enabled = False
TabOrder = 5
OnClick = Button1Click
end
end
object BtnPrint: TButton
Left = 416
Top = 8
Width = 89
Height = 25
Caption = #25171#21360#27492#21333
Enabled = False
TabOrder = 6
OnClick = BtnPrintClick
end
object ADOCon: TADOConnection
Connected = True
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=GoodsManagementSystem_Data;Data Source=' +
'127.0.0.1'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 32
Top = 16
end
object ADOQMaster: TADOQuery
Connection = ADOCon
CursorType = ctStatic
LockType = ltBatchOptimistic
Parameters = <>
Prepared = True
SQL.Strings = (
'select * from t_RequestOrderListMaster where 1=2')
Left = 88
Top = 16
end
object ADOQSlave: TADOQuery
Connection = ADOCon
CursorType = ctStatic
LockType = ltBatchOptimistic
Parameters = <>
Prepared = True
SQL.Strings = (
'select * from t_RequestOrderListSlave where 1=2')
Left = 112
Top = 136
end
object DSMaster: TDataSource
DataSet = ADOQMaster
Left = 184
Top = 16
end
object DSSlave: TDataSource
DataSet = ADOQSlave
Left = 184
Top = 72
end
object ADOQInfo: TADOQuery
Connection = ADOCon
LockType = ltBatchOptimistic
Parameters = <>
Prepared = True
SQL.Strings = (
'select * from t_RequestOrderListSlave where 1=2')
Left = 88
Top = 72
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -