Ignore:
Timestamp:
Dec 29, 2010, 1:56:04 PM (14 years ago)
Author:
george
Message:
  • Fixed: Hiding invisible docked forms as tabs.
  • Added: Ability to bring window to front on execute Form.Show.
Location:
Docking/CoolDocking/Demo
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • Docking/CoolDocking/Demo/Demo.lpi

    r98 r103  
    3838      </Item2>
    3939    </RequiredPackages>
    40     <Units Count="57">
     40    <Units Count="64">
    4141      <Unit0>
    4242        <Filename Value="Demo.lpr"/>
    4343        <IsPartOfProject Value="True"/>
    4444        <UnitName Value="Demo"/>
    45         <EditorIndex Value="5"/>
    46         <WindowIndex Value="0"/>
    47         <TopLine Value="2"/>
    48         <CursorPos X="46" Y="14"/>
    49         <UsageCount Value="184"/>
     45        <EditorIndex Value="2"/>
     46        <WindowIndex Value="0"/>
     47        <TopLine Value="4"/>
     48        <CursorPos X="34" Y="15"/>
     49        <UsageCount Value="195"/>
    5050        <Loaded Value="True"/>
    5151        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    5757        <ResourceBaseClass Value="Form"/>
    5858        <UnitName Value="UMainForm"/>
    59         <EditorIndex Value="9"/>
    60         <WindowIndex Value="0"/>
    61         <TopLine Value="58"/>
    62         <CursorPos X="5" Y="73"/>
    63         <UsageCount Value="184"/>
     59        <EditorIndex Value="14"/>
     60        <WindowIndex Value="0"/>
     61        <TopLine Value="59"/>
     62        <CursorPos X="3" Y="75"/>
     63        <UsageCount Value="195"/>
    6464        <Loaded Value="True"/>
    6565        <LoadedDesigner Value="True"/>
    … …  
    7070        <UnitName Value="Controls"/>
    7171        <WindowIndex Value="0"/>
    72         <TopLine Value="1359"/>
    73         <CursorPos X="14" Y="1399"/>
    74         <UsageCount Value="58"/>
     72        <TopLine Value="1191"/>
     73        <CursorPos X="15" Y="1203"/>
     74        <UsageCount Value="60"/>
    7575      </Unit2>
    7676      <Unit3>
    … …  
    8585      <Unit4>
    8686        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
    87         <WindowIndex Value="0"/>
    88         <TopLine Value="4767"/>
    89         <CursorPos X="59" Y="4774"/>
    90         <UsageCount Value="51"/>
     87        <EditorIndex Value="7"/>
     88        <WindowIndex Value="0"/>
     89        <TopLine Value="3709"/>
     90        <CursorPos X="1" Y="3726"/>
     91        <UsageCount Value="53"/>
     92        <Loaded Value="True"/>
    9193      </Unit4>
    9294      <Unit5>
    9395        <Filename Value="E:\Programy\Lazarus\lcl\include\wincontrol.inc"/>
    94         <WindowIndex Value="0"/>
    95         <TopLine Value="3429"/>
    96         <CursorPos X="1" Y="3442"/>
    97         <UsageCount Value="56"/>
     96        <EditorIndex Value="8"/>
     97        <WindowIndex Value="0"/>
     98        <TopLine Value="6352"/>
     99        <CursorPos X="42" Y="6355"/>
     100        <UsageCount Value="58"/>
     101        <Loaded Value="True"/>
    98102      </Unit5>
    99103      <Unit6>
    … …  
    109113        <TopLine Value="206"/>
    110114        <CursorPos X="8" Y="219"/>
    111         <UsageCount Value="0"/>
     115        <UsageCount Value="10"/>
    112116      </Unit7>
    113117      <Unit8>
    114118        <Filename Value="E:\Programy\Lazarus\lcl\lclproc.pas"/>
    115119        <UnitName Value="LCLProc"/>
    116         <WindowIndex Value="0"/>
    117         <TopLine Value="2412"/>
    118         <CursorPos X="38" Y="2417"/>
    119         <UsageCount Value="21"/>
     120        <EditorIndex Value="6"/>
     121        <WindowIndex Value="0"/>
     122        <TopLine Value="1516"/>
     123        <CursorPos X="1" Y="1528"/>
     124        <UsageCount Value="23"/>
     125        <Loaded Value="True"/>
    120126      </Unit8>
    121127      <Unit9>
    … …  
    126132        <ResourceBaseClass Value="Form"/>
    127133        <UnitName Value="UDockForm"/>
    128         <WindowIndex Value="0"/>
    129         <TopLine Value="7"/>
    130         <CursorPos X="33" Y="21"/>
    131         <UsageCount Value="183"/>
     134        <EditorIndex Value="3"/>
     135        <WindowIndex Value="0"/>
     136        <TopLine Value="18"/>
     137        <CursorPos X="1" Y="39"/>
     138        <UsageCount Value="194"/>
     139        <Loaded Value="True"/>
    132140        <DefaultSyntaxHighlighter Value="Delphi"/>
    133141      </Unit9>
    … …  
    138146        <TopLine Value="971"/>
    139147        <CursorPos X="3" Y="984"/>
    140         <UsageCount Value="10"/>
     148        <UsageCount Value="9"/>
    141149      </Unit10>
    142150      <Unit11>
    … …  
    170178        <UnitName Value="ExtCtrls"/>
    171179        <WindowIndex Value="0"/>
    172         <TopLine Value="1215"/>
    173         <CursorPos X="3" Y="1228"/>
    174         <UsageCount Value="53"/>
     180        <TopLine Value="1245"/>
     181        <CursorPos X="14" Y="1258"/>
     182        <UsageCount Value="55"/>
    175183      </Unit14>
    176184      <Unit15>
    … …  
    191199      <Unit17>
    192200        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
    193         <WindowIndex Value="0"/>
    194         <TopLine Value="2573"/>
    195         <CursorPos X="36" Y="2586"/>
    196         <UsageCount Value="6"/>
     201        <EditorIndex Value="10"/>
     202        <WindowIndex Value="0"/>
     203        <TopLine Value="85"/>
     204        <CursorPos X="24" Y="94"/>
     205        <UsageCount Value="11"/>
     206        <Loaded Value="True"/>
    197207      </Unit17>
    198208      <Unit18>
    … …  
    232242        <UnitName Value="Menus"/>
    233243        <WindowIndex Value="0"/>
    234         <TopLine Value="280"/>
    235         <CursorPos X="33" Y="293"/>
    236         <UsageCount Value="10"/>
     244        <TopLine Value="391"/>
     245        <CursorPos X="17" Y="404"/>
     246        <UsageCount Value="11"/>
    237247      </Unit22>
    238248      <Unit23>
    … …  
    240250        <UnitName Value="UCoolDocking"/>
    241251        <IsVisibleTab Value="True"/>
    242         <EditorIndex Value="0"/>
    243         <WindowIndex Value="0"/>
    244         <TopLine Value="221"/>
    245         <CursorPos X="24" Y="239"/>
    246         <UsageCount Value="82"/>
     252        <EditorIndex Value="5"/>
     253        <WindowIndex Value="0"/>
     254        <TopLine Value="438"/>
     255        <CursorPos X="1" Y="450"/>
     256        <UsageCount Value="87"/>
    247257        <Loaded Value="True"/>
    248258        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    250260      <Unit24>
    251261        <Filename Value="..\ReadMe.txt"/>
     262        <EditorIndex Value="4"/>
    252263        <WindowIndex Value="0"/>
    253264        <TopLine Value="1"/>
    254265        <CursorPos X="18" Y="11"/>
    255266        <UsageCount Value="19"/>
     267        <Loaded Value="True"/>
    256268        <DefaultSyntaxHighlighter Value="None"/>
    257269      </Unit24>
    … …  
    274286        <WindowIndex Value="0"/>
    275287        <TopLine Value="50"/>
    276         <CursorPos X="18" Y="61"/>
    277         <UsageCount Value="19"/>
     288        <CursorPos X="14" Y="59"/>
     289        <UsageCount Value="20"/>
    278290      </Unit27>
    279291      <Unit28>
    … …  
    303315        <UnitName Value="UCoolDockWindowList"/>
    304316        <WindowIndex Value="0"/>
    305         <TopLine Value="59"/>
    306         <CursorPos X="44" Y="61"/>
    307         <UsageCount Value="1"/>
     317        <TopLine Value="73"/>
     318        <CursorPos X="42" Y="90"/>
     319        <UsageCount Value="11"/>
    308320        <DefaultSyntaxHighlighter Value="Delphi"/>
    309321      </Unit30>
    … …  
    317329        <TopLine Value="1"/>
    318330        <CursorPos X="53" Y="2"/>
    319         <UsageCount Value="126"/>
     331        <UsageCount Value="137"/>
    320332        <DefaultSyntaxHighlighter Value="Delphi"/>
    321333      </Unit31>
    … …  
    340352        <TopLine Value="3034"/>
    341353        <CursorPos X="1" Y="3047"/>
    342         <UsageCount Value="0"/>
     354        <UsageCount Value="10"/>
    343355      </Unit34>
    344356      <Unit35>
    … …  
    412424        <UnitName Value="UComponentTree"/>
    413425        <WindowIndex Value="0"/>
    414         <TopLine Value="37"/>
    415         <CursorPos X="18" Y="39"/>
    416         <UsageCount Value="78"/>
     426        <TopLine Value="35"/>
     427        <CursorPos X="44" Y="45"/>
     428        <UsageCount Value="89"/>
    417429        <DefaultSyntaxHighlighter Value="Delphi"/>
    418430      </Unit44>
    … …  
    426438      <Unit46>
    427439        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\classesh.inc"/>
    428         <WindowIndex Value="0"/>
    429         <TopLine Value="107"/>
    430         <CursorPos X="3" Y="120"/>
    431         <UsageCount Value="10"/>
     440        <EditorIndex Value="11"/>
     441        <WindowIndex Value="0"/>
     442        <TopLine Value="1638"/>
     443        <CursorPos X="15" Y="1650"/>
     444        <UsageCount Value="14"/>
     445        <Loaded Value="True"/>
    432446      </Unit46>
    433447      <Unit47>
    … …  
    442456        <Filename Value="..\UCoolDockStyleTabs.pas"/>
    443457        <UnitName Value="UCoolDockStyleTabs"/>
    444         <WindowIndex Value="0"/>
    445         <TopLine Value="127"/>
    446         <CursorPos X="42" Y="140"/>
    447         <UsageCount Value="38"/>
     458        <EditorIndex Value="0"/>
     459        <WindowIndex Value="0"/>
     460        <TopLine Value="171"/>
     461        <CursorPos X="3" Y="173"/>
     462        <UsageCount Value="43"/>
     463        <Loaded Value="True"/>
    448464        <DefaultSyntaxHighlighter Value="Delphi"/>
    449465      </Unit48>
    … …  
    451467        <Filename Value="..\UCoolDockStylePopupTabs.pas"/>
    452468        <UnitName Value="UCoolDockStylePopupTabs"/>
    453         <EditorIndex Value="2"/>
    454         <WindowIndex Value="0"/>
    455         <TopLine Value="182"/>
    456         <CursorPos X="32" Y="195"/>
    457         <UsageCount Value="10"/>
    458         <Loaded Value="True"/>
     469        <WindowIndex Value="0"/>
     470        <TopLine Value="39"/>
     471        <CursorPos X="1" Y="55"/>
     472        <UsageCount Value="13"/>
    459473        <DefaultSyntaxHighlighter Value="Delphi"/>
    460474      </Unit49>
    … …  
    462476        <Filename Value="..\UCoolDockStyle.pas"/>
    463477        <UnitName Value="UCoolDockStyle"/>
    464         <EditorIndex Value="8"/>
    465         <WindowIndex Value="0"/>
    466         <TopLine Value="1"/>
    467         <CursorPos X="3" Y="14"/>
    468         <UsageCount Value="38"/>
    469         <Loaded Value="True"/>
     478        <WindowIndex Value="0"/>
     479        <TopLine Value="12"/>
     480        <CursorPos X="29" Y="24"/>
     481        <UsageCount Value="43"/>
    470482        <DefaultSyntaxHighlighter Value="Delphi"/>
    471483      </Unit50>
    … …  
    473485        <Filename Value="..\UCoolDockStyleRegions.pas"/>
    474486        <UnitName Value="UCoolDockStyleRegions"/>
    475         <EditorIndex Value="7"/>
    476         <WindowIndex Value="0"/>
    477         <TopLine Value="31"/>
    478         <CursorPos X="25" Y="37"/>
    479         <UsageCount Value="38"/>
    480         <Loaded Value="True"/>
     487        <WindowIndex Value="0"/>
     488        <TopLine Value="64"/>
     489        <CursorPos X="1" Y="85"/>
     490        <UsageCount Value="41"/>
    481491        <DefaultSyntaxHighlighter Value="Delphi"/>
    482492      </Unit51>
    … …  
    484494        <Filename Value="..\UCoolDockStylePopupRegions.pas"/>
    485495        <UnitName Value="UCoolDockStylePopupRegions"/>
    486         <EditorIndex Value="6"/>
    487496        <WindowIndex Value="0"/>
    488497        <TopLine Value="1"/>
    489498        <CursorPos X="44" Y="11"/>
    490         <UsageCount Value="10"/>
    491         <Loaded Value="True"/>
     499        <UsageCount Value="13"/>
    492500        <DefaultSyntaxHighlighter Value="Delphi"/>
    493501      </Unit52>
    … …  
    495503        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\inc\objpash.inc"/>
    496504        <WindowIndex Value="0"/>
    497         <TopLine Value="172"/>
    498         <CursorPos X="23" Y="185"/>
    499         <UsageCount Value="4"/>
     505        <TopLine Value="164"/>
     506        <CursorPos X="8" Y="176"/>
     507        <UsageCount Value="11"/>
    500508      </Unit53>
    501509      <Unit54>
    502510        <Filename Value="..\UCoolDockClientPanel.pas"/>
    503511        <UnitName Value="UCoolDockClientPanel"/>
    504         <EditorIndex Value="3"/>
    505         <WindowIndex Value="0"/>
    506         <TopLine Value="37"/>
    507         <CursorPos X="21" Y="51"/>
    508         <UsageCount Value="37"/>
     512        <EditorIndex Value="1"/>
     513        <WindowIndex Value="0"/>
     514        <TopLine Value="78"/>
     515        <CursorPos X="1" Y="90"/>
     516        <UsageCount Value="42"/>
    509517        <Loaded Value="True"/>
    510518        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    513521        <Filename Value="..\UCoolDockPopupMenu.pas"/>
    514522        <UnitName Value="UCoolDockPopupMenu"/>
    515         <EditorIndex Value="4"/>
    516         <WindowIndex Value="0"/>
    517         <TopLine Value="49"/>
    518         <CursorPos X="24" Y="62"/>
    519         <UsageCount Value="11"/>
     523        <EditorIndex Value="13"/>
     524        <WindowIndex Value="0"/>
     525        <TopLine Value="5"/>
     526        <CursorPos X="17" Y="17"/>
     527        <UsageCount Value="15"/>
    520528        <Loaded Value="True"/>
    521529        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    523531      <Unit56>
    524532        <Filename Value="E:\Programy\Lazarus\lcl\include\menuitem.inc"/>
    525         <EditorIndex Value="1"/>
    526533        <WindowIndex Value="0"/>
    527534        <TopLine Value="392"/>
    528535        <CursorPos X="1" Y="405"/>
     536        <UsageCount Value="11"/>
     537      </Unit56>
     538      <Unit57>
     539        <Filename Value="E:\Programy\Lazarus\lcl\include\menu.inc"/>
     540        <WindowIndex Value="0"/>
     541        <TopLine Value="115"/>
     542        <CursorPos X="1" Y="128"/>
    529543        <UsageCount Value="10"/>
    530         <Loaded Value="True"/>
    531       </Unit56>
     544      </Unit57>
     545      <Unit58>
     546        <Filename Value="E:\Programy\Lazarus\lcl\lclclasses.pp"/>
     547        <UnitName Value="LCLClasses"/>
     548        <EditorIndex Value="9"/>
     549        <WindowIndex Value="0"/>
     550        <TopLine Value="92"/>
     551        <CursorPos X="1" Y="112"/>
     552        <UsageCount Value="11"/>
     553        <Loaded Value="True"/>
     554      </Unit58>
     555      <Unit59>
     556        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\packages\fcl-base\src\contnrs.pp"/>
     557        <UnitName Value="contnrs"/>
     558        <WindowIndex Value="0"/>
     559        <TopLine Value="66"/>
     560        <CursorPos X="3" Y="72"/>
     561        <UsageCount Value="11"/>
     562      </Unit59>
     563      <Unit60>
     564        <Filename Value="E:\Programy\Lazarus\lcl\include\scrollingwincontrol.inc"/>
     565        <WindowIndex Value="0"/>
     566        <TopLine Value="239"/>
     567        <CursorPos X="1" Y="261"/>
     568        <UsageCount Value="11"/>
     569      </Unit60>
     570      <Unit61>
     571        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\sysutils\systhrdh.inc"/>
     572        <WindowIndex Value="0"/>
     573        <TopLine Value="4"/>
     574        <CursorPos X="4" Y="16"/>
     575        <UsageCount Value="11"/>
     576      </Unit61>
     577      <Unit62>
     578        <Filename Value="E:\Programy\Lazarus\lcl\include\application.inc"/>
     579        <WindowIndex Value="0"/>
     580        <TopLine Value="1038"/>
     581        <CursorPos X="1" Y="1050"/>
     582        <UsageCount Value="11"/>
     583      </Unit62>
     584      <Unit63>
     585        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\compon.inc"/>
     586        <EditorIndex Value="12"/>
     587        <WindowIndex Value="0"/>
     588        <TopLine Value="514"/>
     589        <CursorPos X="13" Y="520"/>
     590        <UsageCount Value="10"/>
     591        <Loaded Value="True"/>
     592      </Unit63>
    532593    </Units>
    533594    <JumpHistory Count="30" HistoryIndex="29">
    534595      <Position1>
    535         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    536         <Caret Line="259" Column="29" TopLine="232"/>
     596        <Filename Value="..\UCoolDockClientPanel.pas"/>
     597        <Caret Line="110" Column="1" TopLine="98"/>
    537598      </Position1>
    538599      <Position2>
    539         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    540         <Caret Line="260" Column="45" TopLine="245"/>
     600        <Filename Value="E:\Programy\Lazarus\lcl\lclproc.pas"/>
     601        <Caret Line="1528" Column="1" TopLine="1516"/>
    541602      </Position2>
    542603      <Position3>
    543         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    544         <Caret Line="259" Column="20" TopLine="247"/>
     604        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
     605        <Caret Line="1411" Column="1" TopLine="1399"/>
    545606      </Position3>
    546607      <Position4>
    547         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    548         <Caret Line="14" Column="3" TopLine="1"/>
     608        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
     609        <Caret Line="1392" Column="1" TopLine="1380"/>
    549610      </Position4>
    550611      <Position5>
    551         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    552         <Caret Line="57" Column="3" TopLine="51"/>
     612        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     613        <Caret Line="1262" Column="1" TopLine="1250"/>
    553614      </Position5>
    554615      <Position6>
    555         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    556         <Caret Line="63" Column="39" TopLine="50"/>
     616        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     617        <Caret Line="1263" Column="1" TopLine="1250"/>
    557618      </Position6>
    558619      <Position7>
    559         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    560         <Caret Line="15" Column="9" TopLine="3"/>
     620        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     621        <Caret Line="1264" Column="1" TopLine="1250"/>
    561622      </Position7>
    562623      <Position8>
    563         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    564         <Caret Line="3" Column="14" TopLine="1"/>
     624        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
     625        <Caret Line="3721" Column="1" TopLine="3709"/>
    565626      </Position8>
    566627      <Position9>
    567         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    568         <Caret Line="116" Column="39" TopLine="95"/>
     628        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
     629        <Caret Line="3724" Column="1" TopLine="3709"/>
    569630      </Position9>
    570631      <Position10>
    571         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    572         <Caret Line="59" Column="23" TopLine="53"/>
     632        <Filename Value="E:\Programy\Lazarus\lcl\include\control.inc"/>
     633        <Caret Line="3726" Column="1" TopLine="3709"/>
    573634      </Position10>
    574635      <Position11>
    575         <Filename Value="..\UCoolDocking.pas"/>
    576         <Caret Line="500" Column="1" TopLine="484"/>
     636        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     637        <Caret Line="405" Column="1" TopLine="393"/>
    577638      </Position11>
    578639      <Position12>
    579         <Filename Value="..\UCoolDockStylePopupTabs.pas"/>
    580         <Caret Line="190" Column="41" TopLine="185"/>
     640        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     641        <Caret Line="408" Column="1" TopLine="393"/>
    581642      </Position12>
    582643      <Position13>
    583         <Filename Value="..\UCoolDockStylePopupTabs.pas"/>
    584         <Caret Line="195" Column="32" TopLine="182"/>
     644        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     645        <Caret Line="2102" Column="1" TopLine="2090"/>
    585646      </Position13>
    586647      <Position14>
    587         <Filename Value="..\UCoolDocking.pas"/>
    588         <Caret Line="58" Column="35" TopLine="45"/>
     648        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     649        <Caret Line="101" Column="1" TopLine="89"/>
    589650      </Position14>
    590651      <Position15>
    591         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    592         <Caret Line="34" Column="16" TopLine="18"/>
     652        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     653        <Caret Line="912" Column="1" TopLine="900"/>
    593654      </Position15>
    594655      <Position16>
    595         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    596         <Caret Line="8" Column="46" TopLine="2"/>
     656        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     657        <Caret Line="913" Column="1" TopLine="900"/>
    597658      </Position16>
    598659      <Position17>
    599         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    600         <Caret Line="285" Column="36" TopLine="272"/>
     660        <Filename Value="UDockForm.pas"/>
     661        <Caret Line="37" Column="1" TopLine="18"/>
    601662      </Position17>
    602663      <Position18>
    603         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    604         <Caret Line="21" Column="15" TopLine="8"/>
     664        <Filename Value="UDockForm.pas"/>
     665        <Caret Line="38" Column="1" TopLine="18"/>
    605666      </Position18>
    606667      <Position19>
    607         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    608         <Caret Line="34" Column="28" TopLine="25"/>
     668        <Filename Value="UDockForm.pas"/>
     669        <Caret Line="39" Column="1" TopLine="18"/>
    609670      </Position19>
    610671      <Position20>
    611         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    612         <Caret Line="285" Column="13" TopLine="272"/>
     672        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     673        <Caret Line="918" Column="1" TopLine="900"/>
    613674      </Position20>
    614675      <Position21>
    615         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    616         <Caret Line="287" Column="31" TopLine="274"/>
     676        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     677        <Caret Line="103" Column="1" TopLine="91"/>
    617678      </Position21>
    618679      <Position22>
    619         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    620         <Caret Line="326" Column="40" TopLine="311"/>
     680        <Filename Value="E:\Programy\Lazarus\lcl\include\customform.inc"/>
     681        <Caret Line="94" Column="24" TopLine="85"/>
    621682      </Position22>
    622683      <Position23>
    623         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    624         <Caret Line="325" Column="36" TopLine="311"/>
     684        <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\compon.inc"/>
     685        <Caret Line="496" Column="14" TopLine="493"/>
    625686      </Position23>
    626687      <Position24>
    627         <Filename Value="..\UCoolDocking.pas"/>
    628         <Caret Line="241" Column="47" TopLine="221"/>
     688        <Filename Value="..\UCoolDockClientPanel.pas"/>
     689        <Caret Line="109" Column="67" TopLine="87"/>
    629690      </Position24>
    630691      <Position25>
    631         <Filename Value="E:\Programy\Lazarus\lcl\include\menuitem.inc"/>
    632         <Caret Line="405" Column="1" TopLine="392"/>
     692        <Filename Value="..\UCoolDocking.pas"/>
     693        <Caret Line="219" Column="1" TopLine="207"/>
    633694      </Position25>
    634695      <Position26>
    635         <Filename Value="..\UCoolDocking.pas"/>
    636         <Caret Line="232" Column="1" TopLine="221"/>
     696        <Filename Value="..\UCoolDockClientPanel.pas"/>
     697        <Caret Line="109" Column="1" TopLine="92"/>
    637698      </Position26>
    638699      <Position27>
    639         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    640         <Caret Line="66" Column="1" TopLine="53"/>
     700        <Filename Value="..\UCoolDockClientPanel.pas"/>
     701        <Caret Line="111" Column="1" TopLine="92"/>
    641702      </Position27>
    642703      <Position28>
    643         <Filename Value="..\UCoolDockPopupMenu.pas"/>
    644         <Caret Line="62" Column="13" TopLine="53"/>
     704        <Filename Value="..\UCoolDockClientPanel.pas"/>
     705        <Caret Line="186" Column="1" TopLine="174"/>
    645706      </Position28>
    646707      <Position29>
    647         <Filename Value="Demo.lpr"/>
    648         <Caret Line="20" Column="1" TopLine="1"/>
     708        <Filename Value="..\UCoolDockClientPanel.pas"/>
     709        <Caret Line="191" Column="1" TopLine="174"/>
    649710      </Position29>
    650711      <Position30>
    651         <Filename Value="Demo.lpr"/>
    652         <Caret Line="11" Column="11" TopLine="1"/>
     712        <Filename Value="UMainForm.pas"/>
     713        <Caret Line="75" Column="3" TopLine="59"/>
    653714      </Position30>
    654715    </JumpHistory>
    … …  
    668729      <SyntaxOptions>
    669730        <SyntaxMode Value="Delphi"/>
     731        <CStyleOperator Value="False"/>
     732        <AllowLabel Value="False"/>
     733        <CPPInline Value="False"/>
    670734      </SyntaxOptions>
    671735    </Parsing>

  • Docking/CoolDocking/Demo/UDockForm.lfm

    r59 r103  
    77  ClientHeight = 240
    88  ClientWidth = 320
     9  OnDestroy = FormDestroy
    910  LCLVersion = '0.9.29'
    1011  object Memo1: TMemo
    … …  
    1718  end
    1819  object CoolDockClient1: TCoolDockClient
    19     Dockable = True
     20    Floatable = False
    2021    Master = MainForm.CoolDockMaster1
    2122    left = 40

  • Docking/CoolDocking/Demo/UDockForm.pas

    r58 r103  
    1616    CoolDockClient1: TCoolDockClient;
    1717    Memo1: TMemo;
     18    procedure FormDestroy(Sender: TObject);
    1819  private
    1920    { private declarations }
    … …  
    2930{$R *.lfm}
    3031
     32{ TDockForm }
     33
     34procedure TDockForm.FormDestroy(Sender: TObject);
     35var
     36  Temp: string;
     37begin
     38  Temp := Name;
     39end;
     40
    3141end.
    3242

  • Docking/CoolDocking/Demo/UMainForm.lfm

    r97 r103  
    4444    DefaultTabsPos = hpAuto
    4545    DefaultHeaderPos = hpAuto
     46    DefaultMoveSpeed = 0
    4647    Customize = CoolDockCustomize1
    4748    ShowIcons = False

  • Docking/CoolDocking/Demo/UMainForm.pas

    r97 r103  
    7171  //TCoolDockManager(ConjoinedDockForm1.Panel.DockManager).TabsPos := hpLeft;
    7272  ConjoinedDockForm1.ManualDock(Panel1);
    73   //TCoolDockManager(ConjoinedDockForm1.Panel.DockManager).DockStyle := dsTabs;
     73  TCoolDockManager(ConjoinedDockForm1.Panel.DockManager).DockStyle := dsTabs;
    7474  NewDockForm.ManualDock(ConjoinedDockForm1.Panel);
    7575  NewDockForm.ManualDock(ConjoinedDockForm1.Panel);
    76   NewDockForm.ManualDock(TForm(DockForms[0]));
    77   NewDockForm.ManualDock(TForm(DockForms[0]));
    78   NewDockForm.ManualDock(TForm(DockForms[0]));
    79 //  TCustomDockManager(TDockForm(DockForms[0]).DockManager).DockStyle := dsTabs;
     76  //NewDockForm.ManualDock(TForm(DockForms[0]));
     77  //NewDockForm.ManualDock(TForm(DockForms[0]));
     78  //NewDockForm.ManualDock(TForm(DockForms[0]));
     79  //TCustomDockManager(TDockForm(DockForms[0]).DockManager).DockStyle := dsTabs;
    8080end;
    8181
    … …  
    9494  Result := TDockForm.Create(Self);
    9595  Result.Name := 'Form' + IntToStr(FormIndex);
     96  Result.Caption := Result.Name;
    9697  Result.Memo1.Text := Result.Name;
    9798  //Result.DragKind := dkDock;
Note: See TracChangeset for help on using the changeset viewer.