pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxFPC:fix work miltiline RxDBGrid title after 54840

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5846 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2017-05-10 08:30:45 +00:00
parent 49a8f3acb3
commit e3a593ac00
3 changed files with 224 additions and 211 deletions
Download Patch File Download Diff File Expand all files Collapse all files

239
components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi
View File

@ -55,13 +55,13 @@
<MinVersion Major="1" Release="18" Build="56" Valid="True"/> <MinVersion Major="1" Release="18" Build="56" Valid="True"/>
</Item5> </Item5>
</RequiredPackages> </RequiredPackages>
<Units Count="56"> <Units Count="57">
<Unit0> <Unit0>
<Filename Value="RxDBGridDemo.lpr"/> <Filename Value="RxDBGridDemo.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<CursorPos X="47" Y="18"/> <CursorPos Y="17"/>
<UsageCount Value="120"/> <UsageCount Value="125"/>
</Unit0> </Unit0>
<Unit1> <Unit1>
<Filename Value="rxdbgridmainunit.pas"/> <Filename Value="rxdbgridmainunit.pas"/>
@ -71,8 +71,8 @@
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<UnitName Value="RxDBGridMainUnit"/> <UnitName Value="RxDBGridMainUnit"/>
<TopLine Value="78"/> <TopLine Value="78"/>
<CursorPos X="138" Y="89"/> <CursorPos X="141" Y="84"/>
<UsageCount Value="120"/> <UsageCount Value="125"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
</Unit1> </Unit1>
@ -81,7 +81,7 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="2470"/> <TopLine Value="2470"/>
<CursorPos X="72" Y="2503"/> <CursorPos X="72" Y="2503"/>
<UsageCount Value="11"/> <UsageCount Value="10"/>
</Unit2> </Unit2>
<Unit3> <Unit3>
<Filename Value="../../rxdbgridexportspreadsheet.pas"/> <Filename Value="../../rxdbgridexportspreadsheet.pas"/>
@ -89,14 +89,14 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="74"/> <TopLine Value="74"/>
<CursorPos X="41" Y="91"/> <CursorPos X="41" Y="91"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit3> </Unit3>
<Unit4> <Unit4>
<Filename Value="../../rxdconst.pas"/> <Filename Value="../../rxdconst.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="100"/> <TopLine Value="100"/>
<CursorPos X="55" Y="121"/> <CursorPos X="55" Y="121"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit4> </Unit4>
<Unit5> <Unit5>
<Filename Value="../../rxautopanel.pas"/> <Filename Value="../../rxautopanel.pas"/>
@ -104,48 +104,48 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="32"/> <TopLine Value="32"/>
<CursorPos X="74" Y="56"/> <CursorPos X="74" Y="56"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit5> </Unit5>
<Unit6> <Unit6>
<Filename Value="../../registerrx.pas"/> <Filename Value="../../registerrx.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="156"/> <TopLine Value="156"/>
<CursorPos X="47" Y="184"/> <CursorPos X="47" Y="184"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit6> </Unit6>
<Unit7> <Unit7>
<Filename Value="../../rxpickdate.pas"/> <Filename Value="../../rxpickdate.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="246"/> <TopLine Value="246"/>
<CursorPos Y="257"/> <CursorPos Y="257"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit7> </Unit7>
<Unit8> <Unit8>
<Filename Value="../../rxtooledit.pas"/> <Filename Value="../../rxtooledit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<CursorPos X="3"/> <CursorPos X="3"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit8> </Unit8>
<Unit9> <Unit9>
<Filename Value="../../rxdateutil.pas"/> <Filename Value="../../rxdateutil.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="16"/> <TopLine Value="16"/>
<CursorPos X="16" Y="32"/> <CursorPos X="16" Y="32"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit9> </Unit9>
<Unit10> <Unit10>
<Filename Value="../../rxdbdateedit.pas"/> <Filename Value="../../rxdbdateedit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="97"/> <TopLine Value="97"/>
<CursorPos X="18" Y="32"/> <CursorPos X="18" Y="32"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit10> </Unit10>
<Unit11> <Unit11>
<Filename Value="../../rxdbutils.pas"/> <Filename Value="../../rxdbutils.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="145"/> <TopLine Value="145"/>
<CursorPos X="53" Y="168"/> <CursorPos X="53" Y="168"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit11> </Unit11>
<Unit12> <Unit12>
<Filename Value="../../rxdaterangeeditunit.pas"/> <Filename Value="../../rxdaterangeeditunit.pas"/>
@ -153,33 +153,33 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="133"/> <TopLine Value="133"/>
<CursorPos X="8" Y="150"/> <CursorPos X="8" Y="150"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit12> </Unit12>
<Unit13> <Unit13>
<Filename Value="../../rxboxprocs.pas"/> <Filename Value="../../rxboxprocs.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit13> </Unit13>
<Unit14> <Unit14>
<Filename Value="../../rxfduallst.pas"/> <Filename Value="../../rxfduallst.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="22"/> <TopLine Value="22"/>
<CursorPos X="16" Y="32"/> <CursorPos X="16" Y="32"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit14> </Unit14>
<Unit15> <Unit15>
<Filename Value="../../rxduallist.pas"/> <Filename Value="../../rxduallist.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="72"/> <TopLine Value="72"/>
<CursorPos X="35" Y="91"/> <CursorPos X="35" Y="91"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit15> </Unit15>
<Unit16> <Unit16>
<Filename Value="../../rxtbrsetup.pas"/> <Filename Value="../../rxtbrsetup.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="74"/> <TopLine Value="74"/>
<CursorPos X="38" Y="93"/> <CursorPos X="38" Y="93"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit16> </Unit16>
<Unit17> <Unit17>
<Filename Value="../../rxceeditlookupfields.pas"/> <Filename Value="../../rxceeditlookupfields.pas"/>
@ -187,21 +187,21 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="40"/> <TopLine Value="40"/>
<CursorPos X="9" Y="64"/> <CursorPos X="9" Y="64"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit17> </Unit17>
<Unit18> <Unit18>
<Filename Value="../../register_rxctrl.pas"/> <Filename Value="../../register_rxctrl.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="269"/> <TopLine Value="269"/>
<CursorPos X="24" Y="301"/> <CursorPos X="24" Y="301"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit18> </Unit18>
<Unit19> <Unit19>
<Filename Value="../../LazReport/rxlazreport.pas"/> <Filename Value="../../LazReport/rxlazreport.pas"/>
<UnitName Value="RxLazReport"/> <UnitName Value="RxLazReport"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<CursorPos X="90" Y="7"/> <CursorPos X="90" Y="7"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit19> </Unit19>
<Unit20> <Unit20>
<Filename Value="../../LazReport/lrrxcontrols.pas"/> <Filename Value="../../LazReport/lrrxcontrols.pas"/>
@ -209,54 +209,54 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="122"/> <TopLine Value="122"/>
<CursorPos X="74" Y="139"/> <CursorPos X="74" Y="139"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit20> </Unit20>
<Unit21> <Unit21>
<Filename Value="../../rxvclutils.pas"/> <Filename Value="../../rxvclutils.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit21> </Unit21>
<Unit22> <Unit22>
<Filename Value="../../rxctrls.pas"/> <Filename Value="../../rxctrls.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="819"/> <TopLine Value="819"/>
<CursorPos X="27" Y="824"/> <CursorPos X="27" Y="824"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit22> </Unit22>
<Unit23> <Unit23>
<Filename Value="../../rxtoolbar.pas"/> <Filename Value="../../rxtoolbar.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="272"/> <TopLine Value="272"/>
<CursorPos X="35" Y="281"/> <CursorPos X="35" Y="281"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit23> </Unit23>
<Unit24> <Unit24>
<Filename Value="../../rxswitch.pas"/> <Filename Value="../../rxswitch.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="136"/> <TopLine Value="136"/>
<CursorPos X="16" Y="157"/> <CursorPos X="16" Y="157"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit24> </Unit24>
<Unit25> <Unit25>
<Filename Value="../../rxdice.pas"/> <Filename Value="../../rxdice.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="16"/> <TopLine Value="16"/>
<CursorPos X="49" Y="38"/> <CursorPos X="49" Y="38"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit25> </Unit25>
<Unit26> <Unit26>
<Filename Value="../../rxclock.pas"/> <Filename Value="../../rxclock.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="166"/> <TopLine Value="166"/>
<CursorPos X="16" Y="181"/> <CursorPos X="16" Y="181"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit26> </Unit26>
<Unit27> <Unit27>
<Filename Value="../../rxspin.pas"/> <Filename Value="../../rxspin.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="242"/> <TopLine Value="242"/>
<CursorPos X="13" Y="245"/> <CursorPos X="13" Y="245"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit27> </Unit27>
<Unit28> <Unit28>
<Filename Value="../../rxmdi.pas"/> <Filename Value="../../rxmdi.pas"/>
@ -264,21 +264,21 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="134"/> <TopLine Value="134"/>
<CursorPos Y="160"/> <CursorPos Y="160"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit28> </Unit28>
<Unit29> <Unit29>
<Filename Value="../../rxpopupunit.pas"/> <Filename Value="../../rxpopupunit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="233"/> <TopLine Value="233"/>
<CursorPos X="6" Y="250"/> <CursorPos X="6" Y="250"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit29> </Unit29>
<Unit30> <Unit30>
<Filename Value="../../rxlookup.pas"/> <Filename Value="../../rxlookup.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="13"/> <TopLine Value="13"/>
<CursorPos X="23" Y="41"/> <CursorPos X="23" Y="41"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit30> </Unit30>
<Unit31> <Unit31>
<Filename Value="../../rxdbctrls.pas"/> <Filename Value="../../rxdbctrls.pas"/>
@ -286,7 +286,7 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="187"/> <TopLine Value="187"/>
<CursorPos X="29" Y="215"/> <CursorPos X="29" Y="215"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit31> </Unit31>
<Unit32> <Unit32>
<Filename Value="../../rxdbgridexportpdf.pas"/> <Filename Value="../../rxdbgridexportpdf.pas"/>
@ -294,14 +294,14 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="23"/> <TopLine Value="23"/>
<CursorPos X="38" Y="40"/> <CursorPos X="38" Y="40"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit32> </Unit32>
<Unit33> <Unit33>
<Filename Value="../../rxlogin.pas"/> <Filename Value="../../rxlogin.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="196"/> <TopLine Value="196"/>
<CursorPos X="47" Y="209"/> <CursorPos X="47" Y="209"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit33> </Unit33>
<Unit34> <Unit34>
<Filename Value="../../rxdbgridprintgrid.pas"/> <Filename Value="../../rxdbgridprintgrid.pas"/>
@ -309,14 +309,14 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="22"/> <TopLine Value="22"/>
<CursorPos X="24" Y="39"/> <CursorPos X="24" Y="39"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit34> </Unit34>
<Unit35> <Unit35>
<Filename Value="../../rxseldsfrm.pas"/> <Filename Value="../../rxseldsfrm.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="61"/> <TopLine Value="61"/>
<CursorPos X="16" Y="32"/> <CursorPos X="16" Y="32"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit35> </Unit35>
<Unit36> <Unit36>
<Filename Value="../../registerrxdb.pas"/> <Filename Value="../../registerrxdb.pas"/>
@ -324,42 +324,42 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="149"/> <TopLine Value="149"/>
<CursorPos X="19" Y="165"/> <CursorPos X="19" Y="165"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit36> </Unit36>
<Unit37> <Unit37>
<Filename Value="../../rxcurredit.pas"/> <Filename Value="../../rxcurredit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="113"/> <TopLine Value="113"/>
<CursorPos X="3" Y="130"/> <CursorPos X="3" Y="130"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit37> </Unit37>
<Unit38> <Unit38>
<Filename Value="../../rxdbcurredit.pas"/> <Filename Value="../../rxdbcurredit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="25"/> <TopLine Value="25"/>
<CursorPos X="18" Y="34"/> <CursorPos X="18" Y="34"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit38> </Unit38>
<Unit39> <Unit39>
<Filename Value="../../rxfolderlister.pas"/> <Filename Value="../../rxfolderlister.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="13"/> <TopLine Value="13"/>
<CursorPos X="20" Y="32"/> <CursorPos X="20" Y="32"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit39> </Unit39>
<Unit40> <Unit40>
<Filename Value="../../rxpagemngr.pas"/> <Filename Value="../../rxpagemngr.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="26"/> <TopLine Value="26"/>
<CursorPos X="74" Y="49"/> <CursorPos X="74" Y="49"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit40> </Unit40>
<Unit41> <Unit41>
<Filename Value="../../rxdbgrid_findunit.pas"/> <Filename Value="../../rxdbgrid_findunit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="55"/> <TopLine Value="55"/>
<CursorPos X="8" Y="72"/> <CursorPos X="8" Y="72"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit41> </Unit41>
<Unit42> <Unit42>
<Filename Value="../../rxdbspinedit.pas"/> <Filename Value="../../rxdbspinedit.pas"/>
@ -367,7 +367,7 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="115"/> <TopLine Value="115"/>
<CursorPos X="8" Y="132"/> <CursorPos X="8" Y="132"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit42> </Unit42>
<Unit43> <Unit43>
<Filename Value="../../rxdbtimeedit.pas"/> <Filename Value="../../rxdbtimeedit.pas"/>
@ -375,50 +375,51 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="125"/> <TopLine Value="125"/>
<CursorPos X="8" Y="142"/> <CursorPos X="8" Y="142"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit43> </Unit43>
<Unit44> <Unit44>
<Filename Value="../../rxmemds.pas"/> <Filename Value="../../rxmemds.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="247"/> <TopLine Value="247"/>
<CursorPos X="36" Y="264"/> <CursorPos X="36" Y="264"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit44> </Unit44>
<Unit45> <Unit45>
<Filename Value="../../rxdbcomb.pas"/> <Filename Value="../../rxdbcomb.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="156"/> <TopLine Value="156"/>
<CursorPos X="8" Y="173"/> <CursorPos X="8" Y="173"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit45> </Unit45>
<Unit46> <Unit46>
<Filename Value="../../rxdbgridfootertools_setup.pas"/> <Filename Value="../../rxdbgridfootertools_setup.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="52"/> <TopLine Value="52"/>
<CursorPos X="8" Y="69"/> <CursorPos X="8" Y="69"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit46> </Unit46>
<Unit47> <Unit47>
<Filename Value="../../rxxpman.pas"/> <Filename Value="../../rxxpman.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="14"/> <TopLine Value="14"/>
<CursorPos X="6" Y="56"/> <CursorPos X="6" Y="56"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit47> </Unit47>
<Unit48> <Unit48>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/> <EditorIndex Value="1"/>
<TopLine Value="2068"/> <TopLine Value="6230"/>
<CursorPos X="47" Y="2097"/> <CursorPos X="8" Y="6265"/>
<UsageCount Value="12"/> <UsageCount Value="15"/>
<Loaded Value="True"/> <Loaded Value="True"/>
</Unit48> </Unit48>
<Unit49> <Unit49>
<Filename Value="../../../../lcl/grids.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<UnitName Value="Grids"/> <UnitName Value="Grids"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="5347"/> <TopLine Value="8729"/>
<CursorPos X="132" Y="5371"/> <CursorPos X="3" Y="8733"/>
<UsageCount Value="11"/> <UsageCount Value="11"/>
</Unit49> </Unit49>
<Unit50> <Unit50>
@ -427,158 +428,169 @@
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="2284"/> <TopLine Value="2284"/>
<CursorPos X="15" Y="2303"/> <CursorPos X="15" Y="2303"/>
<UsageCount Value="11"/> <UsageCount Value="10"/>
</Unit50> </Unit50>
<Unit51> <Unit51>
<Filename Value="../../../../lcl/include/customcontrol.inc"/> <Filename Value="../../../../lcl/include/customcontrol.inc"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="64"/> <TopLine Value="64"/>
<CursorPos X="3" Y="73"/> <CursorPos X="3" Y="73"/>
<UsageCount Value="11"/> <UsageCount Value="10"/>
</Unit51> </Unit51>
<Unit52> <Unit52>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<UnitName Value="DBGrids"/> <UnitName Value="DBGrids"/>
<EditorIndex Value="2"/> <EditorIndex Value="-1"/>
<TopLine Value="9"/> <TopLine Value="409"/>
<CursorPos X="53" Y="37"/> <CursorPos X="15" Y="426"/>
<UsageCount Value="12"/> <UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit52> </Unit52>
<Unit53> <Unit53>
<Filename Value="/home/install/source/fpcsrc/packages/fcl-db/src/base/db.pas"/> <Filename Value="/home/install/source/fpcsrc/packages/fcl-db/src/base/db.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="1805"/> <TopLine Value="1805"/>
<CursorPos X="14" Y="1822"/> <CursorPos X="14" Y="1822"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit53> </Unit53>
<Unit54> <Unit54>
<Filename Value="../../rxdb/rxdbgrid_findunit.pas"/> <Filename Value="../../rxdb/rxdbgrid_findunit.pas"/>
<EditorIndex Value="-1"/> <EditorIndex Value="-1"/>
<TopLine Value="13"/> <TopLine Value="13"/>
<UsageCount Value="10"/> <UsageCount Value="9"/>
</Unit54> </Unit54>
<Unit55> <Unit55>
<Filename Value="../../../../lcl/themes.pas"/> <Filename Value="../../../../lcl/themes.pas"/>
<UnitName Value="Themes"/> <UnitName Value="Themes"/>
<IsVisibleTab Value="True"/> <EditorIndex Value="-1"/>
<EditorIndex Value="3"/>
<TopLine Value="679"/> <TopLine Value="679"/>
<CursorPos X="27" Y="692"/> <CursorPos X="27" Y="692"/>
<UsageCount Value="11"/> <UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit55> </Unit55>
<Unit56>
<Filename Value="../../rx.inc"/>
<EditorIndex Value="2"/>
<TopLine Value="23"/>
<CursorPos Y="60"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
</Unit56>
</Units> </Units>
<JumpHistory Count="28" HistoryIndex="27"> <JumpHistory Count="29" HistoryIndex="28">
<Position1> <Position1>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="4693" Column="49" TopLine="4665"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="974" Column="44" TopLine="946"/> <Caret Line="4717" Column="58" TopLine="4689"/>
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="86" TopLine="500"/> <Caret Line="4747" Column="25" TopLine="4719"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="99" Column="23" TopLine="82"/> <Caret Line="4751" Column="33" TopLine="4723"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="292" Column="22" TopLine="264"/> <Caret Line="4752" Column="40" TopLine="4724"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="491" Column="99" TopLine="464"/> <Caret Line="4936" Column="38" TopLine="4908"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="598" Column="30" TopLine="571"/> <Caret Line="4938" Column="32" TopLine="4910"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="3122" Column="53" TopLine="3104"/> <Caret Line="780" Column="38" TopLine="765"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="491" Column="14" TopLine="269"/> <Caret Line="896" Column="66" TopLine="869"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="99" Column="23" TopLine="82"/> <Caret Line="4936" Column="44" TopLine="4908"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="292" Column="44" TopLine="216"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="780" Column="40" TopLine="753"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="86" TopLine="500"/> <Caret Line="896" Column="66" TopLine="869"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="490" Column="22" TopLine="473"/> <Caret Line="4940" Column="3" TopLine="4908"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="533" Column="99" TopLine="505"/> <Caret Line="32" Column="9" TopLine="22"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="903" Column="30" TopLine="719"/> <Caret Line="108" Column="9" TopLine="98"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="3803" Column="31" TopLine="3775"/> <Caret Line="2526" Column="10" TopLine="2492"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="3806" Column="21" TopLine="3778"/> <Caret Line="5005" Column="10" TopLine="4972"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="3812" Column="52" TopLine="3812"/> <Caret Line="5091" Column="10" TopLine="5056"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="35" TopLine="35"/> <Caret Line="5192" Column="10" TopLine="5160"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="566" Column="31" TopLine="537"/> <Caret Line="5551" Column="14" TopLine="5515"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="1046" Column="31" TopLine="1016"/> <Caret Line="5573" Column="14" TopLine="5540"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="1070" Column="31" TopLine="1037"/> <Caret Line="5599" Column="14" TopLine="5564"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="99" Column="3" TopLine="82"/> <Caret Line="5640" Column="14" TopLine="5607"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="5725" Column="8" TopLine="5688"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="../../../../lcl/dbgrids.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="37" Column="53" TopLine="9"/> <Caret Line="5738" Column="8" TopLine="5701"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="../../../../lcl/themes.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="60" Column="9" TopLine="46"/> <Caret Line="5756" Column="8" TopLine="5720"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="../../../../lcl/themes.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="128" Column="11" TopLine="94"/> <Caret Line="5804" Column="8" TopLine="5771"/>
</Position28> </Position28>
<Position29>
<Filename Value="../../rxdb/rxdbgrid.pas"/>
<Caret Line="5855" Column="8" TopLine="5820"/>
</Position29>
</JumpHistory> </JumpHistory>
</ProjectOptions> </ProjectOptions>
<CompilerOptions> <CompilerOptions>
@ -603,15 +615,4 @@
</Options> </Options>
</Linking> </Linking>
</CompilerOptions> </CompilerOptions>
<Debugging>
<BreakPoints Count="1">
<Item1>
<Kind Value="bpkSource"/>
<WatchScope Value="wpsLocal"/>
<WatchKind Value="wpkWrite"/>
<Source Value="../../rxdb/rxdbgrid.pas"/>
<Line Value="4095"/>
</Item1>
</BreakPoints>
</Debugging>
</CONFIG> </CONFIG>

