📄 unit1.dfm
字号:
object WebModule1: TWebModule1
OldCreateOrder = False
Actions = <
item
Default = True
Name = 'WebActionItem1'
OnAction = WebModule1WebActionItem1Action
end
item
Name = 'WebActionItem2'
PathInfo = '/SQLResult'
OnAction = WebModule1WebActionItem2Action
end>
Left = 283
Top = 175
Height = 150
Width = 275
object Session1: TSession
Left = 24
Top = 16
end
object Query1: TQuery
DatabaseName = 'DB1'
Left = 144
Top = 16
end
object Query2: TQuery
DatabaseName = 'DB1'
SQL.Strings = (
'select * from country')
Left = 200
Top = 16
end
object Database1: TDatabase
AliasName = 'DBDEMOS'
Connected = True
DatabaseName = 'DB1'
SessionName = 'Default'
Left = 88
Top = 16
end
object QueryTableProducer1: TQueryTableProducer
Columns = <
item
FieldName = 'Name'
Title.Caption = #22269#23478#21517
end
item
FieldName = 'Capital'
Title.Caption = #39318#37117
end
item
FieldName = 'Continent'
Title.Caption = #25152#22312#22823#27954
end
item
FieldName = 'Area'
Title.Caption = #38754#31215
end
item
Align = haRight
FieldName = 'Population'
Title.Caption = #20154#21475
end>
Query = Query2
TableAttributes.BgColor = 'Silver'
TableAttributes.Border = 1
TableAttributes.CellSpacing = 1
TableAttributes.CellPadding = 1
OnFormatCell = QueryTableProducer1FormatCell
Left = 112
Top = 72
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -