Diff of /WebModuleUnit1.dfm

OSDN > Find Software > mybbs

 Browse Subversion Repository



/[bbs-as-pbbs]/WebModuleUnit1.dfm




Diff of /WebModuleUnit1.dfm



 Parent Directory

|  Revision Log



|  Patch














revision 4 by yamat0jp,
Thu Sep 24 07:42:33 2015 UTC




revision 18 by yamat0jp,
Thu Sep 29 08:48:40 2016 UTC






#

Line 53 
 object WebModule1: TWebModule1


Line 53 
 object WebModule1: TWebModule1












53
       Name = 'adminset'
       Name = 'adminset'

















54
       PathInfo = '/adminset'
       PathInfo = '/adminset'

















55
       OnAction = WebModule1adminsetAction
       OnAction = WebModule1adminsetAction












56
 
     end







57
 
     item







58
 
       MethodType = mtGet







59
 
       Name = 'css'







60
 
       PathInfo = '/css'







61
 
       OnAction = WebModule1cssAction












62
     end>
     end>

















63
   BeforeDispatch = WebModuleBeforeDispatch
   BeforeDispatch = WebModuleBeforeDispatch












64
 
   AfterDispatch = WebModuleAfterDispatch












65
   Height = 230
   Height = 230

















66
   Width = 415
   Width = 415

















67
   object FDTable1: TFDTable
   object FDTable1: TFDTable











#

Line 99 
 object WebModule1: TWebModule1


Line 106 
 object WebModule1: TWebModule1












106
   end
   end

















107
   object FDConnection1: TFDConnection
   object FDConnection1: TFDConnection

















108
     Params.Strings = (
     Params.Strings = (














       'Database=E:\Program Files (x86)\xampp\cgi-bin\data.sdb'
 













109
       'LockingMode=Normal'
       'LockingMode=Normal'

















110
       'DriverID=SQLite')
       'DriverID=SQLite')

















111
     Left = 56
     Left = 56











#

Line 114 
 object WebModule1: TWebModule1


Line 120 
 object WebModule1: TWebModule1












120
     object FDTable2home: TWideMemoField
     object FDTable2home: TWideMemoField

















121
       FieldName = 'home'
       FieldName = 'home'

















122
       Origin = 'home'
       Origin = 'home'















123


       BlobType = ftWideMemo


       BlobType = ftWideString















124
     end
     end

















125
     object FDTable2title: TWideMemoField
     object FDTable2title: TWideMemoField

















126
       FieldName = 'title'
       FieldName = 'title'

















127
       Origin = 'title'
       Origin = 'title'















128


       BlobType = ftWideMemo


       BlobType = ftWideString















129
     end
     end

















130
     object FDTable2title2: TWideMemoField
     object FDTable2title2: TWideMemoField

















131
       FieldName = 'title2'
       FieldName = 'title2'











#

Line 129 
 object WebModule1: TWebModule1


Line 135 
 object WebModule1: TWebModule1












135
     object FDTable2pass: TWideMemoField
     object FDTable2pass: TWideMemoField

















136
       FieldName = 'pass'
       FieldName = 'pass'

















137
       Origin = 'pass'
       Origin = 'pass'















138


       BlobType = ftWideMemo


       BlobType = ftWideString















139
     end
     end

















140
     object FDTable2ngwords: TWideMemoField
     object FDTable2ngwords: TWideMemoField

















141
       FieldName = 'ngwords'
       FieldName = 'ngwords'











#

Line 147 
 object WebModule1: TWebModule1


Line 153 
 object WebModule1: TWebModule1












153
   end
   end

















154
   object DataSetPageProducer2: TDataSetPageProducer
   object DataSetPageProducer2: TDataSetPageProducer

















155
     HTMLDoc.Strings = (
     HTMLDoc.Strings = (















156


       '<hr size=1>[<#no>]'


       '<hr size=1>'













157


       '<font size="+1" color="#D01166"><b><#sub></b></font><br>'


       '<section id=number>[<#no>]</section>'













158


       


       '<section id=title><#sub></section>'













159


         '  Name:<font color="#007000"><b><#name></b></font><font size="-1' +


       '<section id=name>  Name:<h1><#name></h1></section>'













160


         '">  Date:<#date></font>'


       '<section id=date>  Date:<h1><#date></h1></section>'













161


       '<p><tt><#com><br></tt></p>')


       '<section id=comment><#com></section>'













162


 


       '')















