Changeset 40 for trunk


Ignore:
Timestamp:
Nov 17, 2010, 7:38:07 PM (14 years ago)
Author:
george
Message:
  • Upraveno: Třída TStringListEx nahrazena specializovanou TListString.
Location:
trunk
Files:
1 deleted
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/CGI.lpi

    r39 r40  
    4545      </Item2>
    4646    </RequiredPackages>
    47     <Units Count="55">
     47    <Units Count="60">
    4848      <Unit0>
    4949        <Filename Value="CGI.lpr"/>
    5050        <IsPartOfProject Value="True"/>
    5151        <UnitName Value="CGI"/>
    52         <EditorIndex Value="0"/>
    5352        <WindowIndex Value="0"/>
    5453        <TopLine Value="1"/>
    5554        <CursorPos X="30" Y="27"/>
    5655        <UsageCount Value="203"/>
    57         <Loaded Value="True"/>
    58         <LoadedDesigner Value="True"/>
    5956        <DefaultSyntaxHighlighter Value="Delphi"/>
    6057      </Unit0>
    … …  
    6360        <IsPartOfProject Value="True"/>
    6461        <UnitName Value="UMainPage"/>
    65         <IsVisibleTab Value="True"/>
    66         <EditorIndex Value="25"/>
    6762        <WindowIndex Value="0"/>
    6863        <TopLine Value="216"/>
    6964        <CursorPos X="179" Y="235"/>
    7065        <UsageCount Value="200"/>
    71         <Loaded Value="True"/>
    7266        <DefaultSyntaxHighlighter Value="Delphi"/>
    7367      </Unit1>
    … …  
    7872        <TopLine Value="291"/>
    7973        <CursorPos X="1" Y="311"/>
    80         <UsageCount Value="129"/>
     74        <UsageCount Value="110"/>
    8175        <DefaultSyntaxHighlighter Value="Delphi"/>
    8276      </Unit2>
    8377      <Unit3>
    8478        <Filename Value="UXmlClasses.pas"/>
    85         <UsageCount Value="129"/>
     79        <UsageCount Value="110"/>
    8680        <DefaultSyntaxHighlighter Value="Delphi"/>
    8781      </Unit3>
    … …  
    9084        <IsPartOfProject Value="True"/>
    9185        <UnitName Value="UCore"/>
    92         <EditorIndex Value="33"/>
    9386        <WindowIndex Value="0"/>
    9487        <TopLine Value="1"/>
    9588        <CursorPos X="69" Y="51"/>
    9689        <UsageCount Value="203"/>
    97         <Loaded Value="True"/>
    9890        <DefaultSyntaxHighlighter Value="Delphi"/>
    9991      </Unit4>
    … …  
    10496        <TopLine Value="217"/>
    10597        <CursorPos X="5" Y="236"/>
    106         <UsageCount Value="129"/>
     98        <UsageCount Value="110"/>
    10799        <DefaultSyntaxHighlighter Value="Delphi"/>
    108100      </Unit5>
    … …  
    113105        <TopLine Value="10"/>
    114106        <CursorPos X="27" Y="19"/>
    115         <UsageCount Value="129"/>
     107        <UsageCount Value="110"/>
    116108        <DefaultSyntaxHighlighter Value="Delphi"/>
    117109      </Unit6>
    … …  
    121113        <TopLine Value="17"/>
    122114        <CursorPos X="34" Y="30"/>
    123         <UsageCount Value="129"/>
     115        <UsageCount Value="110"/>
    124116        <DefaultSyntaxHighlighter Value="Delphi"/>
    125117      </Unit7>
    … …  
    130122        <TopLine Value="204"/>
    131123        <CursorPos X="25" Y="226"/>
    132         <UsageCount Value="129"/>
     124        <UsageCount Value="110"/>
    133125        <DefaultSyntaxHighlighter Value="Delphi"/>
    134126      </Unit8>
    … …  
    139131        <TopLine Value="102"/>
    140132        <CursorPos X="25" Y="107"/>
    141         <UsageCount Value="129"/>
     133        <UsageCount Value="110"/>
    142134        <DefaultSyntaxHighlighter Value="Delphi"/>
    143135      </Unit9>
    … …  
    148140        <TopLine Value="40"/>
    149141        <CursorPos X="9" Y="59"/>
    150         <UsageCount Value="117"/>
     142        <UsageCount Value="98"/>
    151143        <DefaultSyntaxHighlighter Value="Delphi"/>
    152144      </Unit10>
    153145      <Unit11>
    154146        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/datih.inc"/>
    155         <EditorIndex Value="31"/>
    156147        <WindowIndex Value="0"/>
    157148        <TopLine Value="91"/>
    158149        <CursorPos X="10" Y="110"/>
    159         <UsageCount Value="97"/>
    160         <Loaded Value="True"/>
     150        <UsageCount Value="80"/>
    161151        <DefaultSyntaxHighlighter Value="Delphi"/>
    162152      </Unit11>
    … …  
    166156        <TopLine Value="283"/>
    167157        <CursorPos X="10" Y="302"/>
    168         <UsageCount Value="20"/>
     158        <UsageCount Value="1"/>
    169159        <DefaultSyntaxHighlighter Value="Delphi"/>
    170160      </Unit12>
    … …  
    173163        <IsPartOfProject Value="True"/>
    174164        <UnitName Value="UConfig"/>
    175         <EditorIndex Value="9"/>
    176165        <WindowIndex Value="0"/>
    177166        <TopLine Value="1"/>
    178167        <CursorPos X="58" Y="10"/>
    179168        <UsageCount Value="294"/>
    180         <Loaded Value="True"/>
    181169        <DefaultSyntaxHighlighter Value="Delphi"/>
    182170      </Unit13>
    … …  
    203191        <TopLine Value="608"/>
    204192        <CursorPos X="44" Y="627"/>
    205         <UsageCount Value="98"/>
     193        <UsageCount Value="79"/>
    206194        <DefaultSyntaxHighlighter Value="Delphi"/>
    207195      </Unit16>
    … …  
    212200        <TopLine Value="39"/>
    213201        <CursorPos X="25" Y="58"/>
    214         <UsageCount Value="98"/>
     202        <UsageCount Value="79"/>
    215203        <DefaultSyntaxHighlighter Value="Delphi"/>
    216204      </Unit17>
    … …  
    221209        <TopLine Value="1"/>
    222210        <CursorPos X="69" Y="19"/>
    223         <UsageCount Value="94"/>
     211        <UsageCount Value="75"/>
    224212        <DefaultSyntaxHighlighter Value="Delphi"/>
    225213      </Unit18>
    … …  
    230218        <TopLine Value="1"/>
    231219        <CursorPos X="52" Y="124"/>
    232         <UsageCount Value="91"/>
     220        <UsageCount Value="72"/>
    233221        <DefaultSyntaxHighlighter Value="Delphi"/>
    234222      </Unit19>
    … …  
    239227        <TopLine Value="29"/>
    240228        <CursorPos X="2" Y="38"/>
    241         <UsageCount Value="19"/>
     229        <UsageCount Value="10"/>
    242230        <DefaultSyntaxHighlighter Value="Delphi"/>
    243231      </Unit20>
    244232      <Unit21>
    245         <Filename Value="UCGIApplication.pas"/>
    246         <UnitName Value="UCGIApplication"/>
    247         <WindowIndex Value="0"/>
    248         <TopLine Value="112"/>
    249         <CursorPos X="23" Y="125"/>
    250         <UsageCount Value="5"/>
     233        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
     234        <WindowIndex Value="0"/>
     235        <TopLine Value="539"/>
     236        <CursorPos X="14" Y="556"/>
     237        <UsageCount Value="81"/>
    251238        <DefaultSyntaxHighlighter Value="Delphi"/>
    252239      </Unit21>
    253240      <Unit22>
    254         <Filename Value="UMainCGI.pas"/>
    255         <UnitName Value="UMainCGI"/>
    256         <WindowIndex Value="0"/>
    257         <TopLine Value="1"/>
    258         <CursorPos X="1" Y="1"/>
    259         <UsageCount Value="5"/>
     241        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutilsh.inc"/>
     242        <WindowIndex Value="0"/>
     243        <TopLine Value="10"/>
     244        <CursorPos X="22" Y="23"/>
     245        <UsageCount Value="81"/>
    260246        <DefaultSyntaxHighlighter Value="Delphi"/>
    261247      </Unit22>
    262248      <Unit23>
    263         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    264         <EditorIndex Value="7"/>
    265         <WindowIndex Value="0"/>
    266         <TopLine Value="539"/>
    267         <CursorPos X="14" Y="556"/>
    268         <UsageCount Value="98"/>
    269         <Loaded Value="True"/>
     249        <Filename Value="/usr/share/fpcsrc/rtl/unix/sysutils.pp"/>
     250        <UnitName Value="sysutils"/>
     251        <WindowIndex Value="0"/>
     252        <TopLine Value="1140"/>
     253        <CursorPos X="26" Y="1143"/>
     254        <UsageCount Value="81"/>
    270255        <DefaultSyntaxHighlighter Value="Delphi"/>
    271256      </Unit23>
    272257      <Unit24>
    273         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutilsh.inc"/>
    274         <EditorIndex Value="3"/>
    275         <WindowIndex Value="0"/>
    276         <TopLine Value="10"/>
    277         <CursorPos X="22" Y="23"/>
    278         <UsageCount Value="98"/>
    279         <Loaded Value="True"/>
     258        <Filename Value="/usr/share/fpcsrc/rtl/unix/sysunixh.inc"/>
     259        <WindowIndex Value="0"/>
     260        <TopLine Value="43"/>
     261        <CursorPos X="5" Y="61"/>
     262        <UsageCount Value="81"/>
    280263        <DefaultSyntaxHighlighter Value="Delphi"/>
    281264      </Unit24>
    282265      <Unit25>
    283         <Filename Value="/usr/share/fpcsrc/rtl/unix/sysutils.pp"/>
    284         <UnitName Value="sysutils"/>
    285         <EditorIndex Value="4"/>
    286         <WindowIndex Value="0"/>
    287         <TopLine Value="1140"/>
    288         <CursorPos X="26" Y="1143"/>
    289         <UsageCount Value="98"/>
    290         <Loaded Value="True"/>
     266        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutil.inc"/>
     267        <WindowIndex Value="0"/>
     268        <TopLine Value="50"/>
     269        <CursorPos X="10" Y="63"/>
     270        <UsageCount Value="81"/>
    291271        <DefaultSyntaxHighlighter Value="Delphi"/>
    292272      </Unit25>
    293273      <Unit26>
    294         <Filename Value="/usr/share/fpcsrc/rtl/unix/sysunixh.inc"/>
    295         <EditorIndex Value="6"/>
    296         <WindowIndex Value="0"/>
    297         <TopLine Value="43"/>
    298         <CursorPos X="5" Y="61"/>
    299         <UsageCount Value="98"/>
     274        <Filename Value="Common/UStringListEx.pas"/>
     275        <IsPartOfProject Value="True"/>
     276        <UnitName Value="UStringListEx"/>
     277        <EditorIndex Value="13"/>
     278        <WindowIndex Value="0"/>
     279        <TopLine Value="19"/>
     280        <CursorPos X="32" Y="36"/>
     281        <UsageCount Value="200"/>
    300282        <Loaded Value="True"/>
    301283        <DefaultSyntaxHighlighter Value="Delphi"/>
    302284      </Unit26>
    303285      <Unit27>
    304         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/osutil.inc"/>
    305         <EditorIndex Value="5"/>
    306         <WindowIndex Value="0"/>
    307         <TopLine Value="50"/>
    308         <CursorPos X="10" Y="63"/>
    309         <UsageCount Value="98"/>
    310         <Loaded Value="True"/>
     286        <Filename Value="WebServer/UCGIApplication.pas"/>
     287        <UnitName Value="UCGIApplication"/>
     288        <WindowIndex Value="0"/>
     289        <TopLine Value="8"/>
     290        <CursorPos X="17" Y="19"/>
     291        <UsageCount Value="27"/>
    311292        <DefaultSyntaxHighlighter Value="Delphi"/>
    312293      </Unit27>
    313294      <Unit28>
    314         <Filename Value="Common/UStringListEx.pas"/>
    315         <IsPartOfProject Value="True"/>
    316         <UnitName Value="UStringListEx"/>
    317         <EditorIndex Value="1"/>
    318         <WindowIndex Value="0"/>
    319         <TopLine Value="1"/>
    320         <CursorPos X="15" Y="46"/>
    321         <UsageCount Value="197"/>
    322         <Loaded Value="True"/>
     295        <Filename Value="Common/UDatabase.pas"/>
     296        <IsPartOfProject Value="True"/>
     297        <UnitName Value="UDatabase"/>
     298        <WindowIndex Value="0"/>
     299        <TopLine Value="25"/>
     300        <CursorPos X="86" Y="94"/>
     301        <UsageCount Value="200"/>
    323302        <DefaultSyntaxHighlighter Value="Delphi"/>
    324303      </Unit28>
    325304      <Unit29>
    326         <Filename Value="WebServer/UCGIApplication.pas"/>
    327         <UnitName Value="UCGIApplication"/>
    328         <WindowIndex Value="0"/>
    329         <TopLine Value="8"/>
    330         <CursorPos X="17" Y="19"/>
    331         <UsageCount Value="46"/>
     305        <Filename Value="Common/UHtmlClasses.pas"/>
     306        <IsPartOfProject Value="True"/>
     307        <UnitName Value="UHtmlClasses"/>
     308        <IsVisibleTab Value="True"/>
     309        <EditorIndex Value="7"/>
     310        <WindowIndex Value="0"/>
     311        <TopLine Value="1"/>
     312        <CursorPos X="61" Y="8"/>
     313        <UsageCount Value="200"/>
     314        <Loaded Value="True"/>
    332315        <DefaultSyntaxHighlighter Value="Delphi"/>
    333316      </Unit29>
    334317      <Unit30>
    335         <Filename Value="Common/UDatabase.pas"/>
    336         <IsPartOfProject Value="True"/>
    337         <UnitName Value="UDatabase"/>
    338         <EditorIndex Value="23"/>
    339         <WindowIndex Value="0"/>
    340         <TopLine Value="25"/>
    341         <CursorPos X="86" Y="94"/>
    342         <UsageCount Value="197"/>
     318        <Filename Value="Common/USqlDatabase.pas"/>
     319        <IsPartOfProject Value="True"/>
     320        <UnitName Value="USqlDatabase"/>
     321        <EditorIndex Value="3"/>
     322        <WindowIndex Value="0"/>
     323        <TopLine Value="120"/>
     324        <CursorPos X="35" Y="136"/>
     325        <UsageCount Value="200"/>
    343326        <Loaded Value="True"/>
    344327        <DefaultSyntaxHighlighter Value="Delphi"/>
    345328      </Unit30>
    346329      <Unit31>
    347         <Filename Value="Common/UHtmlClasses.pas"/>
    348         <IsPartOfProject Value="True"/>
    349         <UnitName Value="UHtmlClasses"/>
    350         <EditorIndex Value="29"/>
    351         <WindowIndex Value="0"/>
    352         <TopLine Value="279"/>
    353         <CursorPos X="56" Y="299"/>
    354         <UsageCount Value="197"/>
     330        <Filename Value="Common/UXmlClasses.pas"/>
     331        <IsPartOfProject Value="True"/>
     332        <UnitName Value="UXmlClasses"/>
     333        <EditorIndex Value="6"/>
     334        <WindowIndex Value="0"/>
     335        <TopLine Value="1"/>
     336        <CursorPos X="71" Y="7"/>
     337        <UsageCount Value="200"/>
    355338        <Loaded Value="True"/>
    356339        <DefaultSyntaxHighlighter Value="Delphi"/>
    357340      </Unit31>
    358341      <Unit32>
    359         <Filename Value="Common/USqlDatabase.pas"/>
    360         <IsPartOfProject Value="True"/>
    361         <UnitName Value="USqlDatabase"/>
    362         <EditorIndex Value="27"/>
    363         <WindowIndex Value="0"/>
    364         <TopLine Value="196"/>
    365         <CursorPos X="16" Y="210"/>
    366         <UsageCount Value="197"/>
    367         <Loaded Value="True"/>
     342        <Filename Value="Application/UCustomCGIApplication.pas"/>
     343        <UnitName Value="UCustomCGIApplication"/>
     344        <WindowIndex Value="0"/>
     345        <TopLine Value="99"/>
     346        <CursorPos X="33" Y="117"/>
     347        <UsageCount Value="28"/>
    368348        <DefaultSyntaxHighlighter Value="Delphi"/>
    369349      </Unit32>
    370350      <Unit33>
    371         <Filename Value="Common/UXmlClasses.pas"/>
    372         <IsPartOfProject Value="True"/>
    373         <UnitName Value="UXmlClasses"/>
    374         <EditorIndex Value="11"/>
    375         <WindowIndex Value="0"/>
    376         <TopLine Value="44"/>
    377         <CursorPos X="29" Y="61"/>
    378         <UsageCount Value="197"/>
    379         <Loaded Value="True"/>
     351        <Filename Value="/usr/share/fpcsrc/rtl/inc/mathh.inc"/>
     352        <WindowIndex Value="0"/>
     353        <TopLine Value="61"/>
     354        <CursorPos X="14" Y="78"/>
     355        <UsageCount Value="80"/>
    380356        <DefaultSyntaxHighlighter Value="Delphi"/>
    381357      </Unit33>
    382358      <Unit34>
    383         <Filename Value="Application/UCustomCGIApplication.pas"/>
    384         <UnitName Value="UCustomCGIApplication"/>
    385         <WindowIndex Value="0"/>
    386         <TopLine Value="99"/>
    387         <CursorPos X="33" Y="117"/>
    388         <UsageCount Value="47"/>
     359        <Filename Value="/usr/share/fpcsrc/rtl/inc/systemh.inc"/>
     360        <WindowIndex Value="0"/>
     361        <TopLine Value="476"/>
     362        <CursorPos X="3" Y="489"/>
     363        <UsageCount Value="4"/>
    389364        <DefaultSyntaxHighlighter Value="Delphi"/>
    390365      </Unit34>
    391366      <Unit35>
    392         <Filename Value="/usr/share/fpcsrc/rtl/inc/mathh.inc"/>
    393         <EditorIndex Value="30"/>
    394         <WindowIndex Value="0"/>
    395         <TopLine Value="61"/>
    396         <CursorPos X="14" Y="78"/>
    397         <UsageCount Value="97"/>
    398         <Loaded Value="True"/>
     367        <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/dati.inc"/>
     368        <WindowIndex Value="0"/>
     369        <TopLine Value="519"/>
     370        <CursorPos X="23" Y="526"/>
     371        <UsageCount Value="76"/>
    399372        <DefaultSyntaxHighlighter Value="Delphi"/>
    400373      </Unit35>
    401374      <Unit36>
    402         <Filename Value="/usr/share/fpcsrc/rtl/inc/systemh.inc"/>
    403         <WindowIndex Value="0"/>
    404         <TopLine Value="476"/>
    405         <CursorPos X="3" Y="489"/>
    406         <UsageCount Value="23"/>
     375        <Filename Value="UConfigSample.pas"/>
     376        <IsPartOfProject Value="True"/>
     377        <UnitName Value="UConfig"/>
     378        <WindowIndex Value="0"/>
     379        <TopLine Value="1"/>
     380        <CursorPos X="53" Y="18"/>
     381        <UsageCount Value="362"/>
    407382        <DefaultSyntaxHighlighter Value="Delphi"/>
    408383      </Unit36>
    409384      <Unit37>
    410         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/dati.inc"/>
    411         <EditorIndex Value="32"/>
    412         <WindowIndex Value="0"/>
    413         <TopLine Value="519"/>
    414         <CursorPos X="23" Y="526"/>
    415         <UsageCount Value="93"/>
    416         <Loaded Value="True"/>
     385        <Filename Value="Application/UUser.pas"/>
     386        <IsPartOfProject Value="True"/>
     387        <UnitName Value="UUser"/>
     388        <WindowIndex Value="0"/>
     389        <TopLine Value="1"/>
     390        <CursorPos X="16" Y="164"/>
     391        <UsageCount Value="341"/>
    417392        <DefaultSyntaxHighlighter Value="Delphi"/>
    418393      </Unit37>
    419394      <Unit38>
    420         <Filename Value="UConfigSample.pas"/>
    421         <IsPartOfProject Value="True"/>
    422         <UnitName Value="UConfig"/>
    423         <EditorIndex Value="10"/>
    424         <WindowIndex Value="0"/>
    425         <TopLine Value="1"/>
    426         <CursorPos X="53" Y="18"/>
    427         <UsageCount Value="180"/>
    428         <Loaded Value="True"/>
     395        <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
     396        <IsPartOfProject Value="True"/>
     397        <UnitName Value="UHTTPSessionMySQL"/>
     398        <WindowIndex Value="0"/>
     399        <TopLine Value="81"/>
     400        <CursorPos X="1" Y="96"/>
     401        <UsageCount Value="340"/>
    429402        <DefaultSyntaxHighlighter Value="Delphi"/>
    430403      </Unit38>
    431404      <Unit39>
    432         <Filename Value="Application/UUser.pas"/>
    433         <IsPartOfProject Value="True"/>
    434         <UnitName Value="UUser"/>
    435         <EditorIndex Value="28"/>
    436         <WindowIndex Value="0"/>
    437         <TopLine Value="127"/>
    438         <CursorPos X="16" Y="164"/>
    439         <UsageCount Value="159"/>
    440         <Loaded Value="True"/>
     405        <Filename Value="WebServer/UHTTPSessionFile.pas"/>
     406        <IsPartOfProject Value="True"/>
     407        <UnitName Value="UHTTPSessionFile"/>
     408        <WindowIndex Value="0"/>
     409        <TopLine Value="1"/>
     410        <CursorPos X="18" Y="45"/>
     411        <UsageCount Value="340"/>
    441412        <DefaultSyntaxHighlighter Value="Delphi"/>
    442413      </Unit39>
    443414      <Unit40>
    444         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    445         <IsPartOfProject Value="True"/>
    446         <UnitName Value="UHTTPSessionMySQL"/>
    447         <EditorIndex Value="12"/>
    448         <WindowIndex Value="0"/>
    449         <TopLine Value="81"/>
    450         <CursorPos X="1" Y="96"/>
    451         <UsageCount Value="158"/>
    452         <Loaded Value="True"/>
     415        <Filename Value="Common/UCommon.pas"/>
     416        <IsPartOfProject Value="True"/>
     417        <UnitName Value="UCommon"/>
     418        <WindowIndex Value="0"/>
     419        <TopLine Value="142"/>
     420        <CursorPos X="52" Y="165"/>
     421        <UsageCount Value="340"/>
    453422        <DefaultSyntaxHighlighter Value="Delphi"/>
    454423      </Unit40>
    455424      <Unit41>
    456         <Filename Value="WebServer/UHTTPSessionFile.pas"/>
    457         <IsPartOfProject Value="True"/>
    458         <UnitName Value="UHTTPSessionFile"/>
    459         <EditorIndex Value="24"/>
    460         <WindowIndex Value="0"/>
    461         <TopLine Value="1"/>
    462         <CursorPos X="18" Y="45"/>
    463         <UsageCount Value="158"/>
     425        <Filename Value="WebServer/UHTTPServer.pas"/>
     426        <IsPartOfProject Value="True"/>
     427        <UnitName Value="UHTTPServer"/>
     428        <EditorIndex Value="5"/>
     429        <WindowIndex Value="0"/>
     430        <TopLine Value="1"/>
     431        <CursorPos X="49" Y="9"/>
     432        <UsageCount Value="340"/>
    464433        <Loaded Value="True"/>
    465434        <DefaultSyntaxHighlighter Value="Delphi"/>
    466435      </Unit41>
    467436      <Unit42>
    468         <Filename Value="Common/UCommon.pas"/>
    469         <IsPartOfProject Value="True"/>
    470         <UnitName Value="UCommon"/>
    471         <EditorIndex Value="22"/>
    472         <WindowIndex Value="0"/>
    473         <TopLine Value="142"/>
    474         <CursorPos X="52" Y="165"/>
    475         <UsageCount Value="158"/>
    476         <Loaded Value="True"/>
     437        <Filename Value="WebServer/UHTTPServerTCP.pas"/>
     438        <IsPartOfProject Value="True"/>
     439        <UnitName Value="UHTTPServerTCP"/>
     440        <WindowIndex Value="0"/>
     441        <TopLine Value="1"/>
     442        <CursorPos X="65" Y="100"/>
     443        <UsageCount Value="340"/>
    477444        <DefaultSyntaxHighlighter Value="Delphi"/>
    478445      </Unit42>
    479446      <Unit43>
    480         <Filename Value="WebServer/UHTTPServer.pas"/>
    481         <IsPartOfProject Value="True"/>
    482         <UnitName Value="UHTTPServer"/>
    483         <EditorIndex Value="13"/>
    484         <WindowIndex Value="0"/>
    485         <TopLine Value="1"/>
    486         <CursorPos X="62" Y="11"/>
    487         <UsageCount Value="158"/>
    488         <Loaded Value="True"/>
     447        <Filename Value="WebServer/UHTTPServerCGI.pas"/>
     448        <IsPartOfProject Value="True"/>
     449        <UnitName Value="UHTTPServerCGI"/>
     450        <WindowIndex Value="0"/>
     451        <TopLine Value="1"/>
     452        <CursorPos X="3" Y="29"/>
     453        <UsageCount Value="340"/>
    489454        <DefaultSyntaxHighlighter Value="Delphi"/>
    490455      </Unit43>
    491456      <Unit44>
    492         <Filename Value="WebServer/UHTTPServerTCP.pas"/>
    493         <IsPartOfProject Value="True"/>
    494         <UnitName Value="UHTTPServerTCP"/>
    495         <EditorIndex Value="19"/>
    496         <WindowIndex Value="0"/>
    497         <TopLine Value="1"/>
    498         <CursorPos X="65" Y="100"/>
    499         <UsageCount Value="158"/>
    500         <Loaded Value="True"/>
     457        <Filename Value="Network/UTCPServer.pas"/>
     458        <IsPartOfProject Value="True"/>
     459        <UnitName Value="UTCPServer"/>
     460        <WindowIndex Value="0"/>
     461        <TopLine Value="1"/>
     462        <CursorPos X="6" Y="15"/>
     463        <UsageCount Value="339"/>
    501464        <DefaultSyntaxHighlighter Value="Delphi"/>
    502465      </Unit44>
    503466      <Unit45>
    504         <Filename Value="WebServer/UHTTPServerCGI.pas"/>
    505         <IsPartOfProject Value="True"/>
    506         <UnitName Value="UHTTPServerCGI"/>
    507         <EditorIndex Value="21"/>
    508         <WindowIndex Value="0"/>
    509         <TopLine Value="1"/>
    510         <CursorPos X="3" Y="29"/>
    511         <UsageCount Value="158"/>
     467        <Filename Value="Common/UPool.pas"/>
     468        <IsPartOfProject Value="True"/>
     469        <UnitName Value="UPool"/>
     470        <EditorIndex Value="4"/>
     471        <WindowIndex Value="0"/>
     472        <TopLine Value="1"/>
     473        <CursorPos X="53" Y="8"/>
     474        <UsageCount Value="339"/>
    512475        <Loaded Value="True"/>
    513476        <DefaultSyntaxHighlighter Value="Delphi"/>
    514477      </Unit45>
    515478      <Unit46>
    516         <Filename Value="Network/UTCPServer.pas"/>
    517         <IsPartOfProject Value="True"/>
    518         <UnitName Value="UTCPServer"/>
    519         <EditorIndex Value="16"/>
    520         <WindowIndex Value="0"/>
    521         <TopLine Value="1"/>
    522         <CursorPos X="6" Y="15"/>
    523         <UsageCount Value="157"/>
    524         <Loaded Value="True"/>
     479        <Filename Value="Common/UResetableThread.pas"/>
     480        <IsPartOfProject Value="True"/>
     481        <UnitName Value="UResetableThread"/>
     482        <WindowIndex Value="0"/>
     483        <TopLine Value="1"/>
     484        <CursorPos X="52" Y="92"/>
     485        <UsageCount Value="339"/>
    525486        <DefaultSyntaxHighlighter Value="Delphi"/>
    526487      </Unit46>
    527488      <Unit47>
    528         <Filename Value="Common/UPool.pas"/>
    529         <IsPartOfProject Value="True"/>
    530         <UnitName Value="UPool"/>
    531         <EditorIndex Value="18"/>
    532         <WindowIndex Value="0"/>
    533         <TopLine Value="1"/>
    534         <CursorPos X="42" Y="8"/>
    535         <UsageCount Value="157"/>
    536         <Loaded Value="True"/>
     489        <Filename Value="Common/UMemoryStreamEx.pas"/>
     490        <IsPartOfProject Value="True"/>
     491        <UnitName Value="UMemoryStreamEx"/>
     492        <WindowIndex Value="0"/>
     493        <TopLine Value="83"/>
     494        <CursorPos X="47" Y="106"/>
     495        <UsageCount Value="339"/>
    537496        <DefaultSyntaxHighlighter Value="Delphi"/>
    538497      </Unit47>
    539498      <Unit48>
    540         <Filename Value="Common/UResetableThread.pas"/>
    541         <IsPartOfProject Value="True"/>
    542         <UnitName Value="UResetableThread"/>
    543         <EditorIndex Value="17"/>
    544         <WindowIndex Value="0"/>
    545         <TopLine Value="1"/>
    546         <CursorPos X="52" Y="92"/>
    547         <UsageCount Value="157"/>
    548         <Loaded Value="True"/>
     499        <Filename Value="Common/UMIMEType.pas"/>
     500        <IsPartOfProject Value="True"/>
     501        <UnitName Value="UMIMEType"/>
     502        <WindowIndex Value="0"/>
     503        <TopLine Value="1"/>
     504        <CursorPos X="3" Y="687"/>
     505        <UsageCount Value="339"/>
    549506        <DefaultSyntaxHighlighter Value="Delphi"/>
    550507      </Unit48>
    551508      <Unit49>
    552         <Filename Value="Common/UMemoryStreamEx.pas"/>
    553         <IsPartOfProject Value="True"/>
    554         <UnitName Value="UMemoryStreamEx"/>
    555         <EditorIndex Value="14"/>
    556         <WindowIndex Value="0"/>
    557         <TopLine Value="83"/>
    558         <CursorPos X="47" Y="106"/>
    559         <UsageCount Value="157"/>
    560         <Loaded Value="True"/>
    561         <DefaultSyntaxHighlighter Value="Delphi"/>
     509        <Filename Value="../../../lazarus/library/synapse/source/lib/blcksock.pas"/>
     510        <UnitName Value="blcksock"/>
     511        <WindowIndex Value="0"/>
     512        <TopLine Value="383"/>
     513        <CursorPos X="15" Y="397"/>
     514        <UsageCount Value="61"/>
    562515      </Unit49>
    563516      <Unit50>
    564         <Filename Value="Common/UMIMEType.pas"/>
    565         <IsPartOfProject Value="True"/>
    566         <UnitName Value="UMIMEType"/>
    567         <EditorIndex Value="15"/>
    568         <WindowIndex Value="0"/>
    569         <TopLine Value="1"/>
    570         <CursorPos X="3" Y="687"/>
    571         <UsageCount Value="157"/>
     517        <Filename Value="Application/UCustomApplication.pas"/>
     518        <IsPartOfProject Value="True"/>
     519        <UnitName Value="UCustomApplication"/>
     520        <EditorIndex Value="2"/>
     521        <WindowIndex Value="0"/>
     522        <TopLine Value="1"/>
     523        <CursorPos X="63" Y="10"/>
     524        <UsageCount Value="339"/>
    572525        <Loaded Value="True"/>
    573526        <DefaultSyntaxHighlighter Value="Delphi"/>
    574527      </Unit50>
    575528      <Unit51>
    576         <Filename Value="../../../lazarus/library/synapse/source/lib/blcksock.pas"/>
    577         <UnitName Value="blcksock"/>
    578         <EditorIndex Value="20"/>
    579         <WindowIndex Value="0"/>
    580         <TopLine Value="383"/>
    581         <CursorPos X="15" Y="397"/>
    582         <UsageCount Value="78"/>
    583         <Loaded Value="True"/>
     529        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
     530        <WindowIndex Value="0"/>
     531        <TopLine Value="690"/>
     532        <CursorPos X="3" Y="695"/>
     533        <UsageCount Value="61"/>
     534        <DefaultSyntaxHighlighter Value="Delphi"/>
    584535      </Unit51>
    585536      <Unit52>
    586         <Filename Value="Application/UCustomApplication.pas"/>
    587         <IsPartOfProject Value="True"/>
    588         <UnitName Value="UCustomApplication"/>
    589         <EditorIndex Value="2"/>
    590         <WindowIndex Value="0"/>
    591         <TopLine Value="68"/>
    592         <CursorPos X="28" Y="89"/>
    593         <UsageCount Value="157"/>
    594         <Loaded Value="True"/>
     537        <Filename Value="Application/UPageList.pas"/>
     538        <IsPartOfProject Value="True"/>
     539        <UnitName Value="UPageList"/>
     540        <WindowIndex Value="0"/>
     541        <TopLine Value="1"/>
     542        <CursorPos X="43" Y="79"/>
     543        <UsageCount Value="336"/>
    595544        <DefaultSyntaxHighlighter Value="Delphi"/>
    596545      </Unit52>
    597546      <Unit53>
    598         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
    599         <EditorIndex Value="8"/>
    600         <WindowIndex Value="0"/>
    601         <TopLine Value="690"/>
    602         <CursorPos X="3" Y="695"/>
    603         <UsageCount Value="78"/>
    604         <Loaded Value="True"/>
    605         <DefaultSyntaxHighlighter Value="Delphi"/>
     547        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedList.pas"/>
     548        <UnitName Value="SpecializedList"/>
     549        <EditorIndex Value="10"/>
     550        <WindowIndex Value="0"/>
     551        <TopLine Value="144"/>
     552        <CursorPos X="48" Y="175"/>
     553        <UsageCount Value="10"/>
     554        <Loaded Value="True"/>
    606555      </Unit53>
    607556      <Unit54>
    608         <Filename Value="Application/UPageList.pas"/>
    609         <IsPartOfProject Value="True"/>
    610         <UnitName Value="UPageList"/>
    611         <EditorIndex Value="26"/>
    612         <WindowIndex Value="0"/>
    613         <TopLine Value="1"/>
    614         <CursorPos X="43" Y="79"/>
    615         <UsageCount Value="154"/>
    616         <Loaded Value="True"/>
    617         <DefaultSyntaxHighlighter Value="Delphi"/>
     557        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
     558        <EditorIndex Value="9"/>
     559        <WindowIndex Value="0"/>
     560        <TopLine Value="1"/>
     561        <CursorPos X="20" Y="15"/>
     562        <UsageCount Value="100"/>
     563        <Loaded Value="True"/>
    618564      </Unit54>
     565      <Unit55>
     566        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericDictionary.inc"/>
     567        <EditorIndex Value="1"/>
     568        <WindowIndex Value="0"/>
     569        <TopLine Value="33"/>
     570        <CursorPos X="39" Y="49"/>
     571        <UsageCount Value="10"/>
     572        <Loaded Value="True"/>
     573      </Unit55>
     574      <Unit56>
     575        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericQueue.inc"/>
     576        <EditorIndex Value="8"/>
     577        <WindowIndex Value="0"/>
     578        <TopLine Value="1"/>
     579        <CursorPos X="50" Y="43"/>
     580        <UsageCount Value="10"/>
     581        <Loaded Value="True"/>
     582      </Unit56>
     583      <Unit57>
     584        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericTree.inc"/>
     585        <EditorIndex Value="12"/>
     586        <WindowIndex Value="0"/>
     587        <TopLine Value="1"/>
     588        <CursorPos X="49" Y="47"/>
     589        <UsageCount Value="10"/>
     590        <Loaded Value="True"/>
     591      </Unit57>
     592      <Unit58>
     593        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedDictionary.pas"/>
     594        <UnitName Value="SpecializedDictionary"/>
     595        <EditorIndex Value="0"/>
     596        <WindowIndex Value="0"/>
     597        <TopLine Value="1"/>
     598        <CursorPos X="22" Y="21"/>
     599        <UsageCount Value="100"/>
     600        <Loaded Value="True"/>
     601      </Unit58>
     602      <Unit59>
     603        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedObjectList.pas"/>
     604        <UnitName Value="SpecializedObjectList"/>
     605        <EditorIndex Value="11"/>
     606        <WindowIndex Value="0"/>
     607        <TopLine Value="1"/>
     608        <CursorPos X="27" Y="20"/>
     609        <UsageCount Value="10"/>
     610        <Loaded Value="True"/>
     611      </Unit59>
    619612    </Units>
    620     <JumpHistory Count="30" HistoryIndex="29">
     613    <JumpHistory Count="10" HistoryIndex="9">
    621614      <Position1>
    622         <Filename Value="Common/USqlDatabase.pas"/>
    623         <Caret Line="224" Column="18" TopLine="201"/>
     615        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
     616        <Caret Line="6" Column="29" TopLine="1"/>
    624617      </Position1>
    625618      <Position2>
    626         <Filename Value="Common/USqlDatabase.pas"/>
    627         <Caret Line="223" Column="13" TopLine="203"/>
     619        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
     620        <Caret Line="13" Column="6" TopLine="1"/>
    628621      </Position2>
    629622      <Position3>
    630623        <Filename Value="Common/USqlDatabase.pas"/>
    631         <Caret Line="257" Column="21" TopLine="236"/>
     624        <Caret Line="123" Column="23" TopLine="106"/>
    632625      </Position3>
    633626      <Position4>
    634627        <Filename Value="Common/USqlDatabase.pas"/>
    635         <Caret Line="287" Column="21" TopLine="266"/>
     628        <Caret Line="117" Column="19" TopLine="109"/>
    636629      </Position4>
    637630      <Position5>
    638631        <Filename Value="Common/USqlDatabase.pas"/>
    639         <Caret Line="305" Column="21" TopLine="284"/>
     632        <Caret Line="132" Column="46" TopLine="116"/>
    640633      </Position5>
    641634      <Position6>
    642         <Filename Value="Common/USqlDatabase.pas"/>
    643         <Caret Line="347" Column="19" TopLine="331"/>
     635        <Filename Value="Common/UPool.pas"/>
     636        <Caret Line="8" Column="43" TopLine="1"/>
    644637      </Position6>
    645638      <Position7>
    646         <Filename Value="Common/USqlDatabase.pas"/>
    647         <Caret Line="353" Column="22" TopLine="333"/>
     639        <Filename Value="WebServer/UHTTPServer.pas"/>
     640        <Caret Line="11" Column="62" TopLine="1"/>
    648641      </Position7>
    649642      <Position8>
    650         <Filename Value="Common/USqlDatabase.pas"/>
    651         <Caret Line="371" Column="17" TopLine="345"/>
     643        <Filename Value="Common/UXmlClasses.pas"/>
     644        <Caret Line="61" Column="29" TopLine="44"/>
    652645      </Position8>
    653646      <Position9>
    654         <Filename Value="Common/USqlDatabase.pas"/>
    655         <Caret Line="367" Column="29" TopLine="347"/>
     647        <Filename Value="Common/UHtmlClasses.pas"/>
     648        <Caret Line="299" Column="56" TopLine="279"/>
    656649      </Position9>
    657650      <Position10>
    658         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    659         <Caret Line="17" Column="64" TopLine="1"/>
     651        <Filename Value="Common/UHtmlClasses.pas"/>
     652        <Caret Line="8" Column="71" TopLine="1"/>
    660653      </Position10>
    661       <Position11>
    662         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    663         <Caret Line="43" Column="33" TopLine="23"/>
    664       </Position11>
    665       <Position12>
    666         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    667         <Caret Line="71" Column="31" TopLine="51"/>
    668       </Position12>
    669       <Position13>
    670         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    671         <Caret Line="73" Column="20" TopLine="55"/>
    672       </Position13>
    673       <Position14>
    674         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    675         <Caret Line="95" Column="35" TopLine="75"/>
    676       </Position14>
    677       <Position15>
    678         <Filename Value="WebServer/UHTTPSessionMySQL.pas"/>
    679         <Caret Line="98" Column="33" TopLine="75"/>
    680       </Position15>
    681       <Position16>
    682         <Filename Value="Application/UUser.pas"/>
    683         <Caret Line="128" Column="64" TopLine="115"/>
    684       </Position16>
    685       <Position17>
    686         <Filename Value="Application/UUser.pas"/>
    687         <Caret Line="55" Column="28" TopLine="35"/>
    688       </Position17>
    689       <Position18>
    690         <Filename Value="Application/UUser.pas"/>
    691         <Caret Line="61" Column="7" TopLine="42"/>
    692       </Position18>
    693       <Position19>
    694         <Filename Value="Application/UUser.pas"/>
    695         <Caret Line="64" Column="30" TopLine="46"/>
    696       </Position19>
    697       <Position20>
    698         <Filename Value="Application/UUser.pas"/>
    699         <Caret Line="81" Column="28" TopLine="61"/>
    700       </Position20>
    701       <Position21>
    702         <Filename Value="Application/UUser.pas"/>
    703         <Caret Line="100" Column="18" TopLine="76"/>
    704       </Position21>
    705       <Position22>
    706         <Filename Value="Application/UUser.pas"/>
    707         <Caret Line="114" Column="28" TopLine="90"/>
    708       </Position22>
    709       <Position23>
    710         <Filename Value="Application/UUser.pas"/>
    711         <Caret Line="135" Column="16" TopLine="105"/>
    712       </Position23>
    713       <Position24>
    714         <Filename Value="Application/UUser.pas"/>
    715         <Caret Line="133" Column="30" TopLine="112"/>
    716       </Position24>
    717       <Position25>
    718         <Filename Value="Application/UUser.pas"/>
    719         <Caret Line="148" Column="30" TopLine="123"/>
    720       </Position25>
    721       <Position26>
    722         <Filename Value="Application/UCustomApplication.pas"/>
    723         <Caret Line="253" Column="72" TopLine="147"/>
    724       </Position26>
    725       <Position27>
    726         <Filename Value="Pages/UMainPage.pas"/>
    727         <Caret Line="234" Column="81" TopLine="212"/>
    728       </Position27>
    729       <Position28>
    730         <Filename Value="Pages/UMainPage.pas"/>
    731         <Caret Line="82" Column="34" TopLine="62"/>
    732       </Position28>
    733       <Position29>
    734         <Filename Value="Pages/UMainPage.pas"/>
    735         <Caret Line="218" Column="32" TopLine="197"/>
    736       </Position29>
    737       <Position30>
    738         <Filename Value="Pages/UMainPage.pas"/>
    739         <Caret Line="237" Column="32" TopLine="216"/>
    740       </Position30>
    741654    </JumpHistory>
    742655  </ProjectOptions>
    … …  
    766679        <StackChecks Value="True"/>
    767680      </Checks>
    768       <VerifyObjMethodCallValidity Value="True"/>
    769681    </CodeGeneration>
    770682    <Other>
    … …  
    774686      </Verbosity>
    775687      <WriteFPCLogo Value="False"/>
    776       <CompilerMessages>
    777         <IgnoredMessages idx5023="True" idx5024="True" idx5025="True" idx5028="True"/>
    778         <UseMsgFile Value="True"/>
    779       </CompilerMessages>
    780688      <CompilerPath Value="$(CompPath)"/>
    781689    </Other>

  • trunk/Common/UHtmlClasses.pas

    r37 r40  
    66
    77uses
    8   UXmlClasses, Classes, SysUtils, UStringListEx, ListObject;
     8  UXmlClasses, Classes, SysUtils, UStringListEx, SpecializedObjectList;
    99
    1010type

  • trunk/Common/UPool.pas

    r37 r40  
    66
    77uses
    8   Classes, SysUtils, syncobjs, ListObject;
     8  Classes, SysUtils, syncobjs, SpecializedObjectList;
    99
    1010type

  • trunk/Common/USqlDatabase.pas

    r38 r40  
    88
    99uses
    10   SysUtils, Classes, Dialogs, mysql50, TypInfo, UStringListEx,
    11   ListObject, DictionaryStringString;
     10  SysUtils, Classes, Dialogs, mysql50, TypInfo, SpecializedObjectList,
     11  SpecializedDictionary, SpecializedList;
    1212
    1313type
    … …  
    113113end;
    114114
     115function StrToStr(Value: string): string;
     116begin
     117  Result := Value;
     118end;
     119
    115120function SQLToDateTime(Value: string): TDateTime;
    116121var
    117   Parts: TStringListEx;
    118   DateParts: TStringListEx;
    119   TimeParts: TStringListEx;
    120 begin
    121   try
    122     Parts := TStringListEx.Create;
    123     DateParts := TStringListEx.Create;
    124     TimeParts := TStringListEx.Create;
    125 
    126     Parts.Explode(' ', Value);
    127     DateParts.Explode('-', Parts[0]);
     122  Parts: TListString;
     123  DateParts: TListString;
     124  TimeParts: TListString;
     125begin
     126  try
     127    Parts := TListString.Create;
     128    DateParts := TListString.Create;
     129    TimeParts := TListString.Create;
     130
     131    Parts.Explode(Value, ' ', StrToStr);
     132    DateParts.Explode(Parts[0], '-', StrToStr);
    128133    Result := EncodeDate(StrToInt(DateParts[0]), StrToInt(DateParts[1]),
    129134      StrToInt(DateParts[2]));
    130135    if Parts.Count > 1 then begin
    131       TimeParts.Explode(':', Parts[1]);
     136      TimeParts.Explode(Parts[1], ':', StrToStr);
    132137      Result := Result + EncodeTime(StrToInt(TimeParts[0]), StrToInt(TimeParts[1]),
    133138        StrToInt(TimeParts[2]), 0);

  • trunk/Common/UXmlClasses.pas

    r37 r40  
    55interface
    66
    7 uses Classes, SysUtils, StrUtils, UStringListEx, ListObject;
     7uses Classes, SysUtils, StrUtils, UStringListEx, SpecializedObjectList;
    88
    99type

  • trunk/WebServer/UHTTPServer.pas

    r37 r40  
    77uses
    88  Classes, SysUtils, UTCPServer, UCommon, UMemoryStreamEx, UMIMEType,
    9   Synautil, UStringListEx, ListObject;
     9  Synautil, UStringListEx, SpecializedObjectList;
    1010
    1111type
Note: See TracChangeset for help on using the changeset viewer.