150
components/rx/trunk/Demos/RxDBGrid_Filter/project1.lps
View File

@ -3,7 +3,7 @@
<ProjectSession> <ProjectSession>
<Version Value="10"/> <Version Value="10"/>
<BuildModes Active="Default"/> <BuildModes Active="Default"/>
<Units Count="18"> <Units Count="20">
<Unit0> <Unit0>
<Filename Value="project1.lpr"/> <Filename Value="project1.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
@ -11,7 +11,7 @@
<WindowIndex Value="-1"/> <WindowIndex Value="-1"/>
<TopLine Value="-1"/> <TopLine Value="-1"/>
<CursorPos X="-1" Y="-1"/> <CursorPos X="-1" Y="-1"/>
<UsageCount Value="32"/> <UsageCount Value="33"/>
</Unit0> </Unit0>
<Unit1> <Unit1>
<Filename Value="unit1.pas"/> <Filename Value="unit1.pas"/>
@ -22,7 +22,7 @@
<UnitName Value="Unit1"/> <UnitName Value="Unit1"/>
<TopLine Value="25"/> <TopLine Value="25"/>
<CursorPos X="16" Y="51"/> <CursorPos X="16" Y="51"/>
<UsageCount Value="32"/> <UsageCount Value="33"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
</Unit1> </Unit1>
@ -36,7 +36,7 @@
<EditorIndex Value="1"/> <EditorIndex Value="1"/>
<TopLine Value="188"/> <TopLine Value="188"/>
<CursorPos X="60" Y="188"/> <CursorPos X="60" Y="188"/>
<UsageCount Value="32"/> <UsageCount Value="33"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
</Unit2> </Unit2>
@ -50,10 +50,9 @@
</Unit3> </Unit3>
<Unit4> <Unit4>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../rxdb/rxdbgrid.pas"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="3"/> <EditorIndex Value="3"/>
<TopLine Value="4845"/> <TopLine Value="581"/>
<CursorPos X="3" Y="4868"/> <CursorPos X="15" Y="599"/>
<UsageCount Value="15"/> <UsageCount Value="15"/>
<Bookmarks Count="4"> <Bookmarks Count="4">
<Item0 X="14" Y="6403" ID="3"/> <Item0 X="14" Y="6403" ID="3"/>
@ -156,133 +155,146 @@
<Unit17> <Unit17>
<Filename Value="../../../../lcl/grids.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<UnitName Value="Grids"/> <UnitName Value="Grids"/>
<EditorIndex Value="4"/> <IsVisibleTab Value="True"/>
<TopLine Value="1257"/> <EditorIndex Value="5"/>
<CursorPos X="15" Y="1235"/> <TopLine Value="5387"/>
<CursorPos X="3" Y="5392"/>
<UsageCount Value="10"/> <UsageCount Value="10"/>
<Loaded Value="True"/> <Loaded Value="True"/>
</Unit17> </Unit17>
<Unit18>
<Filename Value="../../../../lcl/dbgrids.pas"/>
<UnitName Value="DBGrids"/>
<EditorIndex Value="4"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit18>
<Unit19>
<Filename Value="/home/install/source/fpcsrc/rtl/inc/typshrdh.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="93"/>
<CursorPos X="29" Y="158"/>
<UsageCount Value="10"/>
</Unit19>
</Units> </Units>
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="30" HistoryIndex="29">
<Position1> <Position1>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="759" Column="15" TopLine="745"/> <Caret Line="404" Column="15" TopLine="387"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="4171" Column="3" TopLine="4198"/> <Caret Line="3083" Column="3" TopLine="3080"/>
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="658" Column="19" TopLine="632"/> <Caret Line="402" Column="15" TopLine="389"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="777" Column="34" TopLine="750"/> <Caret Line="4133" Column="3" TopLine="4129"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="2686" Column="24" TopLine="2658"/> <Caret Line="750" Column="12" TopLine="735"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="4270" Column="25" TopLine="4242"/> <Caret Line="3049" Column="3" TopLine="3045"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4271" Column="24" TopLine="4243"/> <Caret Line="976" Column="15" TopLine="959"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4287" TopLine="4264"/> <Caret Line="4133" Column="3" TopLine="4129"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="4853" Column="25" TopLine="4836"/> <Caret Line="3049" Column="3" TopLine="3045"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4856" Column="3" TopLine="4834"/> <Caret Line="976" Column="15" TopLine="961"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/dbgrids.pas"/>
<Caret Line="4857" Column="3" TopLine="4839"/> <Caret Line="3049" Column="3" TopLine="3045"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4862" Column="7" TopLine="4839"/> <Caret Line="4134" Column="15" TopLine="4129"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4861" Column="67" TopLine="4845"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4852" TopLine="4845"/> <Caret Line="4134" Column="27" TopLine="4106"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4854" TopLine="4845"/> <Caret Line="4201" Column="27" TopLine="4148"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4856" TopLine="4845"/> <Caret Line="7212" Column="27" TopLine="7184"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4858" TopLine="4845"/> <Caret Line="7218" Column="27" TopLine="7190"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4862" Column="10" TopLine="4845"/> <Caret Line="7759" Column="52" TopLine="7731"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4852" TopLine="4845"/> <Caret Line="8260" Column="62" TopLine="8232"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4854" TopLine="4845"/> <Caret Line="8266" Column="63" TopLine="8238"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4856" TopLine="4845"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4858" TopLine="4845"/> <Caret Line="667" Column="18" TopLine="638"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4860" TopLine="4845"/> <Caret Line="668" Column="45" TopLine="639"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="../../../../lcl/grids.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="1235" Column="15" TopLine="1219"/> <Caret Line="687" Column="22" TopLine="656"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4860" TopLine="4845"/> <Caret Line="788" Column="31" TopLine="761"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4285" Column="18" TopLine="4271"/> <Caret Line="5392" Column="3" TopLine="5387"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4286" Column="9" TopLine="4282"/> <Caret Line="845" Column="15" TopLine="830"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4864" TopLine="4847"/> <Caret Line="3373" Column="3" TopLine="3378"/>
</Position28> </Position28>
<Position29> <Position29>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4852" TopLine="4845"/> <Caret Line="3846" Column="21" TopLine="3818"/>
</Position29> </Position29>
<Position30> <Position30>
<Filename Value="../../rxdb/rxdbgrid.pas"/> <Filename Value="../../../../lcl/grids.pas"/>
<Caret Line="4854" TopLine="4845"/> <Caret Line="788" Column="15" TopLine="773"/>
</Position30> </Position30>
</JumpHistory> </JumpHistory>
</ProjectSession> </ProjectSession>

46
components/rx/trunk/rxdb/rxdbgrid.pas
View File

@ -777,7 +777,7 @@ type
procedure FFilterColDlgButtonOnClick(Sender: TObject); procedure FFilterColDlgButtonOnClick(Sender: TObject);
procedure InternalOptimizeColumnsWidth(AColList: TList); procedure InternalOptimizeColumnsWidth(AColList: TList);
function IsDefaultRowHeightStored: boolean; //function IsDefaultRowHeightStored: boolean;
procedure VisualChange; override; procedure VisualChange; override;
procedure EditorWidthChanged(aCol,aWidth: Integer); override; procedure EditorWidthChanged(aCol,aWidth: Integer); override;
@ -2856,7 +2856,7 @@ begin
begin begin
if rxTit.Orientation in [toVertical270, toVertical90] then if rxTit.Orientation in [toVertical270, toVertical90] then
H1 := Max((tmpCanvas.TextWidth(Columns[i].Title.Caption) + H1 := Max((tmpCanvas.TextWidth(Columns[i].Title.Caption) +
tmpCanvas.TextWidth('W')) div DefaultRowHeight, H) tmpCanvas.TextWidth('W')) div GetDefaultRowHeight, H)
else else
begin begin
if rxTit.CaptionLinesCount = 0 then if rxTit.CaptionLinesCount = 0 then
@ -2906,9 +2906,9 @@ begin
end; end;
if not (rdgDisableWordWrapTitles in OptionsRx) then if not (rdgDisableWordWrapTitles in OptionsRx) then
RowHeights[0] := DefaultRowHeight * H RowHeights[0] := GetDefaultRowHeight * H
else else
RowHeights[0] := DefaultRowHeight; RowHeights[0] := GetDefaultRowHeight;
if rdgFilter in OptionsRx then if rdgFilter in OptionsRx then
begin begin
@ -2918,7 +2918,7 @@ begin
end end
else else
begin begin
RowHeights[0] := RowHeights[0] + DefaultRowHeight; RowHeights[0] := RowHeights[0] + GetDefaultRowHeight;
end; end;
end; end;
@ -2958,7 +2958,7 @@ begin
if Assigned(FFilterListEditor) then if Assigned(FFilterListEditor) then
Result.Top := bRect.Bottom - FFilterListEditor.Height Result.Top := bRect.Bottom - FFilterListEditor.Height
else else
Result.Top := bRect.Bottom - DefaultRowHeight; Result.Top := bRect.Bottom - GetDefaultRowHeight;
end; end;
function TRxDBGrid.getTitleRect(bRect: TRect): TRect; function TRxDBGrid.getTitleRect(bRect: TRect): TRect;
@ -2967,7 +2967,7 @@ begin
if Assigned(FFilterListEditor) then if Assigned(FFilterListEditor) then
Result.Bottom := bRect.Bottom - FFilterListEditor.Height Result.Bottom := bRect.Bottom - FFilterListEditor.Height
else else
Result.Bottom := bRect.Bottom - DefaultRowHeight; Result.Bottom := bRect.Bottom - GetDefaultRowHeight;
end; end;
procedure TRxDBGrid.OutCaptionCellText(aCol, aRow: integer; const aRect: TRect; procedure TRxDBGrid.OutCaptionCellText(aCol, aRow: integer; const aRect: TRect;
@ -3369,7 +3369,7 @@ begin
if i<RowCount then if i<RowCount then
begin begin
RowHeights[i] := DefaultRowHeight * H; RowHeights[i] := GetDefaultRowHeight * H;
H2:=H2 + RowHeights[i]; H2:=H2 + RowHeights[i];
if H2<=ClientHeight then if H2<=ClientHeight then
Inc(Result); Inc(Result);
@ -3383,7 +3383,7 @@ var
i:integer; i:integer;
begin begin
for i:=1 to RowCount-1 do for i:=1 to RowCount-1 do
RowHeights[i] := DefaultRowHeight; RowHeights[i] := GetDefaultRowHeight;
end; end;
procedure TRxDBGrid.DoClearInvalidTitle; procedure TRxDBGrid.DoClearInvalidTitle;
@ -3638,7 +3638,7 @@ begin
end end
else else
begin begin
aRect2.Bottom := aRect2.Top + MLI.Height * DefaultRowHeight; aRect2.Bottom := aRect2.Top + MLI.Height * GetDefaultRowHeight;
aState := aState - [gdPushed]; aState := aState - [gdPushed];
end; end;
@ -4029,16 +4029,16 @@ var
ABrush: TBrush; ABrush: TBrush;
begin begin
TotalWidth := GCache.ClientWidth; TotalWidth := GCache.ClientWidth;
TotalYOffs := GCache.ClientHeight - (DefaultRowHeight * FFooterOptions.RowCount); TotalYOffs := GCache.ClientHeight - (GetDefaultRowHeight * FFooterOptions.RowCount);
FooterRect := Rect(0, TotalYOffs, TotalWidth, TotalYOffs + DefaultRowHeight * FFooterOptions.RowCount); FooterRect := Rect(0, TotalYOffs, TotalWidth, TotalYOffs + GetDefaultRowHeight * FFooterOptions.RowCount);
Background := Canvas.Brush.Color; Background := Canvas.Brush.Color;
Canvas.Brush.Color := Color; Canvas.Brush.Color := Color;
Canvas.FillRect(FooterRect); Canvas.FillRect(FooterRect);
R.Top := TotalYOffs; R.Top := TotalYOffs;
R.Bottom := TotalYOffs + DefaultRowHeight * FFooterOptions.RowCount; R.Bottom := TotalYOffs + GetDefaultRowHeight * FFooterOptions.RowCount;
Canvas.Brush.Color := FFooterOptions.FColor; Canvas.Brush.Color := FFooterOptions.FColor;
if (Columns.Count > 0) then if (Columns.Count > 0) then
@ -4056,7 +4056,7 @@ begin
ABrush := nil;//initialize, no need create everytime. ABrush := nil;//initialize, no need create everytime.
R.Top := TotalYOffs; R.Top := TotalYOffs;
R.Bottom := TotalYOffs + DefaultRowHeight; R.Bottom := TotalYOffs + GetDefaultRowHeight;
// R.Bottom := TotalYOffs + DefaultRowHeight * FFooterOptions.RowCount; // R.Bottom := TotalYOffs + DefaultRowHeight * FFooterOptions.RowCount;
for j:=0 to FFooterOptions.RowCount-1 do for j:=0 to FFooterOptions.RowCount-1 do
@ -4137,7 +4137,7 @@ begin
end; end;
R.Top := R.Bottom; R.Top := R.Bottom;
R.Bottom := R.Bottom + DefaultRowHeight; R.Bottom := R.Bottom + GetDefaultRowHeight;
end; end;
if assigned(ABrush)then FreeAndNil(ABrush); if assigned(ABrush)then FreeAndNil(ABrush);
@ -4460,7 +4460,7 @@ begin
Rct := CellRect(0, 0); Rct := CellRect(0, 0);
MPT.X := Rct.Left; MPT.X := Rct.Left;
if rdgFilter in FOptionsRx then if rdgFilter in FOptionsRx then
MPT.Y := Rct.Bottom - DefaultRowHeight MPT.Y := Rct.Bottom - GetDefaultRowHeight
else else
MPT.Y := Rct.Bottom; MPT.Y := Rct.Bottom;
MPT := ClientToScreen(MPT); MPT := ClientToScreen(MPT);
@ -4714,7 +4714,7 @@ begin
begin begin
P:=GCache.MaxClientXY; P:=GCache.MaxClientXY;
with GCache do with GCache do
MaxClientXY.Y:=MaxClientXY.Y - (DefaultRowHeight * FFooterOptions.RowCount + 2); MaxClientXY.Y:=MaxClientXY.Y - (GetDefaultRowHeight * FFooterOptions.RowCount + 2);
end; end;
DoClearInvalidTitle; DoClearInvalidTitle;
@ -4744,12 +4744,12 @@ function TRxDBGrid.GetBufferCount: integer;
var var
H:integer; H:integer;
begin begin
if DefaultRowHeight > 0 then if GetDefaultRowHeight > 0 then
begin begin
H:=ClientHeight - GCache.FixedHeight; H:=ClientHeight - GCache.FixedHeight;
if FFooterOptions.Active then if FFooterOptions.Active then
H:=H - DefaultRowHeight * FFooterOptions.RowCount; H:=H - GetDefaultRowHeight * FFooterOptions.RowCount;
Result := H div DefaultRowHeight; Result := H div GetDefaultRowHeight;
end end
else else
Result := 1; Result := 1;
@ -4932,12 +4932,12 @@ begin
FreeMem(WA, SizeOf(integer) * AColList.Count); FreeMem(WA, SizeOf(integer) * AColList.Count);
end; end;
(*
function TRxDBGrid.IsDefaultRowHeightStored: boolean; function TRxDBGrid.IsDefaultRowHeightStored: boolean;
begin begin
Result := DefaultRowHeight = Canvas.TextHeight('Wg'); Result := GetDefaultRowHeight = Canvas.TextHeight('Wg');
end; end;
*)
procedure TRxDBGrid.VisualChange; procedure TRxDBGrid.VisualChange;
begin begin
CalcTitle; CalcTitle;