Changeset 44


Ignore:
Timestamp:
Dec 4, 2010, 6:41:05 PM (14 years ago)
Author:
george
Message:
  • Odstraněno: Soubory patřící pod web server jsou nyní v samostatném balíčku CoolWeb.
Location:
trunk
Files:
1 added
17 deleted
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/CGI.lpi

    r42 r44  
    3636      </local>
    3737    </RunParams>
    38     <RequiredPackages Count="2">
     38    <RequiredPackages Count="3">
    3939      <Item1>
    40         <PackageName Value="TemplateGenerics"/>
     40        <PackageName Value="CoolWeb"/>
    4141      </Item1>
    4242      <Item2>
     43        <PackageName Value="TemplateGenerics"/>
     44      </Item2>
     45      <Item3>
    4346        <PackageName Value="synapse"/>
    4447        <MinVersion Valid="True"/>
    45       </Item2>
     48      </Item3>
    4649    </RequiredPackages>
    47     <Units Count="60">
     50    <Units Count="57">
    4851      <Unit0>
    4952        <Filename Value="CGI.lpr"/>
    5053        <IsPartOfProject Value="True"/>
    5154        <UnitName Value="CGI"/>
    52         <EditorIndex Value="2"/>
    53         <WindowIndex Value="0"/>
    54         <TopLine Value="1"/>
    55         <CursorPos X="43" Y="6"/>
     55        <EditorIndex Value="1"/>
     56        <WindowIndex Value="0"/>
     57        <TopLine Value="1"/>
     58        <CursorPos X="39" Y="27"/>
    5659        <UsageCount Value="203"/>
    5760        <Loaded Value="True"/>
     
    6265        <IsPartOfProject Value="True"/>
    6366        <UnitName Value="UMainPage"/>
    64         <EditorIndex Value="13"/>
    65         <WindowIndex Value="0"/>
    66         <TopLine Value="1"/>
    67         <CursorPos X="47" Y="360"/>
     67        <EditorIndex Value="2"/>
     68        <WindowIndex Value="0"/>
     69        <TopLine Value="269"/>
     70        <CursorPos X="22" Y="272"/>
    6871        <UsageCount Value="200"/>
    6972        <Loaded Value="True"/>
     
    7679        <TopLine Value="291"/>
    7780        <CursorPos X="1" Y="311"/>
    78         <UsageCount Value="110"/>
     81        <UsageCount Value="93"/>
    7982        <DefaultSyntaxHighlighter Value="Delphi"/>
    8083      </Unit2>
    8184      <Unit3>
    8285        <Filename Value="UXmlClasses.pas"/>
    83         <UsageCount Value="110"/>
     86        <UsageCount Value="93"/>
    8487        <DefaultSyntaxHighlighter Value="Delphi"/>
    8588      </Unit3>
     
    8891        <IsPartOfProject Value="True"/>
    8992        <UnitName Value="UCore"/>
    90         <EditorIndex Value="10"/>
    91         <WindowIndex Value="0"/>
    92         <TopLine Value="33"/>
    93         <CursorPos X="69" Y="51"/>
     93        <WindowIndex Value="0"/>
     94        <TopLine Value="2"/>
     95        <CursorPos X="1" Y="19"/>
    9496        <UsageCount Value="203"/>
    95         <Loaded Value="True"/>
    9697        <DefaultSyntaxHighlighter Value="Delphi"/>
    9798      </Unit4>
     
    102103        <TopLine Value="217"/>
    103104        <CursorPos X="5" Y="236"/>
    104         <UsageCount Value="110"/>
     105        <UsageCount Value="93"/>
    105106        <DefaultSyntaxHighlighter Value="Delphi"/>
    106107      </Unit5>
     
    111112        <TopLine Value="10"/>
    112113        <CursorPos X="27" Y="19"/>
    113         <UsageCount Value="110"/>
     114        <UsageCount Value="93"/>
    114115        <DefaultSyntaxHighlighter Value="Delphi"/>
    115116      </Unit6>
     
    119120        <TopLine Value="17"/>
    120121        <CursorPos X="34" Y="30"/>
    121         <UsageCount Value="110"/>
     122        <UsageCount Value="93"/>
    122123        <DefaultSyntaxHighlighter Value="Delphi"/>
    123124      </Unit7>
     
    128129        <TopLine Value="204"/>
    129130        <CursorPos X="25" Y="226"/>
    130         <UsageCount Value="110"/>
     131        <UsageCount Value="93"/>
    131132        <DefaultSyntaxHighlighter Value="Delphi"/>
    132133      </Unit8>
     
    137138        <TopLine Value="102"/>
    138139        <CursorPos X="25" Y="107"/>
    139         <UsageCount Value="110"/>
     140        <UsageCount Value="93"/>
    140141        <DefaultSyntaxHighlighter Value="Delphi"/>
    141142      </Unit9>
     
    146147        <TopLine Value="40"/>
    147148        <CursorPos X="9" Y="59"/>
    148         <UsageCount Value="98"/>
     149        <UsageCount Value="81"/>
    149150        <DefaultSyntaxHighlighter Value="Delphi"/>
    150151      </Unit10>
     
    154155        <TopLine Value="91"/>
    155156        <CursorPos X="10" Y="110"/>
    156         <UsageCount Value="80"/>
     157        <UsageCount Value="63"/>
    157158        <DefaultSyntaxHighlighter Value="Delphi"/>
    158159      </Unit11>
    159160      <Unit12>
    160         <Filename Value="/usr/share/fpcsrc/rtl/objpas/dateutil.inc"/>
    161         <WindowIndex Value="0"/>
    162         <TopLine Value="283"/>
    163         <CursorPos X="10" Y="302"/>
    164         <UsageCount Value="1"/>
     161        <Filename Value="UConfig.pas"/>
     162        <IsPartOfProject Value="True"/>
     163        <UnitName Value="UConfig"/>
     164        <EditorIndex Value="6"/>
     165        <WindowIndex Value="0"/>
     166        <TopLine Value="1"/>
     167        <CursorPos X="1" Y="1"/>
     168        <UsageCount Value="294"/>
     169        <Loaded Value="True"/>
    165170        <DefaultSyntaxHighlighter Value="Delphi"/>
    166171      </Unit12>
    167172      <Unit13>
    168         <Filename Value="UConfig.pas"/>
    169         <IsPartOfProject Value="True"/>
    170         <UnitName Value="UConfig"/>
    171         <EditorIndex Value="1"/>
    172         <WindowIndex Value="0"/>
    173         <TopLine Value="1"/>
    174         <CursorPos X="1" Y="1"/>
    175         <UsageCount Value="294"/>
    176         <Loaded Value="True"/>
    177         <DefaultSyntaxHighlighter Value="Delphi"/>
    178       </Unit13>
    179       <Unit14>
    180173        <Filename Value="style/style.css"/>
    181174        <IsPartOfProject Value="True"/>
     
    184177        <UsageCount Value="294"/>
    185178        <DefaultSyntaxHighlighter Value="None"/>
    186       </Unit14>
    187       <Unit15>
     179      </Unit13>
     180      <Unit14>
    188181        <Filename Value="style/global.js"/>
    189182        <IsPartOfProject Value="True"/>
     
    192185        <UsageCount Value="294"/>
    193186        <DefaultSyntaxHighlighter Value="JScript"/>
     187      </Unit14>
     188      <Unit15>
     189        <Filename Value="UDatabase.pas"/>
     190        <UnitName Value="UDatabase"/>
     191        <WindowIndex Value="0"/>
     192        <TopLine Value="608"/>
     193        <CursorPos X="44" Y="627"/>
     194        <UsageCount Value="62"/>
     195        <DefaultSyntaxHighlighter Value="Delphi"/>
    194196      </Unit15>
    195197      <Unit16>
    196         <Filename Value="UDatabase.pas"/>
    197         <UnitName Value="UDatabase"/>
    198         <WindowIndex Value="0"/>
    199         <TopLine Value="608"/>
    200         <CursorPos X="44" Y="627"/>
    201         <UsageCount Value="79"/>
     198        <Filename Value="UUser.pas"/>
     199        <UnitName Value="UUser"/>
     200        <WindowIndex Value="0"/>
     201        <TopLine Value="39"/>
     202        <CursorPos X="25" Y="58"/>
     203        <UsageCount Value="62"/>
    202204        <DefaultSyntaxHighlighter Value="Delphi"/>
    203205      </Unit16>
    204206      <Unit17>
    205         <Filename Value="UUser.pas"/>
    206         <UnitName Value="UUser"/>
    207         <WindowIndex Value="0"/>
    208         <TopLine Value="39"/>
    209         <CursorPos X="25" Y="58"/>
    210         <UsageCount Value="79"/>
     207        <Filename Value="Pages/UUserPage.pas"/>
     208        <UnitName Value="UUserPage"/>
     209        <WindowIndex Value="0"/>
     210        <TopLine Value="1"/>
     211        <CursorPos X="69" Y="19"/>
     212        <UsageCount Value="58"/>
    211213        <DefaultSyntaxHighlighter Value="Delphi"/>
    212214      </Unit17>
    213215      <Unit18>
    214         <Filename Value="Pages/UUserPage.pas"/>
    215         <UnitName Value="UUserPage"/>
    216         <WindowIndex Value="0"/>
    217         <TopLine Value="1"/>
    218         <CursorPos X="69" Y="19"/>
    219         <UsageCount Value="75"/>
     216        <Filename Value="UBill.pas"/>
     217        <UnitName Value="UBill"/>
     218        <WindowIndex Value="0"/>
     219        <TopLine Value="1"/>
     220        <CursorPos X="52" Y="124"/>
     221        <UsageCount Value="55"/>
    220222        <DefaultSyntaxHighlighter Value="Delphi"/>
    221223      </Unit18>
    222224      <Unit19>
    223         <Filename Value="UBill.pas"/>
    224         <UnitName Value="UBill"/>
    225         <WindowIndex Value="0"/>
    226         <TopLine Value="1"/>
    227         <CursorPos X="52" Y="124"/>
    228         <UsageCount Value="72"/>
     225        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
     226        <WindowIndex Value="0"/>
     227        <TopLine Value="539"/>
     228        <CursorPos X="14" Y="556"/>
     229        <UsageCount Value="64"/>
    229230        <DefaultSyntaxHighlighter Value="Delphi"/>
    230231      </Unit19>
    231232      <Unit20>
    232         <Filename Value="../../../../other/powtils/release/1.7.1/main/dynpwu.pas"/>
    233         <UnitName Value="dynpwu"/>
    234         <WindowIndex Value="0"/>
    235         <TopLine Value="29"/>
    236         <CursorPos X="2" Y="38"/>
    237         <UsageCount Value="10"/>
     233        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutilsh.inc"/>
     234        <WindowIndex Value="0"/>
     235        <TopLine Value="10"/>
     236        <CursorPos X="22" Y="23"/>
     237        <UsageCount Value="64"/>
    238238        <DefaultSyntaxHighlighter Value="Delphi"/>
    239239      </Unit20>
    240240      <Unit21>
    241         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    242         <WindowIndex Value="0"/>
    243         <TopLine Value="539"/>
    244         <CursorPos X="14" Y="556"/>
    245         <UsageCount Value="81"/>
     241        <Filename Value="/usr/share/fpcsrc/rtl/unix/sysutils.pp"/>
     242        <UnitName Value="sysutils"/>
     243        <WindowIndex Value="0"/>
     244        <TopLine Value="1140"/>
     245        <CursorPos X="26" Y="1143"/>
     246        <UsageCount Value="64"/>
    246247        <DefaultSyntaxHighlighter Value="Delphi"/>
    247248      </Unit21>
    248249      <Unit22>
    249         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutilsh.inc"/>
    250         <WindowIndex Value="0"/>
    251         <TopLine Value="10"/>
    252         <CursorPos X="22" Y="23"/>
    253         <UsageCount Value="81"/>
     250        <Filename Value="/usr/share/fpcsrc/rtl/unix/sysunixh.inc"/>
     251        <WindowIndex Value="0"/>
     252        <TopLine Value="43"/>
     253        <CursorPos X="5" Y="61"/>
     254        <UsageCount Value="64"/>
    254255        <DefaultSyntaxHighlighter Value="Delphi"/>
    255256      </Unit22>
    256257      <Unit23>
    257         <Filename Value="/usr/share/fpcsrc/rtl/unix/sysutils.pp"/>
    258         <UnitName Value="sysutils"/>
    259         <WindowIndex Value="0"/>
    260         <TopLine Value="1140"/>
    261         <CursorPos X="26" Y="1143"/>
    262         <UsageCount Value="81"/>
     258        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutil.inc"/>
     259        <WindowIndex Value="0"/>
     260        <TopLine Value="50"/>
     261        <CursorPos X="10" Y="63"/>
     262        <UsageCount Value="64"/>
    263263        <DefaultSyntaxHighlighter Value="Delphi"/>
    264264      </Unit23>
    265265      <Unit24>
    266         <Filename Value="/usr/share/fpcsrc/rtl/unix/sysunixh.inc"/>
    267         <WindowIndex Value="0"/>
    268         <TopLine Value="43"/>
    269         <CursorPos X="5" Y="61"/>
    270         <UsageCount Value="81"/>
     266        <Filename Value="Common/UStringListEx.pas"/>
     267        <UnitName Value="UStringListEx"/>
     268        <WindowIndex Value="0"/>
     269        <TopLine Value="17"/>
     270        <CursorPos X="32" Y="36"/>
     271        <UsageCount Value="183"/>
    271272        <DefaultSyntaxHighlighter Value="Delphi"/>
    272273      </Unit24>
    273274      <Unit25>
    274         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutil.inc"/>
    275         <WindowIndex Value="0"/>
    276         <TopLine Value="50"/>
    277         <CursorPos X="10" Y="63"/>
    278         <UsageCount Value="81"/>
     275        <Filename Value="WebServer/UCGIApplication.pas"/>
     276        <UnitName Value="UCGIApplication"/>
     277        <WindowIndex Value="0"/>
     278        <TopLine Value="8"/>
     279        <CursorPos X="17" Y="19"/>
     280        <UsageCount Value="10"/>
    279281        <DefaultSyntaxHighlighter Value="Delphi"/>
    280282      </Unit25>
    281283      <Unit26>
    282         <Filename Value="Common/UStringListEx.pas"/>
    283         <UnitName Value="UStringListEx"/>
    284         <WindowIndex Value="0"/>
    285         <TopLine Value="17"/>
    286         <CursorPos X="32" Y="36"/>
    287         <UsageCount Value="200"/>
     284        <Filename Value="Common/UDatabase.pas"/>
     285        <UnitName Value="UDatabase"/>
     286        <WindowIndex Value="0"/>
     287        <TopLine Value="25"/>
     288        <CursorPos X="86" Y="94"/>
     289        <UsageCount Value="183"/>
    288290        <DefaultSyntaxHighlighter Value="Delphi"/>
    289291      </Unit26>
    290292      <Unit27>
    291         <Filename Value="WebServer/UCGIApplication.pas"/>
    292         <UnitName Value="UCGIApplication"/>
    293         <WindowIndex Value="0"/>
    294         <TopLine Value="8"/>
    295         <CursorPos X="17" Y="19"/>
    296         <UsageCount Value="27"/>
     293        <Filename Value="Common/UHtmlClasses.pas"/>
     294        <UnitName Value="UHtmlClasses"/>
     295        <WindowIndex Value="0"/>
     296        <TopLine Value="549"/>
     297        <CursorPos X="19" Y="569"/>
     298        <UsageCount Value="184"/>
    297299        <DefaultSyntaxHighlighter Value="Delphi"/>
    298300      </Unit27>
    299301      <Unit28>
    300         <Filename Value="Common/UDatabase.pas"/>
    301         <IsPartOfProject Value="True"/>
    302         <UnitName Value="UDatabase"/>
    303         <WindowIndex Value="0"/>
    304         <TopLine Value="25"/>
    305         <CursorPos X="86" Y="94"/>
    306         <UsageCount Value="200"/>
     302        <Filename Value="Common/USqlDatabase.pas"/>
     303        <UnitName Value="USqlDatabase"/>
     304        <WindowIndex Value="0"/>
     305        <TopLine Value="1"/>
     306        <CursorPos X="64" Y="14"/>
     307        <UsageCount Value="184"/>
    307308        <DefaultSyntaxHighlighter Value="Delphi"/>
    308309      </Unit28>
    309310      <Unit29>
    310         <Filename Value="Common/UHtmlClasses.pas"/>
    311         <IsPartOfProject Value="True"/>
    312         <UnitName Value="UHtmlClasses"/>
    313         <EditorIndex Value="11"/>
    314         <WindowIndex Value="0"/>
    315         <TopLine Value="549"/>
    316         <CursorPos X="19" Y="569"/>
    317         <UsageCount Value="200"/>
    318         <Loaded Value="True"/>
     311        <Filename Value="Common/UXmlClasses.pas"/>
     312        <UnitName Value="UXmlClasses"/>
     313        <WindowIndex Value="0"/>
     314        <TopLine Value="6"/>
     315        <CursorPos X="5" Y="33"/>
     316        <UsageCount Value="184"/>
    319317        <DefaultSyntaxHighlighter Value="Delphi"/>
    320318      </Unit29>
    321319      <Unit30>
    322         <Filename Value="Common/USqlDatabase.pas"/>
    323         <IsPartOfProject Value="True"/>
    324         <UnitName Value="USqlDatabase"/>
    325         <WindowIndex Value="0"/>
    326         <TopLine Value="1"/>
    327         <CursorPos X="64" Y="14"/>
    328         <UsageCount Value="200"/>
     320        <Filename Value="Application/UCustomCGIApplication.pas"/>
     321        <UnitName Value="UCustomCGIApplication"/>
     322        <WindowIndex Value="0"/>
     323        <TopLine Value="99"/>
     324        <CursorPos X="33" Y="117"/>
     325        <UsageCount Value="11"/>
    329326        <DefaultSyntaxHighlighter Value="Delphi"/>
    330327      </Unit30>
    331328      <Unit31>
    332         <Filename Value="Common/UXmlClasses.pas"/>
    333         <IsPartOfProject Value="True"/>
    334         <UnitName Value="UXmlClasses"/>
    335         <EditorIndex Value="7"/>
    336         <WindowIndex Value="0"/>
    337         <TopLine Value="101"/>
    338         <CursorPos X="19" Y="119"/>
    339         <UsageCount Value="200"/>
    340         <Loaded Value="True"/>
     329        <Filename Value="/usr/share/fpcsrc/rtl/inc/mathh.inc"/>
     330        <WindowIndex Value="0"/>
     331        <TopLine Value="61"/>
     332        <CursorPos X="14" Y="78"/>
     333        <UsageCount Value="63"/>
    341334        <DefaultSyntaxHighlighter Value="Delphi"/>
    342335      </Unit31>
    343336      <Unit32>
    344         <Filename Value="Application/UCustomCGIApplication.pas"/>
    345         <UnitName Value="UCustomCGIApplication"/>
    346         <WindowIndex Value="0"/>
    347         <TopLine Value="99"/>
    348         <CursorPos X="33" Y="117"/>
    349         <UsageCount Value="28"/>
     337        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/dati.inc"/>
     338        <WindowIndex Value="0"/>
     339        <TopLine Value="519"/>
     340        <CursorPos X="23" Y="526"/>
     341        <UsageCount Value="59"/>
    350342        <DefaultSyntaxHighlighter Value="Delphi"/>
    351343      </Unit32>
    352344      <Unit33>
    353         <Filename Value="/usr/share/fpcsrc/rtl/inc/mathh.inc"/>
    354         <WindowIndex Value="0"/>
    355         <TopLine Value="61"/>
    356         <CursorPos X="14" Y="78"/>
    357         <UsageCount Value="80"/>
     345        <Filename Value="UConfigSample.pas"/>
     346        <IsPartOfProject Value="True"/>
     347        <UnitName Value="UConfig"/>
     348        <WindowIndex Value="0"/>
     349        <TopLine Value="1"/>
     350        <CursorPos X="53" Y="18"/>
     351        <UsageCount Value="362"/>
    358352        <DefaultSyntaxHighlighter Value="Delphi"/>
    359353      </Unit33>
    360354      <Unit34>
    361         <Filename Value="/usr/share/fpcsrc/rtl/inc/systemh.inc"/>
    362         <WindowIndex Value="0"/>
    363         <TopLine Value="476"/>
    364         <CursorPos X="3" Y="489"/>
    365         <UsageCount Value="4"/>
     355        <Filename Value="Application/UUser.pas"/>
     356        <UnitName Value="UUser"/>
     357        <WindowIndex Value="0"/>
     358        <TopLine Value="1"/>
     359        <CursorPos X="16" Y="164"/>
     360        <UsageCount Value="325"/>
    366361        <DefaultSyntaxHighlighter Value="Delphi"/>
    367362      </Unit34>
    368363      <Unit35>
    369         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/dati.inc"/>
    370         <WindowIndex Value="0"/>
    371         <TopLine Value="519"/>
    372         <CursorPos X="23" Y="526"/>
    373         <UsageCount Value="76"/>
     364        <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
     365        <UnitName Value="UHTTPSessionMySQL"/>
     366        <WindowIndex Value="0"/>
     367        <TopLine Value="81"/>
     368        <CursorPos X="1" Y="96"/>
     369        <UsageCount Value="324"/>
    374370        <DefaultSyntaxHighlighter Value="Delphi"/>
    375371      </Unit35>
    376372      <Unit36>
    377         <Filename Value="UConfigSample.pas"/>
    378         <IsPartOfProject Value="True"/>
    379         <UnitName Value="UConfig"/>
    380         <WindowIndex Value="0"/>
    381         <TopLine Value="1"/>
    382         <CursorPos X="53" Y="18"/>
    383         <UsageCount Value="362"/>
     373        <Filename Value="WebServer/UHTTPSessionFile.pas"/>
     374        <UnitName Value="UHTTPSessionFile"/>
     375        <WindowIndex Value="0"/>
     376        <TopLine Value="1"/>
     377        <CursorPos X="18" Y="45"/>
     378        <UsageCount Value="324"/>
    384379        <DefaultSyntaxHighlighter Value="Delphi"/>
    385380      </Unit36>
    386381      <Unit37>
    387         <Filename Value="Application/UUser.pas"/>
    388         <IsPartOfProject Value="True"/>
    389         <UnitName Value="UUser"/>
    390         <WindowIndex Value="0"/>
    391         <TopLine Value="1"/>
    392         <CursorPos X="16" Y="164"/>
    393         <UsageCount Value="341"/>
     382        <Filename Value="Common/UCommon.pas"/>
     383        <UnitName Value="UCommon"/>
     384        <WindowIndex Value="0"/>
     385        <TopLine Value="142"/>
     386        <CursorPos X="52" Y="165"/>
     387        <UsageCount Value="324"/>
    394388        <DefaultSyntaxHighlighter Value="Delphi"/>
    395389      </Unit37>
    396390      <Unit38>
    397         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    398         <IsPartOfProject Value="True"/>
    399         <UnitName Value="UHTTPSessionMySQL"/>
    400         <WindowIndex Value="0"/>
    401         <TopLine Value="81"/>
    402         <CursorPos X="1" Y="96"/>
    403         <UsageCount Value="340"/>
     391        <Filename Value="WebServer/UHTTPServer.pas"/>
     392        <UnitName Value="UHTTPServer"/>
     393        <WindowIndex Value="0"/>
     394        <TopLine Value="109"/>
     395        <CursorPos X="36" Y="96"/>
     396        <UsageCount Value="324"/>
    404397        <DefaultSyntaxHighlighter Value="Delphi"/>
    405398      </Unit38>
    406399      <Unit39>
    407         <Filename Value="WebServer/UHTTPSessionFile.pas"/>
    408         <IsPartOfProject Value="True"/>
    409         <UnitName Value="UHTTPSessionFile"/>
    410         <WindowIndex Value="0"/>
    411         <TopLine Value="1"/>
    412         <CursorPos X="18" Y="45"/>
    413         <UsageCount Value="340"/>
     400        <Filename Value="WebServer/UHTTPServerTCP.pas"/>
     401        <UnitName Value="UHTTPServerTCP"/>
     402        <WindowIndex Value="0"/>
     403        <TopLine Value="44"/>
     404        <CursorPos X="27" Y="61"/>
     405        <UsageCount Value="324"/>
    414406        <DefaultSyntaxHighlighter Value="Delphi"/>
    415407      </Unit39>
    416408      <Unit40>
    417         <Filename Value="Common/UCommon.pas"/>
    418         <IsPartOfProject Value="True"/>
    419         <UnitName Value="UCommon"/>
    420         <WindowIndex Value="0"/>
    421         <TopLine Value="142"/>
    422         <CursorPos X="52" Y="165"/>
    423         <UsageCount Value="340"/>
     409        <Filename Value="WebServer/UHTTPServerCGI.pas"/>
     410        <UnitName Value="UHTTPServerCGI"/>
     411        <WindowIndex Value="0"/>
     412        <TopLine Value="1"/>
     413        <CursorPos X="50" Y="8"/>
     414        <UsageCount Value="324"/>
    424415        <DefaultSyntaxHighlighter Value="Delphi"/>
    425416      </Unit40>
    426417      <Unit41>
    427         <Filename Value="WebServer/UHTTPServer.pas"/>
    428         <IsPartOfProject Value="True"/>
    429         <UnitName Value="UHTTPServer"/>
    430         <EditorIndex Value="3"/>
    431         <WindowIndex Value="0"/>
    432         <TopLine Value="265"/>
    433         <CursorPos X="1" Y="269"/>
    434         <UsageCount Value="340"/>
    435         <Loaded Value="True"/>
     418        <Filename Value="Network/UTCPServer.pas"/>
     419        <UnitName Value="UTCPServer"/>
     420        <WindowIndex Value="0"/>
     421        <TopLine Value="1"/>
     422        <CursorPos X="21" Y="1"/>
     423        <UsageCount Value="323"/>
    436424        <DefaultSyntaxHighlighter Value="Delphi"/>
    437425      </Unit41>
    438426      <Unit42>
    439         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    440         <IsPartOfProject Value="True"/>
    441         <UnitName Value="UHTTPServerTCP"/>
    442         <EditorIndex Value="12"/>
    443         <WindowIndex Value="0"/>
    444         <TopLine Value="44"/>
    445         <CursorPos X="27" Y="61"/>
    446         <UsageCount Value="340"/>
    447         <Loaded Value="True"/>
     427        <Filename Value="Common/UPool.pas"/>
     428        <UnitName Value="UPool"/>
     429        <WindowIndex Value="0"/>
     430        <TopLine Value="1"/>
     431        <CursorPos X="53" Y="8"/>
     432        <UsageCount Value="323"/>
    448433        <DefaultSyntaxHighlighter Value="Delphi"/>
    449434      </Unit42>
    450435      <Unit43>
    451         <Filename Value="WebServer/UHTTPServerCGI.pas"/>
    452         <IsPartOfProject Value="True"/>
    453         <UnitName Value="UHTTPServerCGI"/>
    454         <EditorIndex Value="6"/>
    455         <WindowIndex Value="0"/>
    456         <TopLine Value="1"/>
    457         <CursorPos X="50" Y="8"/>
    458         <UsageCount Value="340"/>
    459         <Loaded Value="True"/>
     436        <Filename Value="Common/UResetableThread.pas"/>
     437        <UnitName Value="UResetableThread"/>
     438        <WindowIndex Value="0"/>
     439        <TopLine Value="1"/>
     440        <CursorPos X="52" Y="92"/>
     441        <UsageCount Value="323"/>
    460442        <DefaultSyntaxHighlighter Value="Delphi"/>
    461443      </Unit43>
    462444      <Unit44>
    463         <Filename Value="Network/UTCPServer.pas"/>
    464         <IsPartOfProject Value="True"/>
    465         <UnitName Value="UTCPServer"/>
    466         <WindowIndex Value="0"/>
    467         <TopLine Value="1"/>
    468         <CursorPos X="6" Y="15"/>
    469         <UsageCount Value="339"/>
     445        <Filename Value="Common/UMemoryStreamEx.pas"/>
     446        <UnitName Value="UMemoryStreamEx"/>
     447        <WindowIndex Value="0"/>
     448        <TopLine Value="83"/>
     449        <CursorPos X="47" Y="106"/>
     450        <UsageCount Value="323"/>
    470451        <DefaultSyntaxHighlighter Value="Delphi"/>
    471452      </Unit44>
    472453      <Unit45>
    473         <Filename Value="Common/UPool.pas"/>
    474         <IsPartOfProject Value="True"/>
    475         <UnitName Value="UPool"/>
    476         <WindowIndex Value="0"/>
    477         <TopLine Value="1"/>
    478         <CursorPos X="53" Y="8"/>
    479         <UsageCount Value="339"/>
     454        <Filename Value="Common/UMIMEType.pas"/>
     455        <UnitName Value="UMIMEType"/>
     456        <WindowIndex Value="0"/>
     457        <TopLine Value="1"/>
     458        <CursorPos X="3" Y="687"/>
     459        <UsageCount Value="323"/>
    480460        <DefaultSyntaxHighlighter Value="Delphi"/>
    481461      </Unit45>
    482462      <Unit46>
    483         <Filename Value="Common/UResetableThread.pas"/>
    484         <IsPartOfProject Value="True"/>
    485         <UnitName Value="UResetableThread"/>
    486         <WindowIndex Value="0"/>
    487         <TopLine Value="1"/>
    488         <CursorPos X="52" Y="92"/>
    489         <UsageCount Value="339"/>
    490         <DefaultSyntaxHighlighter Value="Delphi"/>
     463        <Filename Value="../../../lazarus/library/synapse/source/lib/blcksock.pas"/>
     464        <UnitName Value="blcksock"/>
     465        <WindowIndex Value="0"/>
     466        <TopLine Value="383"/>
     467        <CursorPos X="15" Y="397"/>
     468        <UsageCount Value="44"/>
    491469      </Unit46>
    492470      <Unit47>
    493         <Filename Value="Common/UMemoryStreamEx.pas"/>
    494         <IsPartOfProject Value="True"/>
    495         <UnitName Value="UMemoryStreamEx"/>
    496         <WindowIndex Value="0"/>
    497         <TopLine Value="83"/>
    498         <CursorPos X="47" Y="106"/>
     471        <Filename Value="Application/UCustomApplication.pas"/>
     472        <IsPartOfProject Value="True"/>
     473        <UnitName Value="UCustomApplication"/>
     474        <EditorIndex Value="0"/>
     475        <WindowIndex Value="0"/>
     476        <TopLine Value="127"/>
     477        <CursorPos X="39" Y="127"/>
    499478        <UsageCount Value="339"/>
     479        <Loaded Value="True"/>
    500480        <DefaultSyntaxHighlighter Value="Delphi"/>
    501481      </Unit47>
    502482      <Unit48>
    503         <Filename Value="Common/UMIMEType.pas"/>
    504         <IsPartOfProject Value="True"/>
    505         <UnitName Value="UMIMEType"/>
    506         <WindowIndex Value="0"/>
    507         <TopLine Value="1"/>
    508         <CursorPos X="3" Y="687"/>
    509         <UsageCount Value="339"/>
     483        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
     484        <WindowIndex Value="0"/>
     485        <TopLine Value="690"/>
     486        <CursorPos X="3" Y="695"/>
     487        <UsageCount Value="44"/>
    510488        <DefaultSyntaxHighlighter Value="Delphi"/>
    511489      </Unit48>
    512490      <Unit49>
    513         <Filename Value="../../../lazarus/library/synapse/source/lib/blcksock.pas"/>
    514         <UnitName Value="blcksock"/>
    515         <WindowIndex Value="0"/>
    516         <TopLine Value="383"/>
    517         <CursorPos X="15" Y="397"/>
    518         <UsageCount Value="61"/>
     491        <Filename Value="Application/UPageList.pas"/>
     492        <UnitName Value="UPageList"/>
     493        <WindowIndex Value="0"/>
     494        <TopLine Value="1"/>
     495        <CursorPos X="43" Y="79"/>
     496        <UsageCount Value="320"/>
     497        <DefaultSyntaxHighlighter Value="Delphi"/>
    519498      </Unit49>
    520499      <Unit50>
    521         <Filename Value="Application/UCustomApplication.pas"/>
    522         <IsPartOfProject Value="True"/>
    523         <UnitName Value="UCustomApplication"/>
    524         <EditorIndex Value="0"/>
    525         <WindowIndex Value="0"/>
    526         <TopLine Value="11"/>
    527         <CursorPos X="20" Y="28"/>
    528         <UsageCount Value="339"/>
    529         <Loaded Value="True"/>
    530         <DefaultSyntaxHighlighter Value="Delphi"/>
    531       </Unit50>
    532       <Unit51>
    533         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
    534         <WindowIndex Value="0"/>
    535         <TopLine Value="690"/>
    536         <CursorPos X="3" Y="695"/>
    537         <UsageCount Value="61"/>
    538         <DefaultSyntaxHighlighter Value="Delphi"/>
    539       </Unit51>
    540       <Unit52>
    541         <Filename Value="Application/UPageList.pas"/>
    542         <IsPartOfProject Value="True"/>
    543         <UnitName Value="UPageList"/>
    544         <WindowIndex Value="0"/>
    545         <TopLine Value="1"/>
    546         <CursorPos X="43" Y="79"/>
    547         <UsageCount Value="336"/>
    548         <DefaultSyntaxHighlighter Value="Delphi"/>
    549       </Unit52>
    550       <Unit53>
    551         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedList.pas"/>
    552         <UnitName Value="SpecializedList"/>
    553         <EditorIndex Value="4"/>
    554         <WindowIndex Value="0"/>
    555         <TopLine Value="39"/>
    556         <CursorPos X="20" Y="56"/>
    557         <UsageCount Value="10"/>
    558         <Loaded Value="True"/>
    559       </Unit53>
    560       <Unit54>
    561500        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
    562501        <IsVisibleTab Value="True"/>
    563502        <EditorIndex Value="5"/>
    564503        <WindowIndex Value="0"/>
    565         <TopLine Value="23"/>
    566         <CursorPos X="15" Y="40"/>
    567         <UsageCount Value="100"/>
     504        <TopLine Value="6"/>
     505        <CursorPos X="22" Y="19"/>
     506        <UsageCount Value="179"/>
     507        <Loaded Value="True"/>
     508      </Unit50>
     509      <Unit51>
     510        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedDictionary.pas"/>
     511        <UnitName Value="SpecializedDictionary"/>
     512        <WindowIndex Value="0"/>
     513        <TopLine Value="1"/>
     514        <CursorPos X="26" Y="18"/>
     515        <UsageCount Value="84"/>
     516      </Unit51>
     517      <Unit52>
     518        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/Modules/UUser.pas"/>
     519        <UnitName Value="UUser"/>
     520        <EditorIndex Value="8"/>
     521        <WindowIndex Value="0"/>
     522        <TopLine Value="91"/>
     523        <CursorPos X="20" Y="8"/>
     524        <UsageCount Value="93"/>
     525        <Loaded Value="True"/>
     526      </Unit52>
     527      <Unit53>
     528        <Filename Value="../../../lazarus/trunk/ide/lazarus.pp"/>
     529        <UnitName Value="Lazarus"/>
     530        <EditorIndex Value="7"/>
     531        <WindowIndex Value="0"/>
     532        <TopLine Value="1"/>
     533        <CursorPos X="44" Y="17"/>
     534        <UsageCount Value="92"/>
     535        <Loaded Value="True"/>
     536      </Unit53>
     537      <Unit54>
     538        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/CoolWeb.pas"/>
     539        <UnitName Value="CoolWeb"/>
     540        <EditorIndex Value="3"/>
     541        <WindowIndex Value="0"/>
     542        <TopLine Value="1"/>
     543        <CursorPos X="34" Y="13"/>
     544        <UsageCount Value="10"/>
    568545        <Loaded Value="True"/>
    569546      </Unit54>
    570547      <Unit55>
    571         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericDictionary.inc"/>
    572         <EditorIndex Value="9"/>
    573         <WindowIndex Value="0"/>
    574         <TopLine Value="1"/>
    575         <CursorPos X="24" Y="11"/>
     548        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/TemplateGenerics.pas"/>
     549        <UnitName Value="TemplateGenerics"/>
     550        <EditorIndex Value="4"/>
     551        <WindowIndex Value="0"/>
     552        <TopLine Value="1"/>
     553        <CursorPos X="60" Y="11"/>
    576554        <UsageCount Value="10"/>
    577555        <Loaded Value="True"/>
    578556      </Unit55>
    579557      <Unit56>
    580         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericQueue.inc"/>
    581         <WindowIndex Value="0"/>
    582         <TopLine Value="1"/>
    583         <CursorPos X="50" Y="43"/>
     558        <Filename Value="../../../lazarus/trunk/components/codetools/ctxmlfixfragment.pas"/>
     559        <UnitName Value="CTXMLFixFragment"/>
     560        <WindowIndex Value="0"/>
     561        <TopLine Value="92"/>
     562        <CursorPos X="7" Y="119"/>
    584563        <UsageCount Value="10"/>
    585564      </Unit56>
    586       <Unit57>
    587         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericTree.inc"/>
    588         <WindowIndex Value="0"/>
    589         <TopLine Value="1"/>
    590         <CursorPos X="49" Y="47"/>
    591         <UsageCount Value="10"/>
    592       </Unit57>
    593       <Unit58>
    594         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedDictionary.pas"/>
    595         <UnitName Value="SpecializedDictionary"/>
    596         <EditorIndex Value="8"/>
    597         <WindowIndex Value="0"/>
    598         <TopLine Value="1"/>
    599         <CursorPos X="26" Y="18"/>
    600         <UsageCount Value="100"/>
    601         <Loaded Value="True"/>
    602       </Unit58>
    603       <Unit59>
    604         <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedObjectList.pas"/>
    605         <UnitName Value="SpecializedObjectList"/>
    606         <WindowIndex Value="0"/>
    607         <TopLine Value="1"/>
    608         <CursorPos X="27" Y="20"/>
    609         <UsageCount Value="10"/>
    610       </Unit59>
    611565    </Units>
    612     <JumpHistory Count="30" HistoryIndex="29">
     566    <JumpHistory Count="10" HistoryIndex="9">
    613567      <Position1>
    614         <Filename Value="WebServer/UHTTPServer.pas"/>
    615         <Caret Line="279" Column="24" TopLine="261"/>
     568        <Filename Value="Application/UCustomApplication.pas"/>
     569        <Caret Line="266" Column="44" TopLine="239"/>
    616570      </Position1>
    617571      <Position2>
    618         <Filename Value="WebServer/UHTTPServer.pas"/>
    619         <Caret Line="281" Column="38" TopLine="264"/>
     572        <Filename Value="Application/UCustomApplication.pas"/>
     573        <Caret Line="170" Column="26" TopLine="149"/>
    620574      </Position2>
    621575      <Position3>
    622         <Filename Value="WebServer/UHTTPServer.pas"/>
    623         <Caret Line="272" Column="19" TopLine="266"/>
     576        <Filename Value="CGI.lpr"/>
     577        <Caret Line="27" Column="39" TopLine="1"/>
    624578      </Position3>
    625579      <Position4>
    626         <Filename Value="WebServer/UHTTPServerCGI.pas"/>
    627         <Caret Line="29" Column="3" TopLine="1"/>
     580        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
     581        <Caret Line="47" Column="81" TopLine="23"/>
    628582      </Position4>
    629583      <Position5>
    630         <Filename Value="WebServer/UHTTPServerCGI.pas"/>
    631         <Caret Line="60" Column="69" TopLine="43"/>
     584        <Filename Value="../../../lazarus/trunk/ide/lazarus.pp"/>
     585        <Caret Line="1" Column="1" TopLine="1"/>
    632586      </Position5>
    633587      <Position6>
    634         <Filename Value="Common/UXmlClasses.pas"/>
    635         <Caret Line="7" Column="50" TopLine="1"/>
     588        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/CoolWeb.pas"/>
     589        <Caret Line="1" Column="1" TopLine="1"/>
    636590      </Position6>
    637591      <Position7>
    638         <Filename Value="Common/UXmlClasses.pas"/>
    639         <Caret Line="31" Column="28" TopLine="14"/>
     592        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/CoolWeb.pas"/>
     593        <Caret Line="10" Column="3" TopLine="1"/>
    640594      </Position7>
    641595      <Position8>
    642         <Filename Value="Common/UXmlClasses.pas"/>
    643         <Caret Line="59" Column="28" TopLine="42"/>
     596        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/CoolWeb.pas"/>
     597        <Caret Line="13" Column="14" TopLine="1"/>
    644598      </Position8>
    645599      <Position9>
    646         <Filename Value="Common/UXmlClasses.pas"/>
    647         <Caret Line="60" Column="1" TopLine="43"/>
     600        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/CoolWeb.pas"/>
     601        <Caret Line="1" Column="1" TopLine="1"/>
    648602      </Position9>
    649603      <Position10>
    650         <Filename Value="Common/UXmlClasses.pas"/>
    651         <Caret Line="83" Column="54" TopLine="66"/>
     604        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/TemplateGenerics.pas"/>
     605        <Caret Line="10" Column="3" TopLine="1"/>
    652606      </Position10>
    653       <Position11>
    654         <Filename Value="Common/UXmlClasses.pas"/>
    655         <Caret Line="31" Column="26" TopLine="14"/>
    656       </Position11>
    657       <Position12>
    658         <Filename Value="Common/UXmlClasses.pas"/>
    659         <Caret Line="83" Column="55" TopLine="66"/>
    660       </Position12>
    661       <Position13>
    662         <Filename Value="Common/UXmlClasses.pas"/>
    663         <Caret Line="8" Column="24" TopLine="1"/>
    664       </Position13>
    665       <Position14>
    666         <Filename Value="Common/UXmlClasses.pas"/>
    667         <Caret Line="60" Column="21" TopLine="43"/>
    668       </Position14>
    669       <Position15>
    670         <Filename Value="Common/UXmlClasses.pas"/>
    671         <Caret Line="84" Column="93" TopLine="67"/>
    672       </Position15>
    673       <Position16>
    674         <Filename Value="Common/UXmlClasses.pas"/>
    675         <Caret Line="118" Column="14" TopLine="101"/>
    676       </Position16>
    677       <Position17>
    678         <Filename Value="Common/UXmlClasses.pas"/>
    679         <Caret Line="32" Column="23" TopLine="15"/>
    680       </Position17>
    681       <Position18>
    682         <Filename Value="Common/UHtmlClasses.pas"/>
    683         <Caret Line="600" Column="29" TopLine="579"/>
    684       </Position18>
    685       <Position19>
    686         <Filename Value="Common/UHtmlClasses.pas"/>
    687         <Caret Line="8" Column="50" TopLine="1"/>
    688       </Position19>
    689       <Position20>
    690         <Filename Value="Common/UHtmlClasses.pas"/>
    691         <Caret Line="273" Column="25" TopLine="242"/>
    692       </Position20>
    693       <Position21>
    694         <Filename Value="Common/UHtmlClasses.pas"/>
    695         <Caret Line="280" Column="25" TopLine="262"/>
    696       </Position21>
    697       <Position22>
    698         <Filename Value="Common/UHtmlClasses.pas"/>
    699         <Caret Line="388" Column="39" TopLine="366"/>
    700       </Position22>
    701       <Position23>
    702         <Filename Value="Common/UHtmlClasses.pas"/>
    703         <Caret Line="472" Column="22" TopLine="450"/>
    704       </Position23>
    705       <Position24>
    706         <Filename Value="Common/UHtmlClasses.pas"/>
    707         <Caret Line="499" Column="28" TopLine="482"/>
    708       </Position24>
    709       <Position25>
    710         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    711         <Caret Line="100" Column="65" TopLine="1"/>
    712       </Position25>
    713       <Position26>
    714         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    715         <Caret Line="8" Column="62" TopLine="1"/>
    716       </Position26>
    717       <Position27>
    718         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    719         <Caret Line="32" Column="25" TopLine="15"/>
    720       </Position27>
    721       <Position28>
    722         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    723         <Caret Line="48" Column="27" TopLine="31"/>
    724       </Position28>
    725       <Position29>
    726         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    727         <Caret Line="52" Column="52" TopLine="35"/>
    728       </Position29>
    729       <Position30>
    730         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    731         <Caret Line="61" Column="27" TopLine="44"/>
    732       </Position30>
    733607    </JumpHistory>
    734608  </ProjectOptions>
     
    740614    <SearchPaths>
    741615      <OtherUnitFiles Value="/usr/lib/mysql/;/usr/lib64/mysql/;Pages;Common;Application;WebServer;Network"/>
    742       <UnitOutputDirectory Value="bin"/>
     616      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    743617      <LCLWidgetType Value="gtk2"/>
    744618    </SearchPaths>
     
    765639      </Verbosity>
    766640      <WriteFPCLogo Value="False"/>
     641      <CompilerMessages>
     642        <UseMsgFile Value="True"/>
     643      </CompilerMessages>
    767644      <CompilerPath Value="$(CompPath)"/>
    768645    </Other>
  • trunk/TCPServer.lpi

    r33 r44  
    1919      <StringTable ProductVersion=""/>
    2020    </VersionInfo>
     21    <BuildModes Count="1">
     22      <Item1 Name="default" Default="True"/>
     23    </BuildModes>
    2124    <PublishOptions>
    2225      <Version Value="2"/>
     
    3033      </local>
    3134    </RunParams>
    32     <RequiredPackages Count="2">
     35    <RequiredPackages Count="3">
    3336      <Item1>
    34         <PackageName Value="LCL"/>
     37        <PackageName Value="TemplateGenerics"/>
    3538      </Item1>
    3639      <Item2>
     40        <PackageName Value="LCL"/>
     41      </Item2>
     42      <Item3>
    3743        <PackageName Value="synapse"/>
    38       </Item2>
     44      </Item3>
    3945    </RequiredPackages>
    40     <Units Count="20">
     46    <Units Count="23">
    4147      <Unit0>
    4248        <Filename Value="TCPServer.lpr"/>
    4349        <IsPartOfProject Value="True"/>
    4450        <UnitName Value="TCPServer"/>
    45         <IsVisibleTab Value="True"/>
    4651        <EditorIndex Value="0"/>
    4752        <WindowIndex Value="0"/>
    48         <TopLine Value="12"/>
    49         <CursorPos X="1" Y="37"/>
     53        <TopLine Value="1"/>
     54        <CursorPos X="1" Y="1"/>
    5055        <UsageCount Value="20"/>
    5156        <Loaded Value="True"/>
     
    5661        <IsPartOfProject Value="True"/>
    5762        <UnitName Value="UCommon"/>
    58         <EditorIndex Value="2"/>
     63        <EditorIndex Value="5"/>
    5964        <WindowIndex Value="0"/>
    6065        <TopLine Value="1"/>
     
    6671      <Unit2>
    6772        <Filename Value="Common/UDatabase.pas"/>
    68         <IsPartOfProject Value="True"/>
    6973        <UnitName Value="UDatabase"/>
    70         <EditorIndex Value="3"/>
    71         <WindowIndex Value="0"/>
    72         <TopLine Value="1"/>
    73         <CursorPos X="1" Y="1"/>
    74         <UsageCount Value="20"/>
    75         <Loaded Value="True"/>
     74        <WindowIndex Value="0"/>
     75        <TopLine Value="614"/>
     76        <CursorPos X="3" Y="619"/>
     77        <UsageCount Value="20"/>
    7678        <DefaultSyntaxHighlighter Value="Delphi"/>
    7779      </Unit2>
     
    8789        <IsPartOfProject Value="True"/>
    8890        <UnitName Value="UMemoryStreamEx"/>
    89         <EditorIndex Value="9"/>
     91        <EditorIndex Value="14"/>
    9092        <WindowIndex Value="0"/>
    9193        <TopLine Value="194"/>
     
    106108        <IsPartOfProject Value="True"/>
    107109        <UnitName Value="UPool"/>
    108         <UsageCount Value="20"/>
     110        <EditorIndex Value="3"/>
     111        <WindowIndex Value="0"/>
     112        <TopLine Value="1"/>
     113        <CursorPos X="32" Y="8"/>
     114        <UsageCount Value="20"/>
     115        <Loaded Value="True"/>
    109116        <DefaultSyntaxHighlighter Value="Delphi"/>
    110117      </Unit6>
     
    120127        <IsPartOfProject Value="True"/>
    121128        <UnitName Value="USqlDatabase"/>
    122         <UsageCount Value="20"/>
     129        <EditorIndex Value="9"/>
     130        <WindowIndex Value="0"/>
     131        <TopLine Value="38"/>
     132        <CursorPos X="15" Y="55"/>
     133        <UsageCount Value="20"/>
     134        <Loaded Value="True"/>
    123135        <DefaultSyntaxHighlighter Value="Delphi"/>
    124136      </Unit8>
    125137      <Unit9>
    126138        <Filename Value="Common/UStringListEx.pas"/>
    127         <IsPartOfProject Value="True"/>
    128139        <UnitName Value="UStringListEx"/>
    129         <EditorIndex Value="6"/>
    130140        <WindowIndex Value="0"/>
    131141        <TopLine Value="1"/>
    132142        <CursorPos X="74" Y="23"/>
    133143        <UsageCount Value="20"/>
    134         <Loaded Value="True"/>
    135144        <DefaultSyntaxHighlighter Value="Delphi"/>
    136145      </Unit9>
     
    139148        <IsPartOfProject Value="True"/>
    140149        <UnitName Value="UXmlClasses"/>
    141         <UsageCount Value="20"/>
     150        <EditorIndex Value="8"/>
     151        <WindowIndex Value="0"/>
     152        <TopLine Value="1"/>
     153        <CursorPos X="1" Y="1"/>
     154        <UsageCount Value="20"/>
     155        <Loaded Value="True"/>
    142156        <DefaultSyntaxHighlighter Value="Delphi"/>
    143157      </Unit10>
     
    146160        <IsPartOfProject Value="True"/>
    147161        <UnitName Value="UCustomApplication"/>
    148         <EditorIndex Value="10"/>
     162        <EditorIndex Value="15"/>
    149163        <WindowIndex Value="0"/>
    150164        <TopLine Value="1"/>
     
    158172        <IsPartOfProject Value="True"/>
    159173        <UnitName Value="UUser"/>
    160         <EditorIndex Value="1"/>
     174        <EditorIndex Value="4"/>
    161175        <WindowIndex Value="0"/>
    162176        <TopLine Value="35"/>
     
    170184        <IsPartOfProject Value="True"/>
    171185        <UnitName Value="UTCPServer"/>
    172         <EditorIndex Value="7"/>
     186        <EditorIndex Value="12"/>
    173187        <WindowIndex Value="0"/>
    174188        <TopLine Value="1"/>
     
    182196        <IsPartOfProject Value="True"/>
    183197        <UnitName Value="UMainPage"/>
    184         <UsageCount Value="20"/>
     198        <IsVisibleTab Value="True"/>
     199        <EditorIndex Value="2"/>
     200        <WindowIndex Value="0"/>
     201        <TopLine Value="1"/>
     202        <CursorPos X="42" Y="11"/>
     203        <UsageCount Value="20"/>
     204        <Loaded Value="True"/>
    185205        <DefaultSyntaxHighlighter Value="Delphi"/>
    186206      </Unit14>
     
    189209        <IsPartOfProject Value="True"/>
    190210        <UnitName Value="UHTTPServer"/>
    191         <EditorIndex Value="8"/>
     211        <EditorIndex Value="13"/>
    192212        <WindowIndex Value="0"/>
    193213        <TopLine Value="1"/>
     
    208228        <IsPartOfProject Value="True"/>
    209229        <UnitName Value="UHTTPServerTCP"/>
    210         <EditorIndex Value="5"/>
     230        <EditorIndex Value="11"/>
    211231        <WindowIndex Value="0"/>
    212232        <TopLine Value="1"/>
     
    227247        <IsPartOfProject Value="True"/>
    228248        <UnitName Value="UHTTPSessionMySQL"/>
    229         <EditorIndex Value="4"/>
     249        <EditorIndex Value="10"/>
    230250        <WindowIndex Value="0"/>
    231251        <TopLine Value="1"/>
     
    235255        <DefaultSyntaxHighlighter Value="Delphi"/>
    236256      </Unit19>
     257      <Unit20>
     258        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
     259        <EditorIndex Value="6"/>
     260        <WindowIndex Value="0"/>
     261        <TopLine Value="47"/>
     262        <CursorPos X="37" Y="55"/>
     263        <UsageCount Value="10"/>
     264        <Loaded Value="True"/>
     265      </Unit20>
     266      <Unit21>
     267        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedObjectList.pas"/>
     268        <UnitName Value="SpecializedObjectList"/>
     269        <EditorIndex Value="7"/>
     270        <WindowIndex Value="0"/>
     271        <TopLine Value="1"/>
     272        <CursorPos X="1" Y="26"/>
     273        <UsageCount Value="10"/>
     274        <Loaded Value="True"/>
     275      </Unit21>
     276      <Unit22>
     277        <Filename Value="UCore.pas"/>
     278        <UnitName Value="UCore"/>
     279        <EditorIndex Value="1"/>
     280        <WindowIndex Value="0"/>
     281        <TopLine Value="1"/>
     282        <CursorPos X="34" Y="18"/>
     283        <UsageCount Value="10"/>
     284        <Loaded Value="True"/>
     285        <DefaultSyntaxHighlighter Value="Delphi"/>
     286      </Unit22>
    237287    </Units>
    238     <JumpHistory Count="28" HistoryIndex="27">
     288    <JumpHistory Count="3" HistoryIndex="2">
    239289      <Position1>
    240290        <Filename Value="TCPServer.lpr"/>
    241         <Caret Line="12" Column="42" TopLine="1"/>
     291        <Caret Line="18" Column="43" TopLine="3"/>
    242292      </Position1>
    243293      <Position2>
    244         <Filename Value="TCPServer.lpr"/>
    245         <Caret Line="7" Column="40" TopLine="1"/>
     294        <Filename Value="UCore.pas"/>
     295        <Caret Line="1" Column="1" TopLine="1"/>
    246296      </Position2>
    247297      <Position3>
    248         <Filename Value="Network/UTCPServer.pas"/>
     298        <Filename Value="Pages/UMainPage.pas"/>
    249299        <Caret Line="1" Column="1" TopLine="1"/>
    250300      </Position3>
    251       <Position4>
    252         <Filename Value="WebServer/UHTTPServer.pas"/>
    253         <Caret Line="1" Column="1" TopLine="1"/>
    254       </Position4>
    255       <Position5>
    256         <Filename Value="Common/UMemoryStreamEx.pas"/>
    257         <Caret Line="1" Column="1" TopLine="1"/>
    258       </Position5>
    259       <Position6>
    260         <Filename Value="WebServer/UHTTPServer.pas"/>
    261         <Caret Line="8" Column="60" TopLine="1"/>
    262       </Position6>
    263       <Position7>
    264         <Filename Value="Common/UStringListEx.pas"/>
    265         <Caret Line="1" Column="1" TopLine="1"/>
    266       </Position7>
    267       <Position8>
    268         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    269         <Caret Line="1" Column="1" TopLine="1"/>
    270       </Position8>
    271       <Position9>
    272         <Filename Value="Application/UCustomApplication.pas"/>
    273         <Caret Line="17" Column="41" TopLine="1"/>
    274       </Position9>
    275       <Position10>
    276         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    277         <Caret Line="22" Column="33" TopLine="1"/>
    278       </Position10>
    279       <Position11>
    280         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    281         <Caret Line="1" Column="1" TopLine="1"/>
    282       </Position11>
    283       <Position12>
    284         <Filename Value="TCPServer.lpr"/>
    285         <Caret Line="7" Column="54" TopLine="1"/>
    286       </Position12>
    287       <Position13>
    288         <Filename Value="TCPServer.lpr"/>
    289         <Caret Line="8" Column="15" TopLine="1"/>
    290       </Position13>
    291       <Position14>
    292         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    293         <Caret Line="1" Column="1" TopLine="1"/>
    294       </Position14>
    295       <Position15>
    296         <Filename Value="TCPServer.lpr"/>
    297         <Caret Line="10" Column="3" TopLine="1"/>
    298       </Position15>
    299       <Position16>
    300         <Filename Value="Common/UDatabase.pas"/>
    301         <Caret Line="1" Column="1" TopLine="1"/>
    302       </Position16>
    303       <Position17>
    304         <Filename Value="Application/UUser.pas"/>
    305         <Caret Line="1" Column="1" TopLine="1"/>
    306       </Position17>
    307       <Position18>
    308         <Filename Value="Application/UUser.pas"/>
    309         <Caret Line="8" Column="43" TopLine="1"/>
    310       </Position18>
    311       <Position19>
    312         <Filename Value="Application/UUser.pas"/>
    313         <Caret Line="25" Column="8" TopLine="12"/>
    314       </Position19>
    315       <Position20>
    316         <Filename Value="Application/UUser.pas"/>
    317         <Caret Line="42" Column="10" TopLine="29"/>
    318       </Position20>
    319       <Position21>
    320         <Filename Value="Application/UUser.pas"/>
    321         <Caret Line="26" Column="1" TopLine="2"/>
    322       </Position21>
    323       <Position22>
    324         <Filename Value="Application/UUser.pas"/>
    325         <Caret Line="8" Column="67" TopLine="1"/>
    326       </Position22>
    327       <Position23>
    328         <Filename Value="Application/UUser.pas"/>
    329         <Caret Line="51" Column="41" TopLine="29"/>
    330       </Position23>
    331       <Position24>
    332         <Filename Value="TCPServer.lpr"/>
    333         <Caret Line="11" Column="61" TopLine="1"/>
    334       </Position24>
    335       <Position25>
    336         <Filename Value="TCPServer.lpr"/>
    337         <Caret Line="22" Column="42" TopLine="10"/>
    338       </Position25>
    339       <Position26>
    340         <Filename Value="Application/UUser.pas"/>
    341         <Caret Line="57" Column="28" TopLine="43"/>
    342       </Position26>
    343       <Position27>
    344         <Filename Value="TCPServer.lpr"/>
    345         <Caret Line="14" Column="31" TopLine="1"/>
    346       </Position27>
    347       <Position28>
    348         <Filename Value="TCPServer.lpr"/>
    349         <Caret Line="37" Column="1" TopLine="12"/>
    350       </Position28>
    351301    </JumpHistory>
    352302  </ProjectOptions>
     
    357307    </Target>
    358308    <SearchPaths>
    359       <IncludeFiles Value="$(ProjOutDir)/"/>
    360       <OtherUnitFiles Value="/usr/lib/mysql/;/usr/lib64/mysql/;Common/;Application/;Network/;Pages/;WebServer/"/>
     309      <IncludeFiles Value="$(ProjOutDir)"/>
     310      <OtherUnitFiles Value="/usr/lib/mysql/;/usr/lib64/mysql/;Common;Application;Network;Pages;WebServer"/>
    361311      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    362312    </SearchPaths>
     
    364314      <SyntaxOptions>
    365315        <SyntaxMode Value="Delphi"/>
     316        <CStyleMacros Value="True"/>
    366317      </SyntaxOptions>
    367318    </Parsing>
  • trunk/TCPServer.lpr

    r33 r44  
    99  UHTTPSessionMySQL, UHTTPServerCGI, UHTTPServerTCP, UXmlClasses,
    1010  UCommon, UMemoryStreamEx, UMIMEType, UPool,
    11   UResetableThread, USqlDatabase, UStringListEx, UDatabase,
    12   UUser, UMainPage, synapse;
     11  UResetableThread, USqlDatabase,
     12  UUser, UMainPage, TemplateGenerics, synapse;
    1313
    1414//{$IFDEF WINDOWS}{$R LiftManagerWebServer.rc}{$ENDIF}
  • trunk/UCore.pas

    r27 r44  
    88  USqlDatabase, Classes, SysUtils, StrUtils;
    99 
    10 type
    11   TArrayOfString = array of string;
    12 
    1310function NavigationLink(URL: string): string;
    1411function MakeLink(Text, URL: string): string;
     
    1815function ShowHeader(Title, Path: string): string;
    1916function ShowFooter: string;
    20 function Explode(Separator: Char; Data: string): TArrayOfString;
    2117function HumanDate(Date: TDateTime): string;
    2218function PagesList(URL: string; Page, TotalCount, CountPerPage: Integer): string;
    23 function StrRepeat(Data: string; Count: Integer): string;
    2419
    2520implementation
     
    6358  //ShowArray($GLOBALS);
    6459  Result := Result + '</body></html>';
    65 end;
    66 
    67 function Explode(Separator: Char; Data: string): TArrayOfString;
    68 begin
    69   SetLength(Result, 0);
    70   while Pos(Separator, Data) > 0 do begin
    71     SetLength(Result, Length(Result) + 1);
    72     Result[High(Result)] := Copy(Data, 1, Pos(Separator, Data) - 1);
    73     Delete(Data, 1, Pos(Separator, Data));
    74   end;
    75   SetLength(Result, Length(Result) + 1);
    76   Result[High(Result)] := Data;
    7760end;
    7861
     
    153136end;
    154137
    155 function StrRepeat(Data: string; Count: Integer): string;
    156 var
    157   I: Integer;
    158 begin 
    159   Result := '';
    160   for I := 1 to Count do
    161     Result := Result + Data;
    162 end;
    163 
    164138
    165139initialization
Note: See TracChangeset for help on using the changeset viewer.