163
     DataSet = FDTable1
     DataSet = FDTable1

















164
     OnHTMLTag = DataSetPageProducer2HTMLTag
     OnHTMLTag = DataSetPageProducer2HTMLTag

















165
     Left = 312
     Left = 312





























Legend:



Removed from v.4
 


changed lines


 
Added in v.18













Back to OSDN">Back to OSDN
ViewVC Help


Powered by ViewVC 1.1.26
 /[bbs-as-pbbs]/WebModuleUnit1.dfm
-revision 4 by yamat0jp,
Thu Sep 24 07:42:33 2015 UTC
+revision 18 by yamat0jp,
Thu Sep 29 08:48:40 2016 UTC
 Line 53 
 object WebModule1: TWebModule1
        Name = 'adminset'
        PathInfo = '/adminset'
        OnAction = WebModule1adminsetAction
+     end
+     item
+       MethodType = mtGet
+       Name = 'css'
+       PathInfo = '/css'
+       OnAction = WebModule1cssAction
      end>
    BeforeDispatch = WebModuleBeforeDispatch
+   AfterDispatch = WebModuleAfterDispatch
    Height = 230
    Width = 415
    object FDTable1: TFDTable
-Line 99 
 object WebModule1: TWebModule1
+Line 106 
 object WebModule1: TWebModule1
    end
    object FDConnection1: TFDConnection
      Params.Strings = (
-       'Database=E:\Program Files (x86)\xampp\cgi-bin\data.sdb'
        'LockingMode=Normal'
        'DriverID=SQLite')
      Left = 56
-Line 114 
 object WebModule1: TWebModule1
+Line 120 
 object WebModule1: TWebModule1
      object FDTable2home: TWideMemoField
        FieldName = 'home'
        Origin = 'home'
-       BlobType = ftWideMemo
+       BlobType = ftWideString
      end
      object FDTable2title: TWideMemoField
        FieldName = 'title'
        Origin = 'title'
-       BlobType = ftWideMemo
+       BlobType = ftWideString
      end
      object FDTable2title2: TWideMemoField
        FieldName = 'title2'
-Line 129 
 object WebModule1: TWebModule1
+Line 135 
 object WebModule1: TWebModule1
      object FDTable2pass: TWideMemoField
        FieldName = 'pass'
        Origin = 'pass'
-       BlobType = ftWideMemo
+       BlobType = ftWideString
      end
      object FDTable2ngwords: TWideMemoField
        FieldName = 'ngwords'
-Line 147 
 object WebModule1: TWebModule1
+Line 153 
 object WebModule1: TWebModule1
    end
    object DataSetPageProducer2: TDataSetPageProducer
      HTMLDoc.Strings = (
-       '<hr size=1>[<#no>]'
+       '<hr size=1>'
-       '<font size="+1" color="#D01166"><b><#sub></b></font><br>'
+       '<section id=number>[<#no>]</section>'
+       '<section id=title><#sub></section>'
-         '  Name:<font color="#007000"><b><#name></b></font><font size="-1' +
+       '<section id=name>  Name:<h1><#name></h1></section>'
-         '">  Date:<#date></font>'
+       '<section id=date>  Date:<h1><#date></h1></section>'
-       '<p><tt><#com><br></tt></p>')
+       '<section id=comment><#com></section>'
+       '')
      DataSet = FDTable1
      OnHTMLTag = DataSetPageProducer2HTMLTag
      Left = 312
 Legend:



Removed from v.4
 


changed lines


 
Added in v.18
 Legend:



Removed from v.4
 


changed lines


 
Added in v.18
-Removed from v.4
+Added in v.18
-Back to OSDN">Back to OSDN
+ViewVC Help
 Powered by ViewVC 1.1.26

Develop and Download Open Source Software

mybbs

Browse Subversion Repository