よくわからないままです、FMXが難しいのでVCLで作成しましたが解決していません

[newbbs/newbbs.git] / WebModuleUnit1.dfm
diff --git a/WebModuleUnit1.dfm b/WebModuleUnit1.dfm

index c674804..cd75d84 100644 (file)
--- a/WebModuleUnit1.dfm
+++ b/WebModuleUnit1.dfm
@@ -259,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>'
@@ -291,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'
@@ -425,7 +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?db=master>'#12525#12464#12450#12454#12488'</a>'
+      '<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
@@ -435,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
@@ -1918,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