OSDN Git Service

なやみながらですね。
[newbbs/newbbs.git] / WebModuleUnit1.dfm
index eab0661..991a1c7 100644 (file)
@@ -50,6 +50,7 @@ object WebModule1: TWebModule1
       MethodType = mtPost
       Name = 'usrdel'
       PathInfo = '/userdel'
+      OnAction = WebModule1usrdelAction
     end
     item
       Name = 'jump'
@@ -108,8 +109,9 @@ object WebModule1: TWebModule1
     HTMLDoc.Strings = (
       '                                            <hr size=1>'
       
-        #9'<section id=number><a name=<#number>></a><a href=<#uri>/jump?nu' +
-        'm=<#number> style=text-decoration:none>'
+        #9'<section id=number><a name=<#number>></a><a href=<#uri>/jump?db' +
+        '=<#dbnum>&num=<#number>'
+      '         style=text-decoration:none>'
       #9#9'[<#number>]</a></section>'
       #9'<section id=title><#title></section>'
       #9'<section id=name>'#12288'Name:<h1><#name></h1></section>'
@@ -120,6 +122,7 @@ object WebModule1: TWebModule1
         '<section id=master style=text-align:right><a href=<#uri>/alert?d' +
         'b=<#dbnum>&num=<#number>>'#22577#21578'</a></section>'
       #9'<p>'#9651#9660#9651#9660#9651#9660#9651)
+    DataSet = FDTable2
     OnHTMLTag = articlesHTMLTag
     Left = 112
     Top = 88
@@ -186,6 +189,7 @@ object WebModule1: TWebModule1
         '">'#31649#29702#32773#29992#12525#12464#12452#12531'</a></p>'
       '  </body>'
       '</html>')
+    DataSet = FDTable3
     OnHTMLTag = indexHTMLTag
     Left = 112
     Top = 32
@@ -193,9 +197,11 @@ object WebModule1: TWebModule1
   object admin: TDataSetTableProducer
     Columns = <
       item
-        Title.Caption = 'check'
+        Custom = 'width=10%'
+        FieldName = 'CHECK'
       end
       item
+        Custom = 'width=10%'
         FieldName = 'NUMBER'
       end
       item
@@ -211,6 +217,10 @@ object WebModule1: TWebModule1
       '')
     MaxRows = 30
     DataSet = FDTable2
+    RowAttributes.Align = haCenter
+    TableAttributes.Align = haCenter
+    TableAttributes.BgColor = 'White'
+    TableAttributes.Width = 80
     OnFormatCell = adminFormatCell
     Left = 176
     Top = 32
@@ -277,6 +287,7 @@ object WebModule1: TWebModule1
       #9
       #9'<section id=comment><#item></section>'
       '')
+    DataSet = FDTable4
     OnHTMLTag = itemsHTMLTag
     Left = 240
     Top = 144
@@ -314,12 +325,6 @@ object WebModule1: TWebModule1
       '<head>'
       #9'<title>Top Page</title>'
       
-        '<link rel=stylesheet type=text/css href="/file?type=css&id=1" re' +
-        'f=top>'
-      
-        '<link rel=stylesheet type=text/css href="/file?type=css&id=3" re' +
-        'f=normal>'
-      
         ' <script type="text/javascript" src="//ajax.googleapis.com/ajax/' +
         'libs/jquery/2.1.4/jquery.min.js"></script>'
       
@@ -328,10 +333,27 @@ object WebModule1: TWebModule1
       
         ' <script src="//ajax.googleapis.com/ajax/libs/jqueryui/1.10.4/jq' +
         'uery-ui.min.js"></script>'
-      '<script src="<#uri>/file?type=js&id=3">org</script>'
-      '<script src="<#uri>/file?type=js&id=4">moder</script>'
+      
+        ' <link rel="stylesheet" href="https://stackpath.bootstrapcdn.com' +
+        '/bootstrap/4.2.1/css/bootstrap.min.css" integrity="sha384-GJzZqF' +
+        'Gwb1QTTN6wy59ffF1BuGJpLSa9DkKMp0DgiMDm4iYMj70gZWKYbI706tWS" cros' +
+        'sorigin="anonymous">'
       '</head>'
       '<body>'
+      
+        '    <script src="https://code.jquery.com/jquery-3.3.1.slim.min.j' +
+        's" integrity="sha384-q8i/X+965DzO0rT7abK41JStQIAqVgRVzpbzo5smXKp' +
+        '4YfRvH+8abtTE1Pi6jizo" crossorigin="anonymous"></script>'
+      
+        '    <script src="https://cdnjs.cloudflare.com/ajax/libs/popper.j' +
+        's/1.14.6/umd/popper.min.js" integrity="sha384-wHAiFfRlMFy6i5SRax' +
+        'vfOCifBUQy1xHdJ/yoi7FRNXMRBu5WHdZYu1hA6ZOblgut" crossorigin="ano' +
+        'nymous"></script>'
+      
+        '    <script src="https://stackpath.bootstrapcdn.com/bootstrap/4.' +
+        '2.1/js/bootstrap.min.js" integrity="sha384-B0UglyR+jN6CkvvICOB2j' +
+        'oaf5I4l3gm9GU6Hc1og6Ls7i6U/mkkaduKaBhlAXv9k" crossorigin="anonym' +
+        'ous"></script>'
       '<#pr>'
       '<div id="fb-root"></div>'
       ''
@@ -348,18 +370,30 @@ object WebModule1: TWebModule1
       ''
       '<header><h1 style="text-align: center;">'#28961#26009#38651#23376#25522#31034#26495#12408#12424#12358#12371#12381
       '</h1></header>'
-      '<div class="slideshow">'
-      #9'<div class="slideshow-slides"><#slide></div>'
+      '<div id="slide-1" class="carousel slide" data-ride="carousel">'
+      '  <ol class="carousel-indicators">'
+      '    <#indicator>'
+      '  </ol>'
+      '  <div class="carousel-inner bg-dark"><#slide></div>'
       ''
-      #9'<div class="slideshow-nav">'
-      #9'<a href="#" class="prev">prev'
-      '</a>'
-      #9'<a href="#" class="next">next'
-      '</a>'
-      '        </div>'
-      ''
-      #9'<div class="slideshow-indicator"></div>'
+      
+        #9'<a class="carousel-control-prev" href="#slide-1" role="button" ' +
+        'data-slide="prev">'
+      
+        '          <span class="carousel-control-prev-icon" aria-hidden="' +
+        'true"></span>'
+      '          <span class="sr-only">Previous</span>'
+      '        </a>'
+      
+        '        <a class="carousel-control-next" href="#slide-1" role="b' +
+        'utton" data-slide="next">'
+      
+        '          <span class="carousel-control-next-icon" aria-hidden="' +
+        'true"></span>'
+      '          <span class="sr-only">Next></span>'
+      '        </a>'
       '</div>'
+      '<p>'
       '<p>'#12288'<em style="background-color: aqua;">'#12288#12288#12288#12288'</em>'#12539#12539#12539'new!'
       
         '        <p>[ <a href=<#uri>/index?db=<#dbnum>><#info></a> ] ='#12362#30693#12425 +
@@ -431,17 +465,11 @@ object WebModule1: TWebModule1
       '<p><#plus><#date>'
       '<p><#article></td><td><#request>'
       '</td><tr>')
+    DataSet = FDTable4
     OnHTMLTag = alertHTMLTag
     Left = 48
     Top = 192
   end
-  object footer: TDataSetPageProducer
-    HTMLDoc.Strings = (
-      '<p style=text-align:center>[ <#link> ] <#recent>')
-    OnHTMLTag = footerHTMLTag
-    Left = 112
-    Top = 192
-  end
   object mail: TPageProducer
     HTMLDoc.Strings = (
       '<!doctyle html>'
@@ -460,163 +488,6 @@ object WebModule1: TWebModule1
     Left = 176
     Top = 144
   end
-  object css1: TPageProducer
-    HTMLDoc.Strings = (
-      '@media only screen and (min-width:900px){'
-      '.slideshow-nav a.prev {'
-      #9'margin-left:-480px'
-      #9'}'
-      '.slideshow-nav a.next {'
-      #9'margin-left:408px'
-      #9'}'
-      '}'
-      '@media only screen and (min-width:600px)'
-      'and (max-width:899px){'
-      'header h1 {'
-      #9'font-size:1em'
-      #9'}'
-      '.slideshow .slide img {'
-      #9'display:none'
-      '}'
-      '.slideshow-nav a.prev {'
-      #9'margin-left:-300px'
-      #9'}'
-      '.slideshow-nav a.next {'
-      #9'margin-left:200px'
-      #9'}'
-      '}'
-      '@media only screen and (max-width:599px){'
-      'header h1 {'
-      #9'font-size:1em'
-      #9'}'
-      '.slideshow .slide img {'
-      #9'display:none'
-      '}'
-      '.slideshow-nav a.prev {'
-      #9'margin-left:-150px'
-      #9'}'
-      '.slideshow-nav a.next {'
-      #9'margin-left:100px'
-      #9'}'
-      '}'
-      ''
-      '.slideshow-slides {'
-      #9'height:100%;'
-      #9'position:absolute;'
-      #9'width:100%;'
-      '}'
-      ''
-      '.slideshow {'
-      #9'background-color:rgb(255,225,225);'
-      #9'width:100%;'
-      #9'height:465px;'
-      #9'overflow:hidden;'
-      #9'position:relative'
-      '}'
-      ''
-      '.slideshow-slides .slide {'
-      #9'height:100%;'
-      #9'overflow:auto;'
-      #9'position:absolute;'
-      #9'width:100%;'
-      '}'
-      ''
-      '.slide p {'
-      #9'font-size:1.5em'
-      '}'
-      ''
-      '.slideshow-nav a,'
-      '.slideshow-indicator a {'
-      #9'overflow:hidden'
-      '}'
-      ''
-      '.slideshow-nav a:before,'
-      '.slideshow-indicator a:before {'
-      #9'content:url("<#uri>/src?name=sprites.png");'
-      #9'display:inline-block;'
-      #9'font-size:0;'
-      #9'line-height:0'
-      '}'
-      ''
-      '.slideshow-nav a {'
-      #9'position:absolute;'
-      #9'top:50%;'
-      #9'left:50%;'
-      #9'width:72px;'
-      #9'height:72px;'
-      #9'margin-top:-36px'
-      '}'
-      ''
-      '.slideshow-nav a.prev:before {'
-      #9'margin-top:-20px'
-      '}'
-      ''
-      '.slideshow-nav a.next:before {'
-      #9'margin-left:-80px;'
-      #9'margin-top:-20px'
-      '}'
-      ''
-      '.slideshow-nav a.disabled {'
-      #9'display:none'
-      '}'
-      ''
-      '.slideshow-indicator {'
-      #9'bottom:30px;'
-      #9'height:16px;'
-      #9'left:0;'
-      #9'position:absolute;'
-      #9'right:0;'
-      #9'text-align:center'
-      '}'
-      ''
-      '.slideshow-indicator a {'
-      #9'display:inline-block;'
-      #9'width:16px;'
-      #9'height:16px;'
-      #9'margin-left:3px;'
-      #9'margin-right:3px'
-      '}'
-      ''
-      '.slideshow-indicator a.active {'
-      #9'cursor:default'
-      '}'
-      ''
-      '.slideshow-indicator a:before {'
-      #9'margin-left:-110px'
-      '}'
-      ''
-      '.slideshow-indicator a.active:before {'
-      #9'margin-left:-130px'
-      '}'
-      ''
-      '.no-js .slideshow {'
-      #9'height:auto'
-      '}'
-      ''
-      '.no-js .slideshow-slides {'
-      #9'height:auto;'
-      #9'position:static'
-      '}'
-      ''
-      '.no-js .slideshow-slides .slide {'
-      #9'display: block;'
-      #9'height: auto;'
-      #9'position:static'
-      '}'
-      ''
-      '.no-js .slideshow-slides .slide .box{'
-      #9'margin:auto;'
-      #9'position:static'
-      '}'
-      ''
-      '.no-js .slideshow-nav,'
-      '.no-js .slideshow-indicator {'
-      #9'display:none'
-      '}')
-    OnHTMLTag = css1HTMLTag
-    Left = 360
-    Top = 96
-  end
   object css2: TPageProducer
     HTMLDoc.Strings = (
       'section#number {'
@@ -1354,38 +1225,11 @@ object WebModule1: TWebModule1
       '      </table>'
       '    </form>'
       '    </header><#preview>')
+    DataSet = FDTable1
     OnHTMLTag = headerHTMLTag
     Left = 240
     Top = 192
   end
-  object login: TDataSetPageProducer
-    HTMLDoc.Strings = (
-      '<!DOCTYPE HTML>'
-      '  <head>'
-      '    <meta charset=utf-8>'
-      '    <title>'#12525#12464#12452#12531'</title>'
-      '  </head>'
-      '  <body>'
-      '<#pr>'
-      '    <p style=text-align:center>'#31649#29702#32773#29992#12525#12464#12452#12531#30011#38754
-      '</p>'
-      '    <br>'
-      '    <form action=<#uri>/login method="post">'
-      '    <p style=text-align:center>'
-      '      <input type=text name=record value=<#database>>'
-      '    '#9'  <input style=height:25px type="password" name="password">'
-      '      <input type="submit" value="'#12525#12464#12452#12531'">'
-      '    </p>'
-      '    </form>'
-      
-        '      <p style=text-align:center><br><a href=<#uri>/ >TOP'#12408#31227#21205'</a>' +
-        '</p>'
-      '  </body>'
-      '</html>')
-    OnHTMLTag = loginHTMLTag
-    Left = 304
-    Top = 144
-  end
   object js1: TPageProducer
     HTMLDoc.Strings = (
       '$(function(){'
@@ -1655,178 +1499,20 @@ object WebModule1: TWebModule1
     Left = 256
     Top = 272
   end
-  object js3: TPageProducer
-    HTMLDoc.Strings = (
-      ''
-      '$(function(){'
-      #9'$('#39'.slideshow'#39').each(function(){'
-      #9#9'var $container = $(this),'
-      #9#9#9'$slideGroup = $container.find('#39'.slideshow-slides'#39'),'
-      #9#9#9'$slides = $slideGroup.find('#39'.slide'#39'),'
-      #9#9#9'$nav = $container.find('#39'.slideshow-nav'#39'),'
-      #9#9#9'$indicator = $container.find('#39'.slideshow-indicator'#39'),'
-      #9#9#9'$images = $slides.find('#39'img'#39'),'
-      #9#9#9
-      #9#9#9'slideCount = $slides.length,'
-      #9#9#9'indicatorHTML = '#39#39','
-      #9#9#9'currentIndex = 0,'
-      #9#9#9'duration = 500,'
-      #9#9#9'easing = '#39'easeInOutExpo'#39','
-      #9#9#9'interval = 7500,'
-      #9#9#9'timer;'
-      #9#9#9#9
-      #9#9
-      #9#9'$slides.each(function(i){'
-      #9#9#9'$(this).css({left:100*i+'#39'%'#39'});'
-      #9#9#9'indicatorHTML += '#39'<a href="#">'#39'+(i+1)+'#39'</a>'#39';'
-      #9#9'});'
-      #9#9
-      #9#9'$indicator.html(indicatorHTML);'
-      #9#9
-      #9#9'function goToSlide(index){'
-      #9#9#9'$slideGroup.animate({left:-100*index+'#39'%'#39'},duration,easing);'
-      #9#9#9'currentIndex = index;'
-      #9#9#9'updateNav();'
-      #9#9'}'
-      #9#9
-      #9#9'function updateNav(){'
-      #9#9#9'var $navPrev = $nav.find('#39'.prev'#39'),'
-      #9#9#9#9'$navNext = $nav.find('#39'.next'#39');'
-      #9#9#9'if (currentIndex === 0){'
-      #9#9#9#9'$navPrev.addClass('#39'disabled'#39');'
-      #9#9#9'} else {'
-      #9#9#9#9'$navPrev.removeClass('#39'disabled'#39');'
-      #9#9#9'}'
-      #9#9#9'if (currentIndex === slideCount-1){'
-      #9#9#9#9'$navNext.addClass('#39'disabled'#39');'
-      #9#9#9'} else {'
-      #9#9#9#9'$navNext.removeClass('#39'disabled'#39');'
-      #9#9#9'}'
-      #9#9#9'$indicator.find('#39'a'#39').removeClass('#39'active'#39')'
-      #9#9#9#9'.eq(currentIndex).addClass('#39'active'#39');'
-      #9#9'}'
-      ''
-      #9#9'function startTimer(){'
-      #9#9'    timer = setInterval(function(){'
-      #9'            var nextIndex = (currentIndex + 1) % slideCount;'
-      #9'            goToSlide(nextIndex);'
-      '            }, interval)'
-      #9#9'}'
-      ''
-      #9#9'function stopTimer(){'
-      #9#9'    clearInterval(timer);'
-      #9#9'}'
-      #9#9#9
-      #9#9'$nav.on('#39'click'#39','#39'a'#39',function(event){'
-      #9#9#9'event.preventDefault();'
-      #9#9#9'if ($(this).hasClass('#39'prev'#39')){'
-      #9#9#9#9'goToSlide(currentIndex-1);'
-      #9#9#9'} else {'
-      #9#9#9#9'goToSlide(currentIndex+1);'
-      #9#9#9'}'
-      #9#9'});'
-      #9#9
-      #9#9'$indicator.on('#39'click'#39','#39'a'#39',function(event){'
-      #9#9#9'event.preventDefault();'
-      #9#9#9'if (!$(this).hasClass('#39'active'#39')){'
-      #9#9#9#9'goToSlide($(this).index());'
-      #9#9#9'}'
-      #9#9'});'
-      ''
-      #9#9'$container.on({'
-      #9#9'    mouseenter: stopTimer,'
-      #9#9'    mouseleave: startTimer'
-      #9#9'});'
-      ''
-      #9#9#9
-      #9#9'goToSlide(currentIndex);'
-      ''
-      #9#9'startTimer();'
-      #9#9
-      #9'});'
-      #9
-      '});')
-    Left = 200
-    Top = 272
-  end
-  object js4: TPageProducer
-    HTMLDoc.Strings = (
-      '/* Modernizr 2.6.2 (Custom Build) | MIT & BSD'
-      ' * Build: http://modernizr.com/download/#-shiv-cssclasses'
-      ' */'
-      
-        ';window.Modernizr=function(a,b,c){function u(a){j.cssText=a}func' +
-        'tion v(a,b){return u(prefixes.join(a+";")+(b||""))}function w(a,' +
-        'b){return typeof a===b}function x(a,b){return!!~(""+a).indexOf(b' +
-        ')}function y(a,b,d){for(var e in a){var f=b[a[e]];if(f!==c)retur' +
-        'n d===!1?a[e]:w(f,"function")?f.bind(d||b):f}return!1}var d="2.6' +
-        '.2",e={},f=!0,g=b.documentElement,h="modernizr",i=b.createElemen' +
-        't(h),j=i.style,k,l={}.toString,m={},n={},o={},p=[],q=p.slice,r,s' +
-        '={}.hasOwnProperty,t;!w(s,"undefined")&&!w(s.call,"undefined")?t' +
-        '=function(a,b){return s.call(a,b)}:t=function(a,b){return b in a' +
-        '&&w(a.constructor.prototype[b],"undefined")},Function.prototype.' +
-        'bind||(Function.prototype.bind=function(b){var c=this;if(typeof ' +
-        'c!="function")throw new TypeError;var d=q.call(arguments,1),e=fu' +
-        'nction(){if(this instanceof e){var a=function(){};a.prototype=c.' +
-        'prototype;var f=new a,g=c.apply(f,d.concat(q.call(arguments)));r' +
-        'eturn Object(g)===g?g:f}return c.apply(b,d.concat(q.call(argumen' +
-        'ts)))};return e});for(var z in m)t(m,z)&&(r=z.toLowerCase(),e[r]' +
-        '=m[z](),p.push((e[r]?"":"no-")+r));return e.addTest=function(a,b' +
-        '){if(typeof a=="object")for(var d in a)t(a,d)&&e.addTest(d,a[d])' +
-        ';else{a=a.toLowerCase();if(e[a]!==c)return e;b=typeof b=="functi' +
-        'on"?b():b,typeof f!="undefined"&&f&&(g.className+=" "+(b?"":"no-' +
-        '")+a),e[a]=b}return e},u(""),i=k=null,function(a,b){function k(a' +
-        ',b){var c=a.createElement("p"),d=a.getElementsByTagName("head")[' +
-        '0]||a.documentElement;return c.innerHTML="x<style>"+b+"</style>"' +
-        ',d.insertBefore(c.lastChild,d.firstChild)}function l(){var a=r.e' +
-        'lements;return typeof a=="string"?a.split(" "):a}function m(a){v' +
-        'ar b=i[a[g]];return b||(b={},h++,a[g]=h,i[h]=b),b}function n(a,c' +
-        ',f){c||(c=b);if(j)return c.createElement(a);f||(f=m(c));var g;re' +
-        'turn f.cache[a]?g=f.cache[a].cloneNode():e.test(a)?g=(f.cache[a]' +
-        '=f.createElem(a)).cloneNode():g=f.createElem(a),g.canHaveChildre' +
-        'n&&!d.test(a)?f.frag.appendChild(g):g}function o(a,c){a||(a=b);i' +
-        'f(j)return a.createDocumentFragment();c=c||m(a);var d=c.frag.clo' +
-        'neNode(),e=0,f=l(),g=f.length;for(;e<g;e++)d.createElement(f[e])' +
-        ';return d}function p(a,b){b.cache||(b.cache={},b.createElem=a.cr' +
-        'eateElement,b.createFrag=a.createDocumentFragment,b.frag=b.creat' +
-        'eFrag()),a.createElement=function(c){return r.shivMethods?n(c,a,' +
-        'b):b.createElem(c)},a.createDocumentFragment=Function("h,f","ret' +
-        'urn function(){var n=f.cloneNode(),c=n.createElement;h.shivMetho' +
-        'ds&&("+l().join().replace(/\w+/g,function(a){return b.createElem' +
-        '(a),b.frag.createElement(a),'#39'c("'#39'+a+'#39'")'#39'})+");return n}")(r,b.fr' +
-        'ag)}function q(a){a||(a=b);var c=m(a);return r.shivCSS&&!f&&!c.h' +
-        'asCSS&&(c.hasCSS=!!k(a,"article,aside,figcaption,figure,footer,h' +
-        'eader,hgroup,nav,section{display:block}mark{background:#FF0;colo' +
-        'r:#000}")),j||p(a,c),a}var c=a.html5||{},d=/^<|^(?:button|map|se' +
-        'lect|textarea|object|iframe|option|optgroup)$/i,e=/^(?:a|b|code|' +
-        'div|fieldset|h1|h2|h3|h4|h5|h6|i|label|li|ol|p|q|span|strong|sty' +
-        'le|table|tbody|td|th|tr|ul)$/i,f,g="_html5shiv",h=0,i={},j;(func' +
-        'tion(){try{var a=b.createElement("a");a.innerHTML="<xyz></xyz>",' +
-        'f="hidden"in a,j=a.childNodes.length==1||function(){b.createElem' +
-        'ent("a");var a=b.createDocumentFragment();return typeof a.cloneN' +
-        'ode=="undefined"||typeof a.createDocumentFragment=="undefined"||' +
-        'typeof a.createElement=="undefined"}()}catch(c){f=!0,j=!0}})();v' +
-        'ar r={elements:c.elements||"abbr article aside audio bdi canvas ' +
-        'data datalist details figcaption figure footer header hgroup mar' +
-        'k meter nav output progress section summary time video",shivCSS:' +
-        'c.shivCSS!==!1,supportsUnknownElements:j,shivMethods:c.shivMetho' +
-        'ds!==!1,type:"default",shivDocument:q,createElement:n,createDocu' +
-        'mentFragment:o};a.html5=r,q(b)}(this,b),e._version=d,g.className' +
-        '=g.className.replace(/(^|\s)no-js(\s|$)/,"$1$2")+(f?" js "+p.joi' +
-        'n(" "):""),e}(this,this.document);')
-    Left = 152
-    Top = 272
-  end
   object adhead: TPageProducer
     HTMLDoc.Strings = (
       '<#pr>'
       
-        '<form method=post action=<#uri>/adminset style=text-align:center' +
-        '>'
+        '<form method=post action=<#uri>/adminset?db=<#database> style=te' +
+        'xt-align:center>'
       '    <label><p>'#12497#12473#12527#12540#12489#12398#22793#26356
       
         '      <input type="password" style="HEIGHT: 23px; WIDTH: 85px" n' +
         'ame="pass">'
+      '       / '#30906#35469
+      
+        '      <input type=password style=height:23px;width:85px name=pas' +
+        's2>'
       '      </p>'
       '    </label>'
       '    <p>'
@@ -1837,8 +1523,8 @@ object WebModule1: TWebModule1
       '    <p><a href="<#uri>/logout?db=<#database>">'#12525#12464#12450#12454#12488'</a></p>'
       '</form>'
       
-        '<form action=<#uri>/admindel method=post style=text-align:center' +
-        '>')
+        '<form action=<#uri>/admindel?db=<#database> method=post style=te' +
+        'xt-align:center>')
     OnHTMLTag = adheadHTMLTag
     Left = 176
     Top = 88
@@ -1918,6 +1604,7 @@ object WebModule1: TWebModule1
         'abase></a>'#8595'</p>'
       '<div>'#12479#12452#12488#12523': <#title> ; '#35352#20107#25968': <#count> ; '#26356#26032#26178#21051': <#date></div><p>'
       '')
+    DataSet = FDQuery1
     OnHTMLTag = tiHTMLTag
     Left = 48
     Top = 320
@@ -1928,7 +1615,6 @@ object WebModule1: TWebModule1
     MasterFields = 'DBNUM'
     Connection = FDConnection1
     FetchOptions.AssignedValues = [evLiveWindowParanoic]
-    FetchOptions.LiveWindowParanoic = True
     UpdateOptions.UpdateTableName = 'article'
     TableName = 'article'
     Left = 584
@@ -1979,34 +1665,29 @@ object WebModule1: TWebModule1
   object FDTable5: TFDTable
     IndexFieldNames = 'ID'
     Connection = FDConnection1
-    UpdateOptions.UpdateTableName = 'IMAGES'
-    TableName = 'IMAGES'
+    UpdateOptions.UpdateTableName = 'images'
+    TableName = 'images'
     Left = 712
     Top = 184
-    object FDTable5ID: TIntegerField
-      FieldName = 'ID'
-      Origin = 'ID'
+    object FDTable5id: TIntegerField
+      FieldName = 'id'
+      Origin = 'id'
       ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
       Required = True
     end
-    object FDTable5NAME: TWideStringField
-      FieldName = 'NAME'
-      Origin = 'NAME'
+    object FDTable5name: TWideStringField
+      AutoGenerateValue = arDefault
+      FieldName = 'name'
+      Origin = '`name`'
       Size = 30
     end
-    object FDTable5SOURCE: TBlobField
-      FieldName = 'SOURCE'
-      Origin = '"SOURCE"'
+    object FDTable5source: TWideMemoField
+      AutoGenerateValue = arDefault
+      FieldName = 'source'
+      Origin = '`source`'
+      BlobType = ftWideMemo
     end
   end
-  object FDQuery1: TFDQuery
-    Connection = FDConnection1
-    SQL.Strings = (
-      'select dbnum,number,title from article'
-      ' where number = 1;')
-    Left = 624
-    Top = 184
-  end
   object FDTable4: TFDTable
     IndexFieldNames = 'ID'
     Connection = FDConnection1
@@ -2059,10 +1740,8 @@ object WebModule1: TWebModule1
       Origin = 'TITLE2'
       Size = 320
     end
-    object FDTable3mente: TBooleanField
-      FieldKind = fkCalculated
+    object FDTable3mente: TSmallintField
       FieldName = 'mente'
-      Calculated = True
     end
     object FDTable3INFO: TIntegerField
       FieldName = 'INFO'
@@ -2083,7 +1762,8 @@ object WebModule1: TWebModule1
   end
   object FDConnection1: TFDConnection
     Params.Strings = (
-      'ConnectionDef=test_server')
+      'ConnectionDef=first_sql')
+    Connected = True
     Left = 632
     Top = 56
   end
@@ -2106,4 +1786,52 @@ object WebModule1: TWebModule1
       Size = 80
     end
   end
+  object login: TPageProducer
+    HTMLDoc.Strings = (
+      '<!DOCTYPE HTML>'
+      '  <head>'
+      '    <meta charset=utf-8>'
+      '    <title>'#12525#12464#12452#12531'</title>'
+      '  </head>'
+      '  <body>'
+      '<#pr>'
+      '    <p style=text-align:center>'#31649#29702#32773#29992#12525#12464#12452#12531#30011#38754
+      '</p>'
+      '    <br>'
+      '    <form action=<#uri>/login method="post">'
+      '    <p style=text-align:center>'
+      '      <input type=text name=record value=<#database>>'
+      '    '#9'  <input style=height:25px type="password" name="password">'
+      '      <input type="submit" value="'#12525#12464#12452#12531'">'
+      '    </p>'
+      '    </form>'
+      
+        '      <p style=text-align:center><br><a href=<#uri>/ >TOP'#12408#31227#21205'</a>' +
+        '</p>'
+      '  </body>'
+      '</html>')
+    OnHTMLTag = loginHTMLTag
+    Left = 296
+    Top = 96
+  end
+  object footer: TPageProducer
+    HTMLDoc.Strings = (
+      '<p style=text-align:center>[ <#link> ] <#recent>')
+    OnHTMLTag = footerHTMLTag
+    Left = 112
+    Top = 192
+  end
+  object FDGUIxWaitCursor1: TFDGUIxWaitCursor
+    Provider = 'Forms'
+    Left = 632
+    Top = 256
+  end
+  object FDQuery1: TFDQuery
+    Connection = FDConnection1
+    SQL.Strings = (
+      'select dbnum,title,max(date) from article '
+      ' group by dbnum order by max(date);')
+    Left = 616
+    Top = 184
+  end
 end