📄 unqkbasic.dfm
字号:
object frmqkbasic: Tfrmqkbasic
Left = 0
Top = 0
Width = 800
Height = 585
ConnectionMode = cmAny
SupportedBrowsers = [brIE, brNetscape7, brOpera, brNetscape6]
OnCreate = IWAppFormCreate
BGColor = clWebALICEBLUE
LinkColor = clWebBLUE
VLinkColor = clWebBLUE
BrowserSecurityCheck = True
Background.Fixed = False
HandleTabs = False
LockUntilLoaded = True
LockOnSubmit = True
UpdateMode = umAll
DesignLeft = 192
DesignTop = 305
object IWDBGrid1: TIWDBGrid
Left = 18
Top = 102
Width = 761
Height = 228
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
BorderColors.Color = clNone
BorderColors.Light = clNone
BorderColors.Dark = clNone
BGColor = clNone
BorderSize = 1
BorderStyle = tfVertSides
CellPadding = 0
CellSpacing = 0
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
FrameBuffer = 40
Lines = tlAll
OnRenderCell = IWDBGrid1RenderCell
UseFrame = True
UseSize = True
Columns = <
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'Name'
LinkField = 'Name'
RawText = False
OnClick = IWDBGrid1Columns0Click
Title.Alignment = taCenter
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #26399#21002#21517
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'yfdh'
RawText = False
Title.Alignment = taCenter
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #37038#21457#20195#21495
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'publish'
RawText = False
Title.Alignment = taCenter
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #20986#29256#31038
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end
item
Alignment = taLeftJustify
BGColor = clNone
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Header = False
Height = '0'
VAlign = vaMiddle
Visible = True
Width = '0'
Wrap = False
BlobCharLimit = 0
CompareHighlight = hcNone
DataField = 'type'
RawText = False
Title.Alignment = taCenter
Title.BGColor = clNone
Title.DoSubmitValidation = True
Title.Font.Color = clNone
Title.Font.Enabled = True
Title.Font.Size = 10
Title.Font.Style = []
Title.Header = False
Title.Height = '0'
Title.Text = #31867#22411
Title.VAlign = vaMiddle
Title.Visible = True
Title.Width = '0'
Title.Wrap = False
end>
DataSource = DataSource1
FooterRowCount = 1
FriendlyName = 'IWDBGrid1'
FromStart = True
HighlightColor = clNone
HighlightRows = False
Options = [dgShowTitles]
RefreshMode = rmAutomatic
RowLimit = 15
RollOver = False
RowClick = False
RollOverColor = clNone
RowHeaderColor = clWebLIGHTBLUE
RowAlternateColor = clWebLAVENDER
RowCurrentColor = clWebYELLOW
TabOrder = 0
end
object IWLabel1: TIWLabel
Left = 30
Top = 45
Width = 132
Height = 24
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clWebBLUE
Font.Enabled = True
Font.Size = 14
Font.Style = [fsBold]
NoWrap = False
FriendlyName = 'IWLabel1'
Caption = #26032#26399#21002#24405#20837
RawText = False
end
object IWHRule1: TIWHRule
Left = 22
Top = 78
Width = 745
Height = 7
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
FriendlyName = 'IWHRule1'
end
object IWLabel2: TIWLabel
Left = 22
Top = 344
Width = 52
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
FriendlyName = 'IWLabel2'
Caption = #26399#21002#21517
RawText = False
end
object IWLabel3: TIWLabel
Left = 454
Top = 370
Width = 70
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
FriendlyName = 'IWLabel3'
Caption = #37038#21457#20195#21495
RawText = False
end
object IWLabel4: TIWLabel
Left = 22
Top = 372
Width = 52
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
FriendlyName = 'IWLabel4'
Caption = #20986#29256#31038
RawText = False
end
object IWLabel5: TIWLabel
Left = 454
Top = 344
Width = 35
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
NoWrap = False
FriendlyName = 'IWLabel5'
Caption = #31867#22411
RawText = False
end
object IWLabel14: TIWLabel
Left = 23
Top = 396
Width = 44
Height = 20
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = False
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clWebCORNFLOWERBLUE
Font.Enabled = True
Font.Size = 12
Font.Style = [fsBold]
NoWrap = False
FriendlyName = 'IWLabel14'
Caption = #22791#27880
RawText = False
end
object IWButton1: TIWButton
Left = 28
Top = 503
Width = 60
Height = 33
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
ButtonType = btButton
Caption = #28155' '#21152
Color = clWebSTEELBLUE
DoSubmitValidation = True
Font.Color = clCream
Font.Enabled = True
Font.Size = 10
Font.Style = []
FriendlyName = 'IWButton1'
ScriptEvents = <>
TabOrder = 0
OnClick = IWButton1Click
end
object IWButton2: TIWButton
Left = 714
Top = 504
Width = 60
Height = 33
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
ButtonType = btButton
Caption = #21024' '#38500
Color = clWebSTEELBLUE
Confirmation = #24744#30830#23454#35201#21024#38500#36825#26465#35760#24405#21527
DoSubmitValidation = True
Font.Color = clCream
Font.Enabled = True
Font.Size = 10
Font.Style = []
FriendlyName = 'IWButton2'
ScriptEvents = <>
TabOrder = 0
OnClick = IWButton2Click
end
object IWButton3: TIWButton
Left = 117
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -