X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=WebModuleUnit1.dfm;h=991a1c7cb6b5f01e606aa544641a0c1bab77e1cd;hb=b260a3548be16edabafbb5f2dc8fa5aba6988436;hp=92864d8e4592fe3408e77c9814bd6ff17e5db0d6;hpb=65ba8a272b28f76744480afa99e2adae92fe2a43;p=newbbs%2Fnewbbs.git diff --git a/WebModuleUnit1.dfm b/WebModuleUnit1.dfm index 92864d8..991a1c7 100644 --- a/WebModuleUnit1.dfm +++ b/WebModuleUnit1.dfm @@ -1,80 +1,117 @@ -object TWebModule1: TTWebModule1 +object WebModule1: TWebModule1 OldCreateOrder = False OnCreate = WebModuleCreate Actions = < item + MethodType = mtGet Name = 'top' PathInfo = '/' - OnAction = TWebModule1topAction + OnAction = WebModule1topAction end item + MethodType = mtGet Name = 'indexpage' PathInfo = '/index' - OnAction = TWebModule1indexpageAction + OnAction = WebModule1indexpageAction end item MethodType = mtPost Name = 'regist' PathInfo = '/regist' - OnAction = TWebModule1registAction + OnAction = WebModule1registAction end item + MethodType = mtGet Name = 'admin' PathInfo = '/admin' - OnAction = TWebModule1adminAction + OnAction = WebModule1adminAction end item Name = 'search' PathInfo = '/search' - OnAction = TWebModule1searchAction + OnAction = WebModule1searchAction end item Name = 'help' PathInfo = '/help' - OnAction = TWebModule1helpAction + OnAction = WebModule1helpAction end item - MethodType = mtGet Name = 'master' PathInfo = '/master' - OnAction = TWebModule1masterAction + OnAction = WebModule1masterAction end item Name = 'alert' PathInfo = '/alert' - OnAction = TWebModule1alertAction + OnAction = WebModule1alertAction end item MethodType = mtPost Name = 'usrdel' PathInfo = '/userdel' - OnAction = TWebModule1deleteAction + OnAction = WebModule1usrdelAction end item Name = 'jump' PathInfo = '/jump' - OnAction = TWebModule1jumpAction + OnAction = WebModule1jumpAction end item MethodType = mtGet Name = 'link' PathInfo = '/link' - OnAction = TWebModule1linkAction + OnAction = WebModule1linkAction end item MethodType = mtPost Name = 'admdel' PathInfo = '/admindel' - OnAction = TWebModule1admdelAction + OnAction = WebModule1admdelAction + end + item + Name = 'login' + PathInfo = '/login' + OnAction = WebModule1loginAction + end + item + MethodType = mtPost + Name = 'adminset' + PathInfo = '/adminset' + OnAction = WebModule1adminsetAction + end + item + MethodType = mtGet + Name = 'logout' + PathInfo = '/logout' + OnAction = WebModule1logoutAction + end + item + MethodType = mtGet + Name = 'img' + PathInfo = '/src' + OnAction = WebModule1imgAction + end + item + MethodType = mtGet + Name = 'file' + PathInfo = '/file' + OnAction = WebModule1fileAction + end + item + Name = 'title' + PathInfo = '/title' + OnAction = WebModule1titleAction end> - Height = 353 - Width = 436 + Height = 385 + Width = 909 object articles: TDataSetPageProducer HTMLDoc.Strings = ( '
' - #9'
> style=text-decoration:none>' + #9'
>/jump?db' + + '=<#dbnum>&num=<#number>' + ' style=text-decoration:none>' #9#9'[<#number>]
' #9'
<#title>
' #9'
'#12288'Name:

<#name>

' @@ -82,10 +119,10 @@ object TWebModule1: TTWebModule1 #9'

'#9661#9650#9661#9650#9661#9650#9661 #9'

<#comment>
' - '
&num=<#number>>'#22577#21578'
' + '
/alert?d' + + 'b=<#dbnum>&num=<#number>>'#22577#21578'
' #9'

'#9651#9660#9651#9660#9651#9660#9651) - DataSet = DataModule1.FDTable2 + DataSet = FDTable2 OnHTMLTag = articlesHTMLTag Left = 112 Top = 88 @@ -96,32 +133,50 @@ object TWebModule1: TTWebModule1 '' ' ' ' ' + ' ' + '' + + ' ' + + ' ' + ' ' ' ' ' <#title>' ' ' ' ' ' ' - '' - ' <#title2>' + '<#pr>' + ' / style=text-decoration:none><#title2>' '' ' <#header>' '' '


' - '
method="post" id=search' + - '>' - ' ' + ' /userdel?db=<#dbnum> method="post" id=sea' + + 'rch>' + ' ' '