RxFPC:RxDBGrid - cleanup code

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5866 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2017-05-18 13:58:44 +00:00
parent 748be6f184
commit 6f8fba8ec8
2 changed files with 302 additions and 126 deletions

View File

@@ -3,7 +3,7 @@
<ProjectSession>
<Version Value="10"/>
<BuildModes Active="Default"/>
<Units Count="10">
<Units Count="12">
<Unit0>
<Filename Value="WordWrapDemo.lpr"/>
<IsPartOfProject Value="True"/>
@@ -11,7 +11,7 @@
<WindowIndex Value="-1"/>
<TopLine Value="-1"/>
<CursorPos X="-1" Y="-1"/>
<UsageCount Value="26"/>
<UsageCount Value="31"/>
</Unit0>
<Unit1>
<Filename Value="unit1.pas"/>
@@ -20,49 +20,51 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
<IsVisibleTab Value="True"/>
<CursorPos X="32" Y="8"/>
<UsageCount Value="26"/>
<TopLine Value="57"/>
<CursorPos X="3" Y="63"/>
<UsageCount Value="31"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="851"/>
<CursorPos Y="867"/>
<UsageCount Value="13"/>
<Bookmarks Count="3">
<Item0 Y="4704" ID="2"/>
<Item1 X="7" Y="4755" ID="3"/>
<Item2 Y="3389" ID="1"/>
<TopLine Value="1174"/>
<CursorPos X="42" Y="1187"/>
<UsageCount Value="16"/>
<Bookmarks Count="4">
<Item0 X="7" Y="4721" ID="3"/>
<Item1 Y="616" ID="4"/>
<Item2 X="3" Y="4998" ID="1"/>
<Item3 X="49" Y="362" ID="2"/>
</Bookmarks>
<Loaded Value="True"/>
</Unit2>
<Unit3>
<Filename Value="../../../../../lcl/dbgrids.pas"/>
<UnitName Value="DBGrids"/>
<EditorIndex Value="3"/>
<EditorIndex Value="5"/>
<TopLine Value="2880"/>
<CursorPos Y="2901"/>
<UsageCount Value="13"/>
<UsageCount Value="16"/>
<Loaded Value="True"/>
</Unit3>
<Unit4>
<Filename Value="../../../../../lcl/grids.pas"/>
<UnitName Value="Grids"/>
<EditorIndex Value="4"/>
<EditorIndex Value="6"/>
<TopLine Value="2482"/>
<CursorPos X="3" Y="2484"/>
<UsageCount Value="13"/>
<UsageCount Value="16"/>
<Loaded Value="True"/>
</Unit4>
<Unit5>
<Filename Value="/home/install/source/fpcsrc/packages/fcl-db/src/base/db.pas"/>
<EditorIndex Value="2"/>
<EditorIndex Value="4"/>
<TopLine Value="1560"/>
<CursorPos X="15" Y="1578"/>
<UsageCount Value="13"/>
<UsageCount Value="16"/>
<Loaded Value="True"/>
</Unit5>
<Unit6>
@@ -70,163 +72,170 @@
<EditorIndex Value="-1"/>
<TopLine Value="199"/>
<CursorPos X="3" Y="202"/>
<UsageCount Value="9"/>
<UsageCount Value="8"/>
</Unit6>
<Unit7>
<Filename Value="/home/install/source/fpcsrc/packages/fcl-db/src/base/dataset.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="1284"/>
<CursorPos X="3" Y="1287"/>
<UsageCount Value="9"/>
<UsageCount Value="8"/>
</Unit7>
<Unit8>
<Filename Value="../../../../../lcl/include/wincontrol.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="5739"/>
<CursorPos Y="5757"/>
<UsageCount Value="9"/>
<UsageCount Value="8"/>
</Unit8>
<Unit9>
<Filename Value="../../../../../lcl/include/winapi.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="929"/>
<CursorPos Y="949"/>
<UsageCount Value="9"/>
<UsageCount Value="8"/>
</Unit9>
<Unit10>
<Filename Value="/home/install/source/fpcsrc/rtl/objpas/classes/classesh.inc"/>
<EditorIndex Value="2"/>
<TopLine Value="518"/>
<CursorPos X="14" Y="537"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit10>
<Unit11>
<Filename Value="/home/install/source/fpcsrc/rtl/objpas/classes/collect.inc"/>
<EditorIndex Value="3"/>
<TopLine Value="289"/>
<CursorPos X="3" Y="291"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit11>
</Units>
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="4760" TopLine="4731"/>
<Caret Line="503" Column="9" TopLine="484"/>
</Position1>
<Position2>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="4739" TopLine="4731"/>
<Caret Line="1174" Column="17" TopLine="1171"/>
</Position2>
<Position3>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="4743" Column="8" TopLine="4731"/>
<Caret Line="6448" Column="54" TopLine="6435"/>
</Position3>
<Position4>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="4944" Column="12" TopLine="4913"/>
<Caret Line="5032" Column="9" TopLine="5000"/>
</Position4>
<Position5>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="700" Column="15" TopLine="683"/>
<Caret Line="4943" Column="17" TopLine="4928"/>
</Position5>
<Position6>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="2768" Column="3" TopLine="2757"/>
<Caret Line="5053" Column="3" TopLine="5021"/>
</Position6>
<Position7>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="2861" Column="9" TopLine="2861"/>
<Caret Line="5058" TopLine="5024"/>
</Position7>
<Position8>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="824" Column="15" TopLine="791"/>
<Caret Line="5051" Column="35" TopLine="5041"/>
</Position8>
<Position9>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="5142" Column="57" TopLine="5125"/>
<Caret Line="796" Column="15" TopLine="780"/>
</Position9>
<Position10>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="854" Column="90" TopLine="838"/>
<Caret Line="362" Column="49" TopLine="342"/>
</Position10>
<Position11>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="853" Column="51" TopLine="840"/>
<Caret Line="589" TopLine="570"/>
</Position11>
<Position12>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="75" Column="25" TopLine="55"/>
<Caret Line="362" Column="49" TopLine="343"/>
</Position12>
<Position13>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="854" Column="96" TopLine="834"/>
<Caret Line="5042" Column="33" TopLine="5037"/>
</Position13>
<Position14>
<Filename Value="unit1.pas"/>
<Caret Line="30" Column="80" TopLine="13"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="5116" Column="40" TopLine="5038"/>
</Position14>
<Position15>
<Filename Value="unit1.pas"/>
<Caret Line="45" TopLine="24"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="515" Column="48" TopLine="490"/>
</Position15>
<Position16>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="818" TopLine="800"/>
<Caret Line="522" Column="21" TopLine="496"/>
</Position16>
<Position17>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="3391" Column="3" TopLine="3363"/>
<Caret Line="525" Column="76" TopLine="493"/>
</Position17>
<Position18>
<Filename Value="unit1.pas"/>
<Caret Line="30" Column="37" TopLine="28"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="1173" TopLine="1168"/>
</Position18>
<Position19>
<Filename Value="unit1.pas"/>
<Caret Line="83" Column="3" TopLine="62"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="474" Column="49" TopLine="448"/>
</Position19>
<Position20>
<Filename Value="unit1.pas"/>
<Caret Line="84" Column="30" TopLine="59"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="2057" Column="3" TopLine="2055"/>
</Position20>
<Position21>
<Filename Value="unit1.pas"/>
<Caret Line="83" Column="42" TopLine="34"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="535" Column="56" TopLine="509"/>
</Position21>
<Position22>
<Filename Value="unit1.pas"/>
<Caret Line="30" Column="38" TopLine="23"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="1176" Column="3" TopLine="1173"/>
</Position22>
<Position23>
<Filename Value="unit1.pas"/>
<Caret Line="90" Column="3" TopLine="70"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="471" Column="15" TopLine="466"/>
</Position23>
<Position24>
<Filename Value="unit1.pas"/>
<Caret Line="62" Column="3" TopLine="50"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="2063" TopLine="2060"/>
</Position24>
<Position25>
<Filename Value="unit1.pas"/>
<Caret Line="31" Column="15" TopLine="8"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="535" Column="65" TopLine="470"/>
</Position25>
<Position26>
<Filename Value="unit1.pas"/>
<Caret Line="90" TopLine="68"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="530" Column="58" TopLine="528"/>
</Position26>
<Position27>
<Filename Value="unit1.pas"/>
<Caret Line="27" Column="15" TopLine="12"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="1176" Column="3" TopLine="1174"/>
</Position27>
<Position28>
<Filename Value="unit1.pas"/>
<Caret Line="64" TopLine="59"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="471" Column="14" TopLine="453"/>
</Position28>
<Position29>
<Filename Value="unit1.pas"/>
<Caret Line="31" Column="15" TopLine="8"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="2069" TopLine="2066"/>
</Position29>
<Position30>
<Filename Value="unit1.pas"/>
<Caret Line="89" TopLine="64"/>
<Filename Value="../../../rxdb/rxdbgrid.pas"/>
<Caret Line="530" Column="14" TopLine="499"/>
</Position30>
</JumpHistory>
</ProjectSession>
<Debugging>
<BreakPoints Count="1">
<Item1>
<Kind Value="bpkSource"/>
<WatchScope Value="wpsLocal"/>
<WatchKind Value="wpkWrite"/>
<Source Value="../../../rxdb/rxdbgrid.pas"/>
<Line Value="5708"/>
</Item1>
</BreakPoints>
<Watches Count="2">
<Item1>
<Expression Value="H1"/>