?? unit5.dfm
字號:
object FormPayMan: TFormPayMan
Left = 214
Top = 128
Width = 426
Height = 320
Caption = #32467#36134#24211#32500#25252
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 0
Top = 34
Width = 401
Height = 169
DataSource = DataSourcePay
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'TableNum'
Title.Caption = #39184#26700#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'ShouldPay'
Title.Caption = #24212#20184
Width = 41
Visible = True
end
item
Expanded = False
FieldName = 'ActuallyPay'
Title.Caption = #23454#20184
Width = 39
Visible = True
end
item
Expanded = False
FieldName = 'Charge'
Title.Caption = #25214#38646
Width = 33
Visible = True
end
item
Expanded = False
FieldName = 'Date'
Title.Caption = #26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'Time'
Title.Caption = #26102#38388
Visible = True
end
item
Expanded = False
FieldName = 'UserID'
Title.Caption = #25805#20316#21592
Visible = True
end>
end
object DBNavigator1: TDBNavigator
Left = 80
Top = 2
Width = 240
Height = 25
DataSource = DataSourcePay
Hints.Strings = (
#36339#33267#31532#19968#20010#32426#24405
#36339#33267#21069#19968#20010#35760#24405
#36339#33267#21518#19968#20010#35760#24405
#36339#33267#26368#21518#19968#20010#35760#24405
#25554#20837#32426#24405
#21024#38500#32426#24405
#32534#36753#32426#24405
#20445#23384#20462#25913
#21462#28040#20462#25913
#21047#26032#25968#25454)
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object DBMemo1: TDBMemo
Left = 8
Top = 220
Width = 401
Height = 65
DataField = 'Description'
DataSource = DataSourcePay
ScrollBars = ssVertical
TabOrder = 2
end
object StaticText1: TStaticText
Left = 8
Top = 204
Width = 52
Height = 17
Caption = #25551#36848#20449#24687
TabOrder = 3
end
object DataSourcePay: TDataSource
DataSet = TablePay
Left = 192
Top = 138
end
object TablePay: TTable
DatabaseName = 'Ch14'
TableName = 'Pay.db'
Left = 152
Top = 138
object TablePayTableNum: TIntegerField
FieldName = 'TableNum'
end
object TablePayShouldPay: TFloatField
FieldName = 'ShouldPay'
end
object TablePayActuallyPay: TFloatField
FieldName = 'ActuallyPay'
end
object TablePayCharge: TFloatField
FieldName = 'Charge'
end
object TablePayDate: TDateField
FieldName = 'Date'
end
object TablePayTime: TTimeField
FieldName = 'Time'
end
object TablePayDescription: TMemoField
FieldName = 'Description'
BlobType = ftMemo
Size = 100
end
object TablePayUserID: TIntegerField
FieldName = 'UserID'
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -