Changeset 185


Ignore:
Timestamp:
Mar 10, 2011, 11:20:08 AM (14 years ago)
Author:
george
Message:
Location:
Docking/CoolDocking
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • Docking/CoolDocking/Demo/IDE/IDE.lpi

    r184 r185  
    5555        <TopLine Value="11"/>
    5656        <CursorPos X="15" Y="34"/>
    57         <UsageCount Value="120"/>
     57        <UsageCount Value="122"/>
    5858      </Unit0>
    5959      <Unit1>
    … …  
    6363        <ResourceBaseClass Value="Form"/>
    6464        <UnitName Value="UMainForm"/>
    65         <EditorIndex Value="13"/>
    66         <WindowIndex Value="0"/>
    67         <TopLine Value="1"/>
    68         <CursorPos X="70" Y="2"/>
    69         <UsageCount Value="120"/>
     65        <EditorIndex Value="6"/>
     66        <WindowIndex Value="0"/>
     67        <TopLine Value="117"/>
     68        <CursorPos X="1" Y="130"/>
     69        <UsageCount Value="122"/>
    7070        <Loaded Value="True"/>
    7171        <LoadedDesigner Value="True"/>
    … …  
    8080        <TopLine Value="1"/>
    8181        <CursorPos X="12" Y="16"/>
    82         <UsageCount Value="120"/>
     82        <UsageCount Value="122"/>
    8383      </Unit2>
    8484      <Unit3>
    … …  
    9292        <TopLine Value="1"/>
    9393        <CursorPos X="22" Y="4"/>
    94         <UsageCount Value="120"/>
     94        <UsageCount Value="122"/>
    9595        <Loaded Value="True"/>
    9696        <LoadedDesigner Value="True"/>
    … …  
    105105        <TopLine Value="1"/>
    106106        <CursorPos X="15" Y="10"/>
    107         <UsageCount Value="120"/>
     107        <UsageCount Value="122"/>
    108108      </Unit4>
    109109      <Unit5>
    110110        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\Lazarus\lcl\include\control.inc"/>
    111         <EditorIndex Value="6"/>
    112         <WindowIndex Value="0"/>
    113         <TopLine Value="3508"/>
    114         <CursorPos X="1" Y="3512"/>
    115         <UsageCount Value="55"/>
     111        <EditorIndex Value="9"/>
     112        <WindowIndex Value="0"/>
     113        <TopLine Value="1093"/>
     114        <CursorPos X="1" Y="1106"/>
     115        <UsageCount Value="56"/>
    116116        <Loaded Value="True"/>
    117117      </Unit5>
    … …  
    125125        <TopLine Value="1"/>
    126126        <CursorPos X="20" Y="16"/>
    127         <UsageCount Value="120"/>
     127        <UsageCount Value="122"/>
    128128      </Unit6>
    129129      <Unit7>
    130130        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\Lazarus\lcl\include\customform.inc"/>
    131         <EditorIndex Value="9"/>
    132131        <WindowIndex Value="0"/>
    133132        <TopLine Value="941"/>
    134133        <CursorPos X="1" Y="954"/>
    135134        <UsageCount Value="59"/>
    136         <Loaded Value="True"/>
    137135      </Unit7>
    138136      <Unit8>
    … …  
    142140        <ResourceBaseClass Value="Form"/>
    143141        <UnitName Value="UMessagesForm"/>
    144         <EditorIndex Value="8"/>
    145142        <WindowIndex Value="0"/>
    146143        <TopLine Value="1"/>
    147144        <CursorPos X="7" Y="16"/>
    148         <UsageCount Value="120"/>
    149         <Loaded Value="True"/>
     145        <UsageCount Value="122"/>
    150146      </Unit8>
    151147      <Unit9>
    … …  
    158154        <TopLine Value="1"/>
    159155        <CursorPos X="12" Y="15"/>
    160         <UsageCount Value="120"/>
     156        <UsageCount Value="122"/>
    161157      </Unit9>
    162158      <Unit10>
    … …  
    169165        <TopLine Value="1"/>
    170166        <CursorPos X="21" Y="4"/>
    171         <UsageCount Value="120"/>
     167        <UsageCount Value="122"/>
    172168      </Unit10>
    173169      <Unit11>
    … …  
    180176        <TopLine Value="1"/>
    181177        <CursorPos X="12" Y="16"/>
    182         <UsageCount Value="120"/>
     178        <UsageCount Value="122"/>
    183179      </Unit11>
    184180      <Unit12>
    … …  
    191187        <TopLine Value="1"/>
    192188        <CursorPos X="12" Y="17"/>
    193         <UsageCount Value="120"/>
     189        <UsageCount Value="122"/>
    194190      </Unit12>
    195191      <Unit13>
    … …  
    202198        <TopLine Value="1"/>
    203199        <CursorPos X="12" Y="16"/>
    204         <UsageCount Value="120"/>
     200        <UsageCount Value="122"/>
    205201      </Unit13>
    206202      <Unit14>
    … …  
    214210        <TopLine Value="6"/>
    215211        <CursorPos X="31" Y="3"/>
    216         <UsageCount Value="118"/>
     212        <UsageCount Value="120"/>
    217213        <Loaded Value="True"/>
    218214        <LoadedDesigner Value="True"/>
    … …  
    223219        <EditorIndex Value="0"/>
    224220        <WindowIndex Value="0"/>
    225         <TopLine Value="287"/>
    226         <CursorPos X="4" Y="289"/>
    227         <UsageCount Value="58"/>
     221        <TopLine Value="82"/>
     222        <CursorPos X="14" Y="95"/>
     223        <UsageCount Value="60"/>
    228224        <Loaded Value="True"/>
    229225      </Unit15>
    … …  
    231227        <Filename Value="..\..\UCoolDockLayout.pas"/>
    232228        <UnitName Value="UCoolDockLayout"/>
     229        <IsVisibleTab Value="True"/>
    233230        <EditorIndex Value="1"/>
    234231        <WindowIndex Value="0"/>
    235         <TopLine Value="381"/>
    236         <CursorPos X="36" Y="404"/>
    237         <UsageCount Value="58"/>
     232        <TopLine Value="338"/>
     233        <CursorPos X="30" Y="348"/>
     234        <UsageCount Value="59"/>
    238235        <Loaded Value="True"/>
    239236      </Unit16>
    240237      <Unit17>
    241238        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\FPC\rtl\objpas\classes\classesh.inc"/>
    242         <WindowIndex Value="0"/>
    243         <TopLine Value="1638"/>
    244         <CursorPos X="17" Y="1651"/>
    245         <UsageCount Value="31"/>
     239        <EditorIndex Value="11"/>
     240        <WindowIndex Value="0"/>
     241        <TopLine Value="1883"/>
     242        <CursorPos X="10" Y="1896"/>
     243        <UsageCount Value="32"/>
     244        <Loaded Value="True"/>
    246245      </Unit17>
    247246      <Unit18>
    248247        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\FPC\rtl\objpas\types.pp"/>
    249248        <UnitName Value="types"/>
    250         <WindowIndex Value="0"/>
    251         <TopLine Value="70"/>
    252         <CursorPos X="21" Y="83"/>
    253         <UsageCount Value="5"/>
     249        <EditorIndex Value="10"/>
     250        <WindowIndex Value="0"/>
     251        <TopLine Value="274"/>
     252        <CursorPos X="10" Y="287"/>
     253        <UsageCount Value="11"/>
     254        <Loaded Value="True"/>
    254255      </Unit18>
    255256      <Unit19>
    … …  
    258259        <TopLine Value="220"/>
    259260        <CursorPos X="16" Y="233"/>
    260         <UsageCount Value="5"/>
     261        <UsageCount Value="4"/>
    261262      </Unit19>
    262263      <Unit20>
    263264        <Filename Value="..\..\URectangle.pas"/>
    264265        <UnitName Value="URectangle"/>
    265         <EditorIndex Value="4"/>
    266266        <WindowIndex Value="0"/>
    267267        <TopLine Value="110"/>
    268268        <CursorPos X="18" Y="126"/>
    269269        <UsageCount Value="27"/>
    270         <Loaded Value="True"/>
    271270      </Unit20>
    272271      <Unit21>
    … …  
    276275        <TopLine Value="34"/>
    277276        <CursorPos X="11" Y="47"/>
    278         <UsageCount Value="5"/>
     277        <UsageCount Value="4"/>
    279278      </Unit21>
    280279      <Unit22>
    … …  
    287286        <TopLine Value="25"/>
    288287        <CursorPos X="7" Y="48"/>
    289         <UsageCount Value="4"/>
     288        <UsageCount Value="3"/>
    290289      </Unit22>
    291290      <Unit23>
    … …  
    295294        <TopLine Value="776"/>
    296295        <CursorPos X="3" Y="789"/>
    297         <UsageCount Value="32"/>
     296        <UsageCount Value="31"/>
    298297      </Unit23>
    299298      <Unit24>
    … …  
    303302        <TopLine Value="835"/>
    304303        <CursorPos X="3" Y="837"/>
    305         <UsageCount Value="2"/>
     304        <UsageCount Value="1"/>
    306305      </Unit24>
    307306      <Unit25>
    308307        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\Lazarus\lcl\include\customcombobox.inc"/>
     308        <EditorIndex Value="7"/>
    309309        <WindowIndex Value="0"/>
    310310        <TopLine Value="913"/>
    311         <CursorPos X="1" Y="926"/>
     311        <CursorPos X="1" Y="930"/>
    312312        <UsageCount Value="24"/>
     313        <Loaded Value="True"/>
    313314      </Unit25>
    314315      <Unit26>
    315316        <Filename Value="E:\Projekty2\FreePascalManager\trunk\Instance\1\Lazarus\lcl\include\containedaction.inc"/>
    316         <EditorIndex Value="7"/>
    317317        <WindowIndex Value="0"/>
    318318        <TopLine Value="91"/>
    319319        <CursorPos X="1" Y="104"/>
    320320        <UsageCount Value="11"/>
    321         <Loaded Value="True"/>
    322321      </Unit26>
    323322      <Unit27>
    … …  
    326325        <TopLine Value="239"/>
    327326        <CursorPos X="1" Y="252"/>
    328         <UsageCount Value="6"/>
     327        <UsageCount Value="5"/>
    329328      </Unit27>
    330329      <Unit28>
    … …  
    341340        <TopLine Value="7662"/>
    342341        <CursorPos X="1" Y="7675"/>
    343         <UsageCount Value="29"/>
     342        <UsageCount Value="28"/>
    344343      </Unit29>
    345344      <Unit30>
    … …  
    348347        <TopLine Value="751"/>
    349348        <CursorPos X="1" Y="764"/>
    350         <UsageCount Value="26"/>
     349        <UsageCount Value="25"/>
    351350      </Unit30>
    352351      <Unit31>
    … …  
    359358        <TopLine Value="36"/>
    360359        <CursorPos X="3" Y="49"/>
    361         <UsageCount Value="50"/>
     360        <UsageCount Value="49"/>
    362361      </Unit31>
    363362      <Unit32>
    364363        <Filename Value="..\..\UCoolDockCommon.pas"/>
    365364        <UnitName Value="UCoolDockCommon"/>
    366         <EditorIndex Value="10"/>
    367365        <WindowIndex Value="0"/>
    368366        <TopLine Value="1"/>
    369367        <CursorPos X="25" Y="11"/>
    370368        <UsageCount Value="50"/>
    371         <Loaded Value="True"/>
    372369      </Unit32>
    373370      <Unit33>
    … …  
    377374        <TopLine Value="161"/>
    378375        <CursorPos X="3" Y="165"/>
    379         <UsageCount Value="49"/>
     376        <UsageCount Value="48"/>
    380377      </Unit33>
    381378      <Unit34>
    … …  
    385382        <TopLine Value="503"/>
    386383        <CursorPos X="10" Y="516"/>
    387         <UsageCount Value="22"/>
     384        <UsageCount Value="21"/>
    388385      </Unit34>
    389386      <Unit35>
    … …  
    392389        <TopLine Value="539"/>
    393390        <CursorPos X="3" Y="544"/>
    394         <UsageCount Value="5"/>
     391        <UsageCount Value="4"/>
    395392      </Unit35>
    396393      <Unit36>
    … …  
    399396        <TopLine Value="224"/>
    400397        <CursorPos X="29" Y="238"/>
    401         <UsageCount Value="7"/>
     398        <UsageCount Value="6"/>
    402399      </Unit36>
    403400      <Unit37>
    … …  
    406403        <TopLine Value="7"/>
    407404        <CursorPos X="3" Y="20"/>
    408         <UsageCount Value="6"/>
     405        <UsageCount Value="5"/>
    409406      </Unit37>
    410407      <Unit38>
    … …  
    413410        <TopLine Value="79"/>
    414411        <CursorPos X="14" Y="82"/>
    415         <UsageCount Value="6"/>
     412        <UsageCount Value="5"/>
    416413      </Unit38>
    417414      <Unit39>
    … …  
    421418        <TopLine Value="32"/>
    422419        <CursorPos X="20" Y="45"/>
    423         <UsageCount Value="30"/>
     420        <UsageCount Value="29"/>
    424421      </Unit39>
    425422      <Unit40>
    426423        <Filename Value="..\..\UCoolDockStyle.pas"/>
    427424        <UnitName Value="UCoolDockStyle"/>
    428         <EditorIndex Value="12"/>
     425        <EditorIndex Value="5"/>
    429426        <WindowIndex Value="0"/>
    430427        <TopLine Value="10"/>
    431428        <CursorPos X="15" Y="23"/>
    432         <UsageCount Value="32"/>
     429        <UsageCount Value="34"/>
    433430        <Loaded Value="True"/>
    434431      </Unit40>
    … …  
    436433        <Filename Value="..\..\UCoolDockClientPanel.pas"/>
    437434        <UnitName Value="UCoolDockClientPanel"/>
    438         <IsVisibleTab Value="True"/>
    439         <EditorIndex Value="11"/>
     435        <EditorIndex Value="4"/>
    440436        <WindowIndex Value="0"/>
    441437        <TopLine Value="259"/>
    442         <CursorPos X="1" Y="271"/>
    443         <UsageCount Value="32"/>
     438        <CursorPos X="26" Y="270"/>
     439        <UsageCount Value="34"/>
    444440        <Loaded Value="True"/>
    445441      </Unit41>
    … …  
    450446        <TopLine Value="1531"/>
    451447        <CursorPos X="33" Y="1544"/>
    452         <UsageCount Value="6"/>
     448        <UsageCount Value="5"/>
    453449      </Unit42>
    454450      <Unit43>
    455451        <Filename Value="..\..\UCoolDockStyleTabs.pas"/>
    456452        <UnitName Value="UCoolDockStyleTabs"/>
    457         <EditorIndex Value="15"/>
     453        <EditorIndex Value="12"/>
    458454        <WindowIndex Value="0"/>
    459455        <TopLine Value="192"/>
    460456        <CursorPos X="52" Y="205"/>
    461         <UsageCount Value="31"/>
     457        <UsageCount Value="33"/>
    462458        <Loaded Value="True"/>
    463459      </Unit43>
    … …  
    468464        <TopLine Value="45"/>
    469465        <CursorPos X="28" Y="558"/>
    470         <UsageCount Value="6"/>
     466        <UsageCount Value="5"/>
    471467      </Unit44>
    472468      <Unit45>
    … …  
    476472        <TopLine Value="344"/>
    477473        <CursorPos X="1" Y="357"/>
    478         <UsageCount Value="6"/>
     474        <UsageCount Value="5"/>
    479475      </Unit45>
    480476      <Unit46>
    … …  
    483479        <TopLine Value="2403"/>
    484480        <CursorPos X="74" Y="2413"/>
    485         <UsageCount Value="6"/>
     481        <UsageCount Value="5"/>
    486482      </Unit46>
    487483      <Unit47>
    488484        <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    489485        <UnitName Value="UCoolDockStyleRegions"/>
    490         <EditorIndex Value="14"/>
     486        <EditorIndex Value="8"/>
    491487        <WindowIndex Value="0"/>
    492488        <TopLine Value="64"/>
    493         <CursorPos X="31" Y="77"/>
    494         <UsageCount Value="30"/>
     489        <CursorPos X="1" Y="76"/>
     490        <UsageCount Value="32"/>
    495491        <Loaded Value="True"/>
    496492      </Unit47>
    … …  
    501497        <TopLine Value="1"/>
    502498        <CursorPos X="26" Y="12"/>
    503         <UsageCount Value="27"/>
     499        <UsageCount Value="26"/>
    504500      </Unit48>
    505501      <Unit49>
    … …  
    508504        <TopLine Value="762"/>
    509505        <CursorPos X="1" Y="775"/>
    510         <UsageCount Value="27"/>
     506        <UsageCount Value="26"/>
    511507      </Unit49>
    512508      <Unit50>
    … …  
    515511        <TopLine Value="148"/>
    516512        <CursorPos X="32" Y="160"/>
    517         <UsageCount Value="27"/>
     513        <UsageCount Value="26"/>
    518514      </Unit50>
    519515      <Unit51>
    … …  
    522518        <TopLine Value="53"/>
    523519        <CursorPos X="11" Y="66"/>
    524         <UsageCount Value="27"/>
     520        <UsageCount Value="26"/>
    525521      </Unit51>
    526522      <Unit52>
    … …  
    529525        <TopLine Value="141"/>
    530526        <CursorPos X="3" Y="143"/>
    531         <UsageCount Value="27"/>
     527        <UsageCount Value="26"/>
    532528      </Unit52>
    533529      <Unit53>
    … …  
    536532        <TopLine Value="2"/>
    537533        <CursorPos X="40" Y="3"/>
    538         <UsageCount Value="26"/>
     534        <UsageCount Value="25"/>
    539535        <DefaultSyntaxHighlighter Value="None"/>
    540536      </Unit53>
    … …  
    549545        <TopLine Value="23"/>
    550546        <CursorPos X="15" Y="24"/>
    551         <UsageCount Value="21"/>
     547        <UsageCount Value="24"/>
    552548      </Unit54>
    553549      <Unit55>
    554550        <Filename Value="..\..\UCoolDockStylePopupRegions.pas"/>
    555551        <UnitName Value="UCoolDockStylePopupRegions"/>
    556         <EditorIndex Value="5"/>
    557552        <WindowIndex Value="0"/>
    558553        <TopLine Value="1"/>
    559554        <CursorPos X="1" Y="1"/>
    560555        <UsageCount Value="10"/>
    561         <Loaded Value="True"/>
    562556      </Unit55>
    563557    </Units>
    564558    <JumpHistory Count="30" HistoryIndex="29">
    565559      <Position1>
    566         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    567         <Caret Line="66" Column="1" TopLine="56"/>
     560        <Filename Value="UMainForm.pas"/>
     561        <Caret Line="129" Column="1" TopLine="117"/>
    568562      </Position1>
    569563      <Position2>
    570         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    571         <Caret Line="83" Column="1" TopLine="70"/>
     564        <Filename Value="UMainForm.pas"/>
     565        <Caret Line="130" Column="72" TopLine="117"/>
    572566      </Position2>
    573567      <Position3>
    574         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    575         <Caret Line="85" Column="1" TopLine="70"/>
     568        <Filename Value="..\..\UCoolDockLayout.pas"/>
     569        <Caret Line="517" Column="54" TopLine="507"/>
    576570      </Position3>
    577571      <Position4>
    578         <Filename Value="..\..\UCoolDocking.pas"/>
    579         <Caret Line="211" Column="1" TopLine="198"/>
     572        <Filename Value="UMainForm.pas"/>
     573        <Caret Line="129" Column="1" TopLine="117"/>
    580574      </Position4>
    581575      <Position5>
    582         <Filename Value="..\..\UCoolDocking.pas"/>
    583         <Caret Line="212" Column="1" TopLine="198"/>
     576        <Filename Value="..\..\UCoolDockLayout.pas"/>
     577        <Caret Line="513" Column="1" TopLine="507"/>
    584578      </Position5>
    585579      <Position6>
    586         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    587         <Caret Line="86" Column="1" TopLine="70"/>
     580        <Filename Value="..\..\UCoolDockLayout.pas"/>
     581        <Caret Line="514" Column="1" TopLine="507"/>
    588582      </Position6>
    589583      <Position7>
    590         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    591         <Caret Line="87" Column="1" TopLine="70"/>
     584        <Filename Value="..\..\UCoolDockLayout.pas"/>
     585        <Caret Line="515" Column="1" TopLine="507"/>
    592586      </Position7>
    593587      <Position8>
    594         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    595         <Caret Line="88" Column="1" TopLine="70"/>
     588        <Filename Value="..\..\UCoolDockLayout.pas"/>
     589        <Caret Line="516" Column="1" TopLine="507"/>
    596590      </Position8>
    597591      <Position9>
    598         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    599         <Caret Line="91" Column="1" TopLine="70"/>
     592        <Filename Value="..\..\UCoolDockLayout.pas"/>
     593        <Caret Line="514" Column="1" TopLine="507"/>
    600594      </Position9>
    601595      <Position10>
    602         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    603         <Caret Line="92" Column="1" TopLine="71"/>
     596        <Filename Value="..\..\UCoolDockLayout.pas"/>
     597        <Caret Line="515" Column="1" TopLine="507"/>
    604598      </Position10>
    605599      <Position11>
    606         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    607         <Caret Line="94" Column="1" TopLine="73"/>
     600        <Filename Value="..\..\UCoolDockLayout.pas"/>
     601        <Caret Line="516" Column="1" TopLine="507"/>
    608602      </Position11>
    609603      <Position12>
    610         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    611         <Caret Line="95" Column="1" TopLine="74"/>
     604        <Filename Value="..\..\UCoolDockLayout.pas"/>
     605        <Caret Line="515" Column="1" TopLine="507"/>
    612606      </Position12>
    613607      <Position13>
    614         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    615         <Caret Line="96" Column="1" TopLine="75"/>
     608        <Filename Value="..\..\UCoolDockLayout.pas"/>
     609        <Caret Line="516" Column="1" TopLine="507"/>
    616610      </Position13>
    617611      <Position14>
    618         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    619         <Caret Line="97" Column="31" TopLine="76"/>
     612        <Filename Value="UMainForm.pas"/>
     613        <Caret Line="130" Column="1" TopLine="117"/>
    620614      </Position14>
    621615      <Position15>
    622         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    623         <Caret Line="98" Column="1" TopLine="77"/>
     616        <Filename Value="..\..\UCoolDockLayout.pas"/>
     617        <Caret Line="513" Column="1" TopLine="507"/>
    624618      </Position15>
    625619      <Position16>
    626         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    627         <Caret Line="100" Column="1" TopLine="64"/>
     620        <Filename Value="..\..\UCoolDockLayout.pas"/>
     621        <Caret Line="516" Column="1" TopLine="507"/>
    628622      </Position16>
    629623      <Position17>
    630         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    631         <Caret Line="64" Column="1" TopLine="51"/>
     624        <Filename Value="UMainForm.pas"/>
     625        <Caret Line="118" Column="89" TopLine="117"/>
    632626      </Position17>
    633627      <Position18>
    634         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    635         <Caret Line="65" Column="1" TopLine="51"/>
     628        <Filename Value="..\..\UCoolDockLayout.pas"/>
     629        <Caret Line="513" Column="1" TopLine="507"/>
    636630      </Position18>
    637631      <Position19>
    638         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    639         <Caret Line="66" Column="1" TopLine="51"/>
     632        <Filename Value="..\..\UCoolDockLayout.pas"/>
     633        <Caret Line="516" Column="1" TopLine="507"/>
    640634      </Position19>
    641635      <Position20>
    642         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    643         <Caret Line="83" Column="1" TopLine="70"/>
     636        <Filename Value="UMainForm.pas"/>
     637        <Caret Line="130" Column="1" TopLine="117"/>
    644638      </Position20>
    645639      <Position21>
    646         <Filename Value="..\..\UCoolDockStyleRegions.pas"/>
    647         <Caret Line="85" Column="1" TopLine="70"/>
     640        <Filename Value="..\..\UCoolDockLayout.pas"/>
     641        <Caret Line="513" Column="1" TopLine="507"/>
    648642      </Position21>
    649643      <Position22>
    650         <Filename Value="..\..\UCoolDocking.pas"/>
    651         <Caret Line="211" Column="1" TopLine="198"/>
     644        <Filename Value="..\..\UCoolDockLayout.pas"/>
     645        <Caret Line="516" Column="1" TopLine="507"/>
    652646      </Position22>
    653647      <Position23>
    654         <Filename Value="..\..\UCoolDocking.pas"/>
    655         <Caret Line="212" Column="1" TopLine="198"/>
     648        <Filename Value="UMainForm.pas"/>
     649        <Caret Line="130" Column="1" TopLine="117"/>
    656650      </Position23>
    657651      <Position24>
    658652        <Filename Value="..\..\UCoolDockLayout.pas"/>
    659         <Caret Line="403" Column="30" TopLine="390"/>
     653        <Caret Line="513" Column="1" TopLine="507"/>
    660654      </Position24>
    661655      <Position25>
    662656        <Filename Value="..\..\UCoolDockLayout.pas"/>
    663         <Caret Line="24" Column="17" TopLine="11"/>
     657        <Caret Line="516" Column="1" TopLine="507"/>
    664658      </Position25>
    665659      <Position26>
    666         <Filename Value="..\..\URectangle.pas"/>
    667         <Caret Line="43" Column="58" TopLine="23"/>
     660        <Filename Value="..\..\UCoolDockLayout.pas"/>
     661        <Caret Line="514" Column="1" TopLine="507"/>
    668662      </Position26>
    669663      <Position27>
    670         <Filename Value="..\..\URectangle.pas"/>
    671         <Caret Line="126" Column="24" TopLine="107"/>
     664        <Filename Value="..\..\UCoolDockLayout.pas"/>
     665        <Caret Line="515" Column="5" TopLine="507"/>
    672666      </Position27>
    673667      <Position28>
    674668        <Filename Value="..\..\UCoolDockLayout.pas"/>
    675         <Caret Line="24" Column="17" TopLine="11"/>
     669        <Caret Line="510" Column="27" TopLine="507"/>
    676670      </Position28>
    677671      <Position29>
    678672        <Filename Value="..\..\UCoolDockLayout.pas"/>
    679         <Caret Line="403" Column="43" TopLine="384"/>
     673        <Caret Line="517" Column="1" TopLine="507"/>
    680674      </Position29>
    681675      <Position30>
    682         <Filename Value="..\..\UCoolDockClientPanel.pas"/>
    683         <Caret Line="154" Column="30" TopLine="150"/>
     676        <Filename Value="..\..\UCoolDockLayout.pas"/>
     677        <Caret Line="523" Column="1" TopLine="507"/>
    684678      </Position30>
    685679    </JumpHistory>
    … …  
    707701  </CompilerOptions>
    708702  <Debugging>
     703    <BreakPoints Count="1">
     704      <Item1>
     705        <Source Value="..\..\UCoolDocking.pas"/>
     706        <Line Value="296"/>
     707      </Item1>
     708    </BreakPoints>
    709709    <Watches Count="1">
    710710      <Item1>

  • Docking/CoolDocking/Demo/IDE/UMainForm.pas

    r184 r185  
    127127procedure TMainForm.ComboBox1Select(Sender: TObject);
    128128begin
    129   if ComboBox1.ItemIndex <> - 1 then
     129  if (ComboBox1.ItemIndex <> - 1) and (ComboBox1.ItemIndex < CoolDockLayoutList1.Items.Count) then
    130130    TCoolDockLayout(CoolDockLayoutList1.Items[ComboBox1.ItemIndex]).Restore;
    131131end;
    … …  
    217217  NewLayout: TCoolDockLayout;
    218218begin
    219   if ComboBox1.Items.IndexOf(ComboBox1.Text) = -1 then begin
    220     NewLayout := TCoolDockLayout.Create;
    221     NewLayout.Name := ComboBox1.Text;
    222     NewLayout.Store;
    223     CoolDockLayoutList1.Items.Add(NewLayout);
    224   end else
    225     TCoolDockLayout(CoolDockLayoutList1.Items[ComboBox1.Items.IndexOf(ComboBox1.Text)]).Store;
    226   CoolDockLayoutList1.SaveToFile(DockLayoutFileName);
    227   CoolDockLayoutList1.PopulateStringList(ComboBox1.Items);
     219  if ComboBox1.Text <> '' then begin
     220    if ComboBox1.Items.IndexOf(ComboBox1.Text) = -1 then begin
     221      NewLayout := TCoolDockLayout.Create;
     222      NewLayout.Name := ComboBox1.Text;
     223      NewLayout.Store;
     224      CoolDockLayoutList1.Items.Add(NewLayout);
     225    end else
     226      TCoolDockLayout(CoolDockLayoutList1.Items[ComboBox1.Items.IndexOf(ComboBox1.Text)]).Store;
     227    CoolDockLayoutList1.SaveToFile(DockLayoutFileName);
     228    CoolDockLayoutList1.PopulateStringList(ComboBox1.Items);
     229  end else ShowMessage('Enter layout name');
    228230end;
    229231

  • Docking/CoolDocking/UCoolDockLayout.pas

    r184 r185  
    2727    UndockSize: TPoint;
    2828    DockStyle: TDockStyle;
     29    Processed: Boolean;
    2930    procedure SaveToNode(Node: TDOMNode);
    3031    procedure LoadFromNode(Node: TDOMNode);
    … …  
    391392            FormClass := TFormClass(FindClass('TCoolDockConjoinForm'));
    392393            if FormClass = TCoolDockConjoinForm then begin
    393               ParentComponent := TCoolDockConjoinForm.Create(Application);
     394              ParentComponent := TCoolDockManager(Form.DockManager).CreateContainer(alNone);
    394395              TCoolDockManager(TCoolDockConjoinForm(ParentComponent).Panel.DockManager).DockStyle := ParentLayoutItem.DockStyle;
    395396              ParentLayoutItem.Restore(TWinControl(ParentComponent));
    … …  
    401402    if Assigned(ParentComponent) and (ParentComponent is TCoolDockConjoinForm) then
    402403      Form.ManualDock(TCoolDockConjoinForm(ParentComponent).Panel);
    403   end else
    404   if Assigned(Form.HostDockSite) then Form.ManualFloat(Rect.AsTRect);
     404  end;
     405  Processed := True;
    405406end;
    406407
    … …  
    509510  I: Integer;
    510511begin
     512  // Undock all forms
     513  I := 0;
     514  while (I < Application.ComponentCount) do begin
     515    if (Application.Components[I] is TForm) then begin
     516      Form := (Application.Components[I] as TForm);
     517      if Assigned(Form.HostDockSite) then
     518        Form.ManualFloat(Rect(Form.Left, Form.Top, Form.Left + Form.Width, Form.Top + Form.Height));
     519    end;
     520    Inc(I);
     521  end;
     522
     523  for I := 0 to Items.Count - 1 do
     524  with TCoolDockLayoutItem(Items[I]) do
     525    Processed := False;
     526
    511527  for I := 0 to Items.Count - 1 do
    512528  with TCoolDockLayoutItem(Items[I]) do begin
    513529    Form := TForm(Application.FindComponent(Name));
    514     if Assigned(Form) then Restore(Form);
     530    if Assigned(Form) and (not Assigned(Form.HostDockSite)) and (not Processed) then Restore(Form);
    515531  end;
    516532end;

  • Docking/CoolDocking/UCoolDockStyleRegions.pas

    r184 r185  
    7373        NewDockSite := DockSite.HostDockSite;
    7474        // FDockSite.ManualFloat(FDockSite.BoundsRect);
     75        NewConjoinDockForm.ManualDock(NewDockSite);
    7576        AControl.ManualDock(NewConjoinDockForm.Panel, nil, InsertAt);
    7677        if DockSite is TForm then
    … …  
    7980        if DockSite is TPanel then
    8081          DockSite.Parent.ManualDock(NewConjoinDockForm.Panel);
    81         NewConjoinDockForm.ManualDock(NewDockSite);
    8282        UpdateClientSize;
    8383        Exit;
    … …  
    114114  Control.RemoveHandlerOnVisibleChanged(ClientPanel.VisibleChange);
    115115
    116   if TCoolDockManager(Manager).DockSite.DockClientCount = 2 then FDockDirection := ddNone;
     116  TCoolDockManager(Manager).DockPanels.Remove(ClientPanel);
     117
     118  //if TCoolDockManager(Manager).DockSite.DockClientCount = 2 then FDockDirection := ddNone;
     119  if TCoolDockManager(Manager).DockPanels.Count = 1 then begin
     120    // Last removed control => Free parent if it is TCoolDockConjoinForm
     121    if TCoolDockManager(Manager).DockSite.Parent is TCoolDockConjoinForm then
     122    with TCoolDockConjoinForm(TCoolDockManager(Manager).DockSite.Parent) do begin
     123      if Assigned(Parent) then begin
     124        TCoolDockClientPanel(TCoolDockManager(Manager).DockPanels[0]).Control.ManualDock(HostDockSite);
     125      end else TCoolDockClientPanel(TCoolDockManager(Manager).DockPanels[0]).Control.ManualFloat(Rect(Left, Top, Left + Width, Top + Height));
     126      ManualFloat(Rect(Left, Top, Left + Width, Top + Height));
     127      Free;
     128    end;
     129  end;
    117130  inherited RemoveControl(Control);
    118131end;

  • Docking/CoolDocking/UCoolDocking.pas

    r184 r185  
    297297      NewDockSite := FDockSite.HostDockSite;
    298298//      FDockSite.ManualFloat(FDockSite.BoundsRect);
     299      NewConjoinDockForm.ManualDock(NewDockSite, nil, InsertAt);
    299300      FDockSite.ManualDock(NewConjoinDockForm.Panel);
    300301      Control.ManualDock(NewConjoinDockForm.Panel, nil, InsertAt);
    301       NewConjoinDockForm.ManualDock(NewDockSite);
    302302    end;
    303303  end else
    … …  
    366366  ClientPanel: TCoolDockClientPanel;
    367367begin
     368  DockStyleHandler.RemoveControl(Control);
    368369  //inherited;
    369   if Control.HostDockSite = Self.FDockSite then begin
     370(*  if Control.HostDockSite = Self.FDockSite then begin
    370371    ClientPanel := FindControlInPanels(Control);
    371372
    … …  
    380381    DockStyle := DockStyle;
    381382  end;
     383  *)
    382384end;
    383385
Note: See TracChangeset for help on using the changeset viewer.