X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=WebModuleUnit1.dfm;h=f13967885a7b762d0612792ac188a1ca5921b496;hb=205d2a218ef151e69abc12c746f69f05407ee325;hp=9fca0f30982ee1513399527257b32ee29b9229b7;hpb=248382bd827f847cc458441b592830e3d6b5b88f;p=newbbs%2Fnewbbs.git diff --git a/WebModuleUnit1.dfm b/WebModuleUnit1.dfm index 9fca0f3..f139678 100644 --- a/WebModuleUnit1.dfm +++ b/WebModuleUnit1.dfm @@ -1,68 +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 - Name = 'delete' + MethodType = mtPost + Name = 'usrdel' PathInfo = '/userdel' - OnAction = TWebModule1deleteAction + OnAction = WebModule1usrdelAction end item - MethodType = mtPost Name = 'jump' PathInfo = '/jump' - OnAction = TWebModule1jumpAction + OnAction = WebModule1jumpAction + end + item + MethodType = mtGet + Name = 'link' + PathInfo = '/link' + OnAction = WebModule1linkAction + end + item + MethodType = mtPost + Name = 'admdel' + PathInfo = '/admindel' + 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>

' @@ -70,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 @@ -84,32 +133,99 @@ object TWebModule1: TTWebModule1 '' ' ' ' ' + ' ' + + ' ' + '' + + ' ' + + ' ' + ' ' ' ' ' <#title>' ' ' ' ' ' ' - '' - ' <#title2>' + + ' ' + + ' ' + + ' ' + '<#pr>' + ' / style=text-decoration:none><#title2>' '' ' <#header>' - '' - '


' + '


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

>'#26908#32034#12506#12540#12472'

' + '
' + '
' + '
' + '
' + '


' + '

/search?db=<#dbnum>>'#26908#32034#12506#12540#12472'

' '

'#19979#12408#31227#21205'

' '

<#database>

' ' <#footer>' @@ -118,11 +234,11 @@ object TWebModule1: TTWebModule1 #9'

Top'#12408#31227#21205'

' ' <#footer>' - '

'#31649 + - #29702#32773#29992#12525#12464#12452#12531'

' + '

'#31649#29702#32773#29992#12525#12464#12452#12531'

' ' ' '') - DataSet = DataModule1.FDTable1 + DataSet = FDTable3 OnHTMLTag = indexHTMLTag Left = 112 Top = 32 @@ -130,6 +246,11 @@ object TWebModule1: TTWebModule1 object admin: TDataSetTableProducer Columns = < item + Custom = 'width=10%' + FieldName = 'CHECK' + end + item + Custom = 'width=10%' FieldName = 'NUMBER' end item @@ -139,16 +260,17 @@ object TWebModule1: TTWebModule1 FieldName = 'NAME' end item - FieldName = 'COMMENT' - end - item FieldName = 'DATE' end> Footer.Strings = ( - '

'#25147#12427'') - Header.Strings = ( '') - DataSet = DataModule1.FDTable2 + MaxRows = 30 + DataSet = FDTable2 + RowAttributes.Align = haCenter + TableAttributes.Align = haCenter + TableAttributes.BgColor = 'White' + TableAttributes.Width = 80 + OnFormatCell = adminFormatCell Left = 176 Top = 32 end @@ -160,11 +282,16 @@ object TWebModule1: TTWebModule1 '' ' ' ' '#26908#32034'' + ' ' ' ' '' ' ' - '

' + '<#pr>' + ' ' '

'#25237#31295#26908#32034 '' '

' @@ -191,7 +318,7 @@ object TWebModule1: TTWebModule1 '

' '

' '
' - '

'#25522#31034#26495#12408#25147#12427 + '

'#25522#31034#26495#12408#25147#12427 '

' ' <#items>' ' ' @@ -209,7 +336,7 @@ object TWebModule1: TTWebModule1 #9 #9'
<#item>
' '') - DataSet = DataModule1.FDTable2 + DataSet = FDTable4 OnHTMLTag = itemsHTMLTag Left = 240 Top = 144 @@ -221,14 +348,9 @@ object TWebModule1: TTWebModule1 '' ''#20351#12356#26041'' '' + '<#pr>' '

'#35370#21839#32773#12398#30342#12373#12435'

' - '
' - #9'

'#12362#21839#12356#21512#12431#12379'<'#21066#38500#20381#38972#12394#12393#20309#12391#12418'>

' - #9'
' - #9'
' + '<#area>' #9'


' '

'#38283#30330#32773#12398#30342#12373#12435 '

pybbs'#12398'API' @@ -238,34 +360,52 @@ object TWebModule1: TTWebModule1 '

' '

'#21033#29992#35215#32004 '

'#12371#12428#12363#12425#26360#12365#12414#12377 - '

'#25147#12427'' + '

/>'#25147#12427'' '' '') + OnHTMLTag = helpHTMLTag Left = 304 Top = 32 end object top: TPageProducer HTMLDoc.Strings = ( '' - '' + '' '' + #9'Top Page' + + ' ' + + ' ' - #9'' - #9'' - #9'Top Page' - '' - '<#css id=1>' - '<#css id=3>' - #9'' - #9'' - #9'' - - #9'' + + ' ' '' '' + + ' ' + + ' ' + + ' ' + '<#pr>' '

' + '' '' + '' + '' '

'#28961#26009#38651#23376#25522#31034#26495#12408#12424#12358#12371#12381 - '

' - #9'
' - #9'' - '<#list>' - '
' - '
' + '' + '' - #9'
' - #9'' - #9'' - #9'
' - #9'
' + '

' + '

'#12288''#12288#12288#12288#12288''#12539#12539#12539'new!' - '

[ ><#info> ] ='#12362#30693#12425#12379'

[ ' + - 'master' + '

[ /index?db=<#dbnum>><#info> ] ='#12362#30693#12425 + + #12379'

[ master' ' ] ='#31649#29702#20154'

' '