Ignore:
Timestamp:
Jan 28, 2011, 7:33:14 PM (14 years ago)
Author:
george
Message:
  • Added: Displaying thread list in Demo.
  • Fixed: Terminating and freeing unused threads.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • MicroThreading/Demo/Demo.lpi

    r156 r157  
    4747        <TopLine Value="1"/>
    4848        <CursorPos X="34" Y="16"/>
    49         <UsageCount Value="82"/>
     49        <UsageCount Value="86"/>
    5050      </Unit0>
    5151      <Unit1>
    … …  
    5555        <ResourceBaseClass Value="Form"/>
    5656        <UnitName Value="UMainForm"/>
    57         <EditorIndex Value="9"/>
    58         <WindowIndex Value="0"/>
    59         <TopLine Value="270"/>
    60         <CursorPos X="1" Y="284"/>
    61         <UsageCount Value="82"/>
     57        <EditorIndex Value="4"/>
     58        <WindowIndex Value="0"/>
     59        <TopLine Value="247"/>
     60        <CursorPos X="1" Y="261"/>
     61        <UsageCount Value="86"/>
    6262        <Loaded Value="True"/>
    6363        <LoadedDesigner Value="True"/>
    … …  
    6969        <EditorIndex Value="0"/>
    7070        <WindowIndex Value="0"/>
    71         <TopLine Value="513"/>
    72         <CursorPos X="9" Y="525"/>
    73         <UsageCount Value="43"/>
     71        <TopLine Value="175"/>
     72        <CursorPos X="1" Y="190"/>
     73        <UsageCount Value="45"/>
    7474        <Loaded Value="True"/>
    7575      </Unit2>
    … …  
    142142      <Unit11>
    143143        <Filename Value="/usr/share/fpcsrc/2.4.0/rtl/inc/systemh.inc"/>
    144         <WindowIndex Value="0"/>
    145         <TopLine Value="479"/>
    146         <CursorPos X="3" Y="494"/>
    147         <UsageCount Value="9"/>
     144        <EditorIndex Value="1"/>
     145        <WindowIndex Value="0"/>
     146        <TopLine Value="896"/>
     147        <CursorPos X="10" Y="911"/>
     148        <UsageCount Value="10"/>
     149        <Loaded Value="True"/>
    148150      </Unit11>
    149151      <Unit12>
    … …  
    192194      <Unit18>
    193195        <Filename Value="/usr/share/fpcsrc/2.4.0/rtl/objpas/classes/classesh.inc"/>
    194         <WindowIndex Value="0"/>
    195         <TopLine Value="1823"/>
    196         <CursorPos X="3" Y="1838"/>
     196        <EditorIndex Value="2"/>
     197        <WindowIndex Value="0"/>
     198        <TopLine Value="1"/>
     199        <CursorPos X="50" Y="9"/>
    197200        <UsageCount Value="10"/>
     201        <Loaded Value="True"/>
    198202      </Unit18>
    199203      <Unit19>
    … …  
    257261      <Unit27>
    258262        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/win/wininc/redef.inc"/>
    259         <EditorIndex Value="7"/>
    260263        <WindowIndex Value="0"/>
    261264        <TopLine Value="739"/>
    262265        <CursorPos X="27" Y="752"/>
    263266        <UsageCount Value="17"/>
    264         <Loaded Value="True"/>
    265267      </Unit27>
    266268      <Unit28>
    267269        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/packages/fcl-base/src/syncobjs.pp"/>
    268270        <UnitName Value="syncobjs"/>
    269         <EditorIndex Value="2"/>
    270271        <WindowIndex Value="0"/>
    271272        <TopLine Value="104"/>
    272273        <CursorPos X="28" Y="106"/>
    273274        <UsageCount Value="14"/>
    274         <Loaded Value="True"/>
    275275      </Unit28>
    276276      <Unit29>
    277277        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/inc/threadh.inc"/>
    278         <EditorIndex Value="3"/>
    279278        <WindowIndex Value="0"/>
    280279        <TopLine Value="138"/>
    281280        <CursorPos X="11" Y="151"/>
    282281        <UsageCount Value="14"/>
    283         <Loaded Value="True"/>
    284282      </Unit29>
    285283      <Unit30>
    286284        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/inc/thread.inc"/>
    287         <EditorIndex Value="4"/>
    288285        <WindowIndex Value="0"/>
    289286        <TopLine Value="199"/>
    290287        <CursorPos X="3" Y="202"/>
    291288        <UsageCount Value="14"/>
    292         <Loaded Value="True"/>
    293289      </Unit30>
    294290      <Unit31>
    295291        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/win/sysosh.inc"/>
    296         <EditorIndex Value="12"/>
    297292        <WindowIndex Value="0"/>
    298293        <TopLine Value="8"/>
    299294        <CursorPos X="3" Y="33"/>
    300295        <UsageCount Value="14"/>
    301         <Loaded Value="True"/>
    302296      </Unit31>
    303297      <Unit32>
    304298        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/objpas/classes/classesh.inc"/>
    305         <EditorIndex Value="10"/>
    306299        <WindowIndex Value="0"/>
    307300        <TopLine Value="302"/>
    308301        <CursorPos X="19" Y="319"/>
    309302        <UsageCount Value="20"/>
    310         <Loaded Value="True"/>
    311303      </Unit32>
    312304      <Unit33>
    … …  
    396388      <Unit45>
    397389        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/lcl/interfaces/win32/win32object.inc"/>
    398         <EditorIndex Value="1"/>
    399390        <WindowIndex Value="0"/>
    400391        <TopLine Value="387"/>
    401392        <CursorPos X="1" Y="400"/>
    402393        <UsageCount Value="11"/>
    403         <Loaded Value="True"/>
    404394      </Unit45>
    405395      <Unit46>
    … …  
    420410        <Filename Value="../UPlatform.pas"/>
    421411        <UnitName Value="UPlatform"/>
    422         <EditorIndex Value="6"/>
     412        <EditorIndex Value="3"/>
    423413        <WindowIndex Value="0"/>
    424414        <TopLine Value="23"/>
    425415        <CursorPos X="31" Y="38"/>
    426         <UsageCount Value="23"/>
     416        <UsageCount Value="25"/>
    427417        <Loaded Value="True"/>
    428418      </Unit48>
    … …  
    487477      <Unit57>
    488478        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/objpas/classes/lists.inc"/>
    489         <EditorIndex Value="11"/>
    490479        <WindowIndex Value="0"/>
    491480        <TopLine Value="909"/>
    492481        <CursorPos X="26" Y="917"/>
    493482        <UsageCount Value="15"/>
    494         <Loaded Value="True"/>
    495483      </Unit57>
    496484      <Unit58>
    … …  
    535523      <Unit63>
    536524        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/fpc/2.4.3/source/rtl/objpas/sysutils/sysutilh.inc"/>
    537         <EditorIndex Value="8"/>
    538525        <WindowIndex Value="0"/>
    539526        <TopLine Value="1"/>
    540527        <CursorPos X="55" Y="4"/>
    541528        <UsageCount Value="16"/>
    542         <Loaded Value="True"/>
    543529      </Unit63>
    544530      <Unit64>
    545531        <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/lcl/controls.pp"/>
    546532        <UnitName Value="Controls"/>
    547         <EditorIndex Value="5"/>
    548533        <WindowIndex Value="0"/>
    549534        <TopLine Value="2660"/>
    550535        <CursorPos X="1" Y="2673"/>
    551536        <UsageCount Value="15"/>
    552         <Loaded Value="True"/>
    553537      </Unit64>
    554538    </Units>
    555     <JumpHistory Count="30" HistoryIndex="28">
     539    <JumpHistory Count="30" HistoryIndex="29">
    556540      <Position1>
    557541        <Filename Value="../UMicroThreading.pas"/>
    558         <Caret Line="773" Column="1" TopLine="760"/>
     542        <Caret Line="531" Column="1" TopLine="515"/>
    559543      </Position1>
    560544      <Position2>
    561545        <Filename Value="../UMicroThreading.pas"/>
    562         <Caret Line="774" Column="1" TopLine="760"/>
     546        <Caret Line="532" Column="1" TopLine="515"/>
    563547      </Position2>
    564548      <Position3>
    565549        <Filename Value="../UMicroThreading.pas"/>
    566         <Caret Line="772" Column="1" TopLine="760"/>
     550        <Caret Line="954" Column="1" TopLine="939"/>
    567551      </Position3>
    568552      <Position4>
    569553        <Filename Value="../UMicroThreading.pas"/>
    570         <Caret Line="773" Column="1" TopLine="760"/>
     554        <Caret Line="822" Column="1" TopLine="807"/>
    571555      </Position4>
    572556      <Position5>
    573557        <Filename Value="../UMicroThreading.pas"/>
    574         <Caret Line="774" Column="1" TopLine="760"/>
     558        <Caret Line="824" Column="1" TopLine="807"/>
    575559      </Position5>
    576560      <Position6>
    577561        <Filename Value="../UMicroThreading.pas"/>
    578         <Caret Line="772" Column="1" TopLine="760"/>
     562        <Caret Line="955" Column="1" TopLine="940"/>
    579563      </Position6>
    580564      <Position7>
    581         <Filename Value="../UMicroThreading.pas"/>
    582         <Caret Line="773" Column="1" TopLine="760"/>
     565        <Filename Value="UMainForm.pas"/>
     566        <Caret Line="262" Column="1" TopLine="247"/>
    583567      </Position7>
    584568      <Position8>
    585         <Filename Value="../UMicroThreading.pas"/>
    586         <Caret Line="774" Column="1" TopLine="760"/>
     569        <Filename Value="UMainForm.pas"/>
     570        <Caret Line="261" Column="1" TopLine="247"/>
    587571      </Position8>
    588572      <Position9>
    589573        <Filename Value="../UMicroThreading.pas"/>
    590         <Caret Line="772" Column="1" TopLine="760"/>
     574        <Caret Line="816" Column="1" TopLine="801"/>
    591575      </Position9>
    592576      <Position10>
    593577        <Filename Value="../UMicroThreading.pas"/>
    594         <Caret Line="773" Column="1" TopLine="760"/>
     578        <Caret Line="777" Column="1" TopLine="756"/>
    595579      </Position10>
    596580      <Position11>
    597581        <Filename Value="../UMicroThreading.pas"/>
    598         <Caret Line="774" Column="1" TopLine="760"/>
     582        <Caret Line="760" Column="1" TopLine="754"/>
    599583      </Position11>
    600584      <Position12>
    601585        <Filename Value="../UMicroThreading.pas"/>
    602         <Caret Line="772" Column="1" TopLine="760"/>
     586        <Caret Line="762" Column="1" TopLine="754"/>
    603587      </Position12>
    604588      <Position13>
    605589        <Filename Value="../UMicroThreading.pas"/>
    606         <Caret Line="773" Column="1" TopLine="760"/>
     590        <Caret Line="763" Column="1" TopLine="754"/>
    607591      </Position13>
    608592      <Position14>
    609593        <Filename Value="../UMicroThreading.pas"/>
    610         <Caret Line="774" Column="1" TopLine="760"/>
     594        <Caret Line="764" Column="1" TopLine="754"/>
    611595      </Position14>
    612596      <Position15>
    613597        <Filename Value="../UMicroThreading.pas"/>
    614         <Caret Line="772" Column="1" TopLine="760"/>
     598        <Caret Line="768" Column="2" TopLine="754"/>
    615599      </Position15>
    616600      <Position16>
    617601        <Filename Value="../UMicroThreading.pas"/>
    618         <Caret Line="773" Column="1" TopLine="760"/>
     602        <Caret Line="767" Column="1" TopLine="754"/>
    619603      </Position16>
    620604      <Position17>
    621605        <Filename Value="../UMicroThreading.pas"/>
    622         <Caret Line="774" Column="1" TopLine="760"/>
     606        <Caret Line="768" Column="1" TopLine="754"/>
    623607      </Position17>
    624608      <Position18>
    625609        <Filename Value="../UMicroThreading.pas"/>
    626         <Caret Line="772" Column="1" TopLine="760"/>
     610        <Caret Line="769" Column="1" TopLine="754"/>
    627611      </Position18>
    628612      <Position19>
    629613        <Filename Value="../UMicroThreading.pas"/>
    630         <Caret Line="773" Column="1" TopLine="760"/>
     614        <Caret Line="768" Column="1" TopLine="754"/>
    631615      </Position19>
    632616      <Position20>
    633617        <Filename Value="../UMicroThreading.pas"/>
    634         <Caret Line="774" Column="1" TopLine="760"/>
     618        <Caret Line="770" Column="22" TopLine="754"/>
    635619      </Position20>
    636620      <Position21>
    637621        <Filename Value="../UMicroThreading.pas"/>
    638         <Caret Line="772" Column="1" TopLine="760"/>
     622        <Caret Line="760" Column="1" TopLine="754"/>
    639623      </Position21>
    640624      <Position22>
    641625        <Filename Value="../UMicroThreading.pas"/>
    642         <Caret Line="773" Column="1" TopLine="760"/>
     626        <Caret Line="762" Column="1" TopLine="754"/>
    643627      </Position22>
    644628      <Position23>
    645629        <Filename Value="../UMicroThreading.pas"/>
    646         <Caret Line="774" Column="1" TopLine="760"/>
     630        <Caret Line="767" Column="1" TopLine="754"/>
    647631      </Position23>
    648632      <Position24>
    649633        <Filename Value="../UMicroThreading.pas"/>
    650         <Caret Line="810" Column="35" TopLine="796"/>
     634        <Caret Line="768" Column="1" TopLine="754"/>
    651635      </Position24>
    652636      <Position25>
    653         <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/lcl/interfaces/win32/win32object.inc"/>
    654         <Caret Line="400" Column="1" TopLine="387"/>
     637        <Filename Value="../UMicroThreading.pas"/>
     638        <Caret Line="770" Column="1" TopLine="754"/>
    655639      </Position25>
    656640      <Position26>
    657641        <Filename Value="../UMicroThreading.pas"/>
    658         <Caret Line="524" Column="9" TopLine="513"/>
     642        <Caret Line="772" Column="1" TopLine="754"/>
    659643      </Position26>
    660644      <Position27>
    661645        <Filename Value="../UMicroThreading.pas"/>
    662         <Caret Line="523" Column="1" TopLine="513"/>
     646        <Caret Line="776" Column="1" TopLine="754"/>
    663647      </Position27>
    664648      <Position28>
    665649        <Filename Value="../UMicroThreading.pas"/>
    666         <Caret Line="524" Column="1" TopLine="513"/>
     650        <Caret Line="777" Column="1" TopLine="754"/>
    667651      </Position28>
    668652      <Position29>
    669653        <Filename Value="../UMicroThreading.pas"/>
    670         <Caret Line="526" Column="1" TopLine="513"/>
     654        <Caret Line="778" Column="1" TopLine="754"/>
    671655      </Position29>
    672656      <Position30>
    673         <Filename Value="../../../../Programy/Lazarus/0.9.31_2.4.3/lcl/interfaces/win32/win32object.inc"/>
    674         <Caret Line="400" Column="1" TopLine="387"/>
     657        <Filename Value="../UMicroThreading.pas"/>
     658        <Caret Line="782" Column="1" TopLine="782"/>
    675659      </Position30>
    676660    </JumpHistory>
    … …  
    712696  </CompilerOptions>
    713697  <Debugging>
    714     <BreakPoints Count="1">
    715       <Item1>
    716         <Source Value="../UMicroThreading.pas"/>
    717         <Line Value="523"/>
    718       </Item1>
    719     </BreakPoints>
    720698    <Watches Count="2">
    721699      <Item1>
Note: See TracChangeset for help on using the changeset viewer.