📄 unit2.dfm
字号:
object WebModule2: TWebModule2
OldCreateOrder = False
Actions = <
item
Default = True
Name = 'WebActionItem1'
PathInfo = '/root'
Producer = PageProducer1
end
item
Name = 'WebActionItem2'
PathInfo = '/query'
Producer = DataSetTableProducer1
OnAction = WebModule2WebActionItem2Action
end>
Left = 302
Top = 191
Height = 189
Width = 319
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\JasonCenter\Delp' +
'hi 6 '#25968#25454#24211#24212#29992#31243#24207'100'#20363'\3'#32508#21512#19982#36828#31243#25216#26415'\ID.mdb;Persist Security Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 40
Top = 88
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <
item
Name = 'code'
Attributes = [paNullable]
DataType = ftFixedChar
NumericScale = 255
Precision = 255
Size = 510
Value = Null
end>
SQL.Strings = (
'select * from id where '
'code=:code')
Left = 128
Top = 88
end
object PageProducer1: TPageProducer
HTMLDoc.Strings = (
'<html>'
''
'<head>'
'<meta http-equiv="Content-Language" content="zh-cn">'
'<meta name="GENERATOR" content="Microsoft FrontPage 5.0">'
'<meta name="ProgId" content="FrontPage.Editor.Document">'
'<meta http-equiv="Content-Type" content="text/html; charset=gb23' +
'12">'
'<title>WEB Server Application</title>'
'</head>'
''
'<body>'
''
'<p align="center"><font color="#FF0000" size="7" face="Verdana">' +
'DELPHI6</font></p>'
'<p align="center"><b><font face="Courier New" color="#0000FF" si' +
'ze="6">WEB '
'Server Application</font></b></p>'
'<p align="center"><b><font face="Courier New" color="#0000FF" si' +
'ze="6">Sample '
'Page</font></b></p>'
'<p align="center"><span style="font-size: 10.5pt"><a href="http:' +
'//localhost:1024/Project1.MyFirstWebServerApp/showdata">'#26174#31034#25968#25454'</a>' +
'</span></p>'
'<p align="center"><span style="font-size: 10.5pt"><a href="http:' +
'//localhost:1024/Project1.MyFirstWebServerApp/query?code=320201"' +
'>320201</a></span></p>'
'</body>'
''
'</html>')
Left = 224
Top = 32
end
object DataSetTableProducer1: TDataSetTableProducer
DataSet = ADOQuery1
Left = 224
Top = 88
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -