X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=WebModuleUnit1.dfm;h=c93c102f6c461430d2c6d7cb4a6f169aa02f6b0a;hb=aacbde4f0614f02fd7948c0befa7f6f5a175e16c;hp=c3cbb1ffd77114a14e8e5ba4e6de03e780422af6;hpb=e55ba7e5bbd579ddf3f5673bf2ba05d436d6769d;p=newbbs%2Fnewbbs.git diff --git a/WebModuleUnit1.dfm b/WebModuleUnit1.dfm index c3cbb1f..c93c102 100644 --- a/WebModuleUnit1.dfm +++ b/WebModuleUnit1.dfm @@ -1,13 +1,15 @@ -object TWebModule1: TTWebModule1 +object WebModule1: TWebModule1 OldCreateOrder = False OnCreate = WebModuleCreate Actions = < item + MethodType = mtGet Name = 'top' PathInfo = '/' OnAction = TWebModule1topAction end item + MethodType = mtGet Name = 'indexpage' PathInfo = '/index' OnAction = TWebModule1indexpageAction @@ -19,6 +21,7 @@ object TWebModule1: TTWebModule1 OnAction = TWebModule1registAction end item + MethodType = mtGet Name = 'admin' PathInfo = '/admin' OnAction = TWebModule1adminAction @@ -34,7 +37,6 @@ object TWebModule1: TTWebModule1 OnAction = TWebModule1helpAction end item - MethodType = mtGet Name = 'master' PathInfo = '/master' OnAction = TWebModule1masterAction @@ -43,15 +45,72 @@ object TWebModule1: TTWebModule1 Name = 'alert' PathInfo = '/alert' OnAction = TWebModule1alertAction + end + item + MethodType = mtPost + Name = 'usrdel' + PathInfo = '/userdel' + OnAction = TWebModule1deleteAction + end + item + Name = 'jump' + PathInfo = '/jump' + OnAction = TWebModule1jumpAction + end + item + MethodType = mtGet + Name = 'link' + PathInfo = '/link' + OnAction = TWebModule1linkAction + end + item + MethodType = mtPost + Name = 'admdel' + PathInfo = '/admindel' + OnAction = TWebModule1admdelAction + end + item + Name = 'login' + PathInfo = '/login' + OnAction = TWebModule1loginAction + end + item + MethodType = mtPost + Name = 'adminset' + PathInfo = '/adminset' + OnAction = TWebModule1adminsetAction + end + item + MethodType = mtGet + Name = 'logout' + PathInfo = '/logout' + OnAction = TWebModule1logoutAction + end + item + MethodType = mtGet + Name = 'img' + PathInfo = '/src' + OnAction = TWebModule1imgAction + end + item + MethodType = mtGet + Name = 'file' + PathInfo = '/file' + OnAction = TWebModule1fileAction + end + item + Name = 'title' + PathInfo = '/title' + OnAction = TWebModule1titleAction end> - Height = 353 + Height = 385 Width = 436 object articles: TDataSetPageProducer HTMLDoc.Strings = ( '
' - #9'
> style=text-decoration:none>' + #9'
> style=text-decoration:none>' #9#9'[<#number>]
' #9'
<#title>
' #9'
'#12288'Name:

<#name>

' @@ -59,8 +118,8 @@ object TWebModule1: TTWebModule1 #9'

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

<#comment>
' - '
&num=<#number>>'#22577#21578'
' + '
&num=<#number>>'#22577#21578'
' #9'

'#9651#9660#9651#9660#9651#9660#9651) DataSet = DataModule1.FDTable2 OnHTMLTag = articlesHTMLTag @@ -73,32 +132,48 @@ object TWebModule1: TTWebModule1 '' ' ' ' ' + ' ' + '' + + ' ' + + ' ' + ' ' ' ' ' <#title>' ' ' ' ' ' ' - '' + '<#pr>' ' <#title2>' '' ' <#header>' '' '

' - - '
method="post" id=search' + - '>' - ' ' + ' method="post" id=search>' + ' ' '