OSDN Git Service

実は前回のコミット前にいろいろとやっていました
[newbbs/newbbs.git] / WebModuleUnit1.dfm
index 86908fe..cd75d84 100644 (file)
@@ -208,8 +208,6 @@ object WebModule1: TWebModule1
         FieldName = 'DATE'
       end>
     Footer.Strings = (
-      '<input type=submit value='#21066#38500#12377#12427'><input type=reset value='#12522#12475#12483#12488'>'
-      '</form>'
       '')
     MaxRows = 30
     DataSet = DataModule1.FDTable2
@@ -261,7 +259,7 @@ object WebModule1: TWebModule1
       '      <p>'
       '    <input type="submit" value="'#26908#32034'"></p>'
       '    </form>'
-      '      <p><a href="/">'#25522#31034#26495#12408#25147#12427
+      '      <p><a href="/index?db=<#dbnum>">'#25522#31034#26495#12408#25147#12427
       '</a></p>'
       '    <#items>'
       '  </body>'
@@ -293,13 +291,7 @@ object WebModule1: TWebModule1
       '<body>'
       '<#pr>'
       '<P>'#35370#21839#32773#12398#30342#12373#12435'</P>'
-      '<form action=/help method=post>'
-      #9'<p>'#12362#21839#12356#21512#12431#12379'<'#21066#38500#20381#38972#12394#12393#20309#12391#12418'></p>'
-      #9'<textarea name=help style=height:100px;width:250px>'
-      #25237#31295#32773#21517#12394#12393#65306
-      #30456#35527#20869#23481#65306
-      #12381#12398#20182#65306'</textarea><br>'
-      #9'<input type=submit value="'#36865#20449'"></form>'
+      '<#area>'
       #9'<p><br>'
       '<p>'#38283#30330#32773#12398#30342#12373#12435
       '<p>pybbs'#12398'API'
@@ -427,6 +419,7 @@ object WebModule1: TWebModule1
       '<input type=radio name=delete value=all>'#12377#12409#12390#28040#21435
       '<input type=submit value="'#36865#20449'">'
       '</form>'
+      '<p style=text-align:center><a href=/logout>'#12525#12464#12450#12454#12488'</a>'
       '<p style=text-align:center><a href=/>'#25147#12427'</a>'
       '</body></html>')
     OnHTMLTag = masterHTMLTag
@@ -436,8 +429,7 @@ object WebModule1: TWebModule1
   object alert: TDataSetPageProducer
     HTMLDoc.Strings = (
       '<tr><td>'
-      '<p><a href=/jump?db=<#dbname>&num=<#posnum>>'
-      '    [ <#dbname>-<#posnum> ]</a><#date>'
+      '<p><#plus><#date>'
       '<p><#article></td><td><#request>'
       '</td><tr>')
     DataSet = DataModule1.FDTable4
@@ -1834,7 +1826,7 @@ object WebModule1: TWebModule1
       '    <label><p>'#12497#12473#12527#12540#12489#12398#22793#26356
       
         '      <input type="password" style="HEIGHT: 23px; WIDTH: 85px" n' +
-        'ame="pass" value="<#password>">'
+        'ame="pass">'
       '      </p>'
       '    </label>'
       '    <p>'
@@ -1842,7 +1834,7 @@ object WebModule1: TWebModule1
         '    <input type="checkbox" value="on" name="mente" <#mente>>'#12513#12531#12486#12490 +
         #12531#12473#34920#31034'</p>'
       '    <p><input type="submit" value="'#22793#26356'"></p>'
-      '    <p><a href="/logout">'#12525#12464#12450#12454#12488'</a></p>'
+      '    <p><a href="/logout?db=<#database>">'#12525#12464#12450#12454#12488'</a></p>'
       '</form>'
       '<form action=/admindel method=post style=text-align:center>')
     OnHTMLTag = adheadHTMLTag
@@ -1919,9 +1911,12 @@ object WebModule1: TWebModule1
   end
   object ti: TDataSetPageProducer
     HTMLDoc.Strings = (
-      '<p style=font-weight:bold><#database>'#8595'</p>'
-      '<div>'#12479#12452#12488#12523': '#39'<#title> , '#35352#20107#25968': <#count> , '#26356#26032#26178#21051': <#date></div><p>'
+      
+        '<p style=font-weight:bold><a href=/index?db=<#dbnum>><#database>' +
+        '</a>'#8595'</p>'
+      '<div>'#12479#12452#12488#12523': <#title> ; '#35352#20107#25968': <#count> ; '#26356#26032#26178#21051': <#date></div><p>'
       '')
+    DataSet = DataModule1.FDQuery1
     OnHTMLTag = tiHTMLTag
     Left = 48
     Top = 320