?? plan.dfm
字號:
object PlanForm: TPlanForm
Left = 160
Top = 93
BorderStyle = bsToolWindow
Caption = #25945#23398#35745#21010#31649#29702
ClientHeight = 423
ClientWidth = 753
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 343
Width = 88
Height = 20
Caption = ' '#29677#32423#21517#31216' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 10
Top = 388
Width = 84
Height = 20
Caption = ' '#21608#24635#35838#26102' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 8
Top = 38
Width = 92
Height = 20
Caption = ' '#36873#25321#24180#32423' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 8
Top = 104
Width = 92
Height = 20
Caption = ' '#29677#32423#32534#21495' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBGrid1: TDBGrid
Left = 104
Top = 42
Width = 625
Height = 289
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'Course_Id'
Title.Caption = #35838#31243#32534#21495
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 75
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Class_ID'
Title.Caption = ' '#29677#32423#32534#21495
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 144
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Course_Type'
Title.Caption = ' '#35838#31243#31867#22411
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 144
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CPer_Week'
ReadOnly = True
Title.Caption = ' '#21608#35838#26102
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 128
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Course_Priority'
Title.Caption = ' '#20248#20808#32423
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -16
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
Width = 92
Visible = True
end>
end
object DBNavigator1: TDBNavigator
Left = 384
Top = 5
Width = 200
Height = 33
DataSource = DataSource1
ParentShowHint = False
ShowHint = True
TabOrder = 1
Visible = False
end
object Button1: TButton
Left = 218
Top = 338
Width = 79
Height = 32
Caption = #39318#26465
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 218
Top = 380
Width = 79
Height = 33
Caption = #22686#21152
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button2Click
end
object Button3: TButton
Left = 350
Top = 337
Width = 79
Height = 33
Caption = #19978#19968#26465
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = Button3Click
end
object Button4: TButton
Left = 350
Top = 377
Width = 79
Height = 33
Caption = #21024#38500
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = Button4Click
end
object Button5: TButton
Left = 494
Top = 338
Width = 73
Height = 33
Caption = #19979#19968#26465
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = Button5Click
end
object Button6: TButton
Left = 494
Top = 378
Width = 73
Height = 33
Caption = #32534#36753
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = Button6Click
end
object Button7: TButton
Left = 642
Top = 338
Width = 71
Height = 33
Caption = #23614#26465
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = Button7Click
end
object Button8: TButton
Left = 642
Top = 378
Width = 73
Height = 33
Caption = #25764#38144
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = Button8Click
end
object Edit1: TEdit
Left = 104
Top = 338
Width = 89
Height = 28
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
end
object Edit2: TEdit
Left = 104
Top = 386
Width = 89
Height = 28
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
end
object ListBox1: TListBox
Left = 8
Top = 136
Width = 89
Height = 187
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 20
ParentFont = False
TabOrder = 12
OnClick = ListBox1Click
end
object ComboBox1: TComboBox
Left = 8
Top = 64
Width = 97
Height = 28
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 20
ParentFont = False
TabOrder = 13
OnChange = ComboBox1Change
Items.Strings = (
'1 '#24180#32423
'2 '#24180#32423
'3 '#24180#32423
'4 '#24180#32423)
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 344
Top = 11
end
object ADOTable1: TADOTable
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=Stud'
CursorType = ctStatic
TableName = 'plans'
Left = 304
Top = 11
end
object ADOQuery1: TADOQuery
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=Stud'
DataSource = DataSource1
Parameters = <>
Left = 264
Top = 11
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -