RxFPC:add property Enabled for all RxDBGrid tools

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6167 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/rx/trunk/demos/rxdbgrid/RxDBGrid/RxDBGridDemo.lpi

@@ -74,8 +74,7 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="RxDBGridMainUnit"/>
-        <TopLine Value="152"/>
-        <CursorPos X="138" Y="188"/>
+        <CursorPos X="31" Y="28"/>
         <UsageCount Value="130"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
@@ -477,13 +476,14 @@
       </Unit56>
       <Unit57>
         <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
-        <TopLine Value="5415"/>
-        <CursorPos Y="5428"/>
+        <TopLine Value="1143"/>
+        <CursorPos X="15" Y="1162"/>
         <UsageCount Value="12"/>
         <Bookmarks Count="2">
-          <Item0 X="3" Y="7315" ID="1"/>
-          <Item1 X="17" Y="4357" ID="2"/>
+          <Item0 X="3" Y="7324" ID="1"/>
+          <Item1 X="17" Y="4366" ID="2"/>
         </Bookmarks>
         <Loaded Value="True"/>
       </Unit57>
@@ -514,7 +514,6 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="RxDBGrid_PopUpFilterUnit"/>
-        <IsVisibleTab Value="True"/>
         <EditorIndex Value="6"/>
         <TopLine Value="216"/>
         <CursorPos X="3" Y="224"/>
@@ -634,8 +633,8 @@
         <Filename Value="../../../rxdbgrid_export_spreadsheet/rxdbgridexportspreadsheet.pas"/>
         <UnitName Value="RxDBGridExportSpreadSheet"/>
         <EditorIndex Value="3"/>
-        <TopLine Value="160"/>
-        <CursorPos X="3" Y="142"/>
+        <TopLine Value="40"/>
+        <CursorPos X="3" Y="59"/>
         <UsageCount Value="10"/>
         <Loaded Value="True"/>
       </Unit76>
@@ -643,123 +642,122 @@
     <JumpHistory Count="30" HistoryIndex="29">
       <Position1>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="234" TopLine="216"/>
       </Position1>
       <Position2>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Caret Line="235" TopLine="216"/>
       </Position2>
       <Position3>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Caret Line="236" TopLine="216"/>
       </Position3>
       <Position4>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Caret Line="232" TopLine="216"/>
       </Position4>
       <Position5>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="234" TopLine="216"/>
       </Position5>
       <Position6>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Caret Line="235" TopLine="216"/>
       </Position6>
       <Position7>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Caret Line="236" TopLine="216"/>
       </Position7>
       <Position8>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Caret Line="232" TopLine="216"/>
       </Position8>
       <Position9>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="234" TopLine="216"/>
       </Position9>
       <Position10>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Caret Line="235" TopLine="216"/>
       </Position10>
       <Position11>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Caret Line="236" TopLine="216"/>
       </Position11>
       <Position12>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Caret Line="232" TopLine="216"/>
       </Position12>
       <Position13>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="234" TopLine="216"/>
       </Position13>
       <Position14>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Caret Line="235" TopLine="216"/>
       </Position14>
       <Position15>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Caret Line="236" TopLine="216"/>
       </Position15>
       <Position16>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Caret Line="232" TopLine="216"/>
       </Position16>
       <Position17>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="240" TopLine="216"/>
       </Position17>
       <Position18>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Caret Line="243" TopLine="216"/>
       </Position18>
       <Position19>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Caret Line="246" TopLine="216"/>
       </Position19>
       <Position20>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Caret Line="241" Column="22" TopLine="216"/>
       </Position20>
       <Position21>
         <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Caret Line="248" Column="39" TopLine="216"/>
       </Position21>
       <Position22>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="234" TopLine="216"/>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="188" Column="138" TopLine="152"/>
       </Position22>
       <Position23>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="235" TopLine="216"/>
+        <Filename Value="rxdbgridmainunit.pas"/>
       </Position23>
       <Position24>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="236" TopLine="216"/>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="28" Column="31"/>
       </Position24>
       <Position25>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="232" TopLine="216"/>
+        <Filename Value="../../../rxdbgrid_export_spreadsheet/rxdbgridexportspreadsheet.pas"/>
+        <Caret Line="59" Column="3" TopLine="40"/>
       </Position25>
       <Position26>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="240" TopLine="216"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1182" Column="61" TopLine="1151"/>
       </Position26>
       <Position27>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="243" TopLine="216"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="2340" Column="3" TopLine="2338"/>
       </Position27>
       <Position28>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="246" TopLine="216"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1182" Column="15" TopLine="1164"/>
       </Position28>
       <Position29>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="241" Column="22" TopLine="216"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1162" Column="15" TopLine="1143"/>
       </Position29>
       <Position30>
-        <Filename Value="../../../rxdb/rxdbgrid_popupfilterunit.pas"/>
-        <Caret Line="248" Column="39" TopLine="216"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="2341" Column="3" TopLine="2338"/>
       </Position30>
     </JumpHistory>
   </ProjectOptions>

components/rx/trunk/demos/rxdbgrid/RxDbGridExportToPDF/project1.lpi

@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="10"/>
+    <Version Value="11"/>
     <General>
       <SessionStorage Value="InProjectDir"/>
       <MainUnit Value="0"/>
@@ -17,9 +17,10 @@
       <Version Value="2"/>
     </PublishOptions>
     <RunParams>
-      <local>
-        <FormatVersion Value="1"/>
-      </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default"/>
+      </Modes>
     </RunParams>
     <RequiredPackages Count="3">
       <Item1>

components/rx/trunk/demos/rxdbgrid/RxDbGridExportToPDF/project1.lps

@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectSession>
-    <Version Value="10"/>
+    <Version Value="11"/>
     <BuildModes Active="Default"/>
     <Units Count="92">
       <Unit0>
@@ -18,8 +18,9 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="Unit1"/>
+        <IsVisibleTab Value="True"/>
         <TopLine Value="132"/>
-        <CursorPos X="35" Y="137"/>
+        <CursorPos X="48" Y="146"/>
         <UsageCount Value="120"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
@@ -138,17 +139,16 @@
         <Filename Value="../../../lazutils/lazfreetypefontcollection.pas"/>
         <UnitName Value="LazFreeTypeFontCollection"/>
         <EditorIndex Value="-1"/>
-        <TopLine Value="331"/>
-        <CursorPos Y="352"/>
-        <UsageCount Value="34"/>
+        <TopLine Value="127"/>
+        <CursorPos X="50" Y="141"/>
+        <UsageCount Value="4"/>
       </Unit16>
       <Unit17>
         <Filename Value="../../../lazutils/easylazfreetype.pas"/>
         <UnitName Value="EasyLazFreeType"/>
         <EditorIndex Value="-1"/>
-        <TopLine Value="1214"/>
-        <CursorPos X="13" Y="1224"/>
-        <UsageCount Value="36"/>
+        <CursorPos X="14" Y="160"/>
+        <UsageCount Value="4"/>
       </Unit17>
       <Unit18>
         <Filename Value="../../../../examples/lazfreetype/mainform.pas"/>
@@ -242,42 +242,27 @@
         <UsageCount Value="10"/>
       </Unit29>
       <Unit30>
-        <Filename Value="../../../lazutils/easylazfreetype.pas"/>
-        <UnitName Value="EasyLazFreeType"/>
-        <EditorIndex Value="-1"/>
-        <CursorPos X="14" Y="160"/>
-        <UsageCount Value="4"/>
-      </Unit30>
-      <Unit31>
-        <Filename Value="../../../lazutils/lazfreetypefontcollection.pas"/>
-        <UnitName Value="LazFreeTypeFontCollection"/>
-        <EditorIndex Value="-1"/>
-        <TopLine Value="127"/>
-        <CursorPos X="50" Y="141"/>
-        <UsageCount Value="4"/>
-      </Unit31>
-      <Unit32>
         <Filename Value="../../../install/source/fpcsrc/rtl/objpas/classes/classesh.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="76"/>
         <CursorPos X="56" Y="91"/>
         <UsageCount Value="6"/>
-      </Unit32>
-      <Unit33>
+      </Unit30>
+      <Unit31>
         <Filename Value="../../../install/source/fpcsrc/rtl/objpas/sysutils/sysinth.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="122"/>
         <CursorPos X="58" Y="137"/>
         <UsageCount Value="4"/>
-      </Unit33>
-      <Unit34>
+      </Unit31>
+      <Unit32>
         <Filename Value="../../vclutils.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="257"/>
         <CursorPos X="11" Y="269"/>
         <UsageCount Value="10"/>
-      </Unit34>
-      <Unit35>
+      </Unit32>
+      <Unit33>
         <Filename Value="../../rxshortcutunit.pas"/>
         <ComponentName Value="rxShortCutForm"/>
         <HasResources Value="True"/>
@@ -286,42 +271,42 @@
         <EditorIndex Value="-1"/>
         <TopLine Value="13"/>
         <UsageCount Value="4"/>
-      </Unit35>
-      <Unit36>
+      </Unit33>
+      <Unit34>
         <Filename Value="../../rxctrls.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="40"/>
         <UsageCount Value="4"/>
-      </Unit36>
-      <Unit37>
+      </Unit34>
+      <Unit35>
         <Filename Value="../../rxapputils.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="28"/>
         <CursorPos X="83" Y="64"/>
         <UsageCount Value="4"/>
-      </Unit37>
-      <Unit38>
+      </Unit35>
+      <Unit36>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/sqldb/sqldb.pp"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="439"/>
         <CursorPos X="3" Y="454"/>
         <UsageCount Value="6"/>
-      </Unit38>
-      <Unit39>
+      </Unit36>
+      <Unit37>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/base/db.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="1339"/>
         <CursorPos X="3" Y="1354"/>
         <UsageCount Value="5"/>
-      </Unit39>
-      <Unit40>
+      </Unit37>
+      <Unit38>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/base/dataset.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="473"/>
         <CursorPos X="3" Y="476"/>
         <UsageCount Value="6"/>
-      </Unit40>
-      <Unit41>
+      </Unit38>
+      <Unit39>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/base/bufdataset.pas"/>
         <UnitName Value="BufDataset"/>
         <EditorIndex Value="-1"/>
@@ -331,21 +316,21 @@
         <Bookmarks Count="1">
           <Item0 X="3" Y="3449" ID="1"/>
         </Bookmarks>
-      </Unit41>
-      <Unit42>
+      </Unit39>
+      <Unit40>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/base/bufdataset_parser.pp"/>
         <EditorIndex Value="-1"/>
         <CursorPos X="20" Y="18"/>
         <UsageCount Value="5"/>
-      </Unit42>
-      <Unit43>
+      </Unit40>
+      <Unit41>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/dbase/dbf_prscore.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="34"/>
         <CursorPos X="3" Y="43"/>
         <UsageCount Value="5"/>
-      </Unit43>
-      <Unit44>
+      </Unit41>
+      <Unit42>
         <Filename Value="../../rxmemds.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="25"/>
@@ -354,104 +339,103 @@
         <Bookmarks Count="1">
           <Item0 X="33" Y="131" ID="2"/>
         </Bookmarks>
-      </Unit44>
-      <Unit45>
+      </Unit42>
+      <Unit43>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/memds/memds.pp"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="136"/>
         <CursorPos X="14" Y="155"/>
         <UsageCount Value="4"/>
-      </Unit45>
-      <Unit46>
+      </Unit43>
+      <Unit44>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/dbase/dbf.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="2336"/>
         <CursorPos X="3" Y="2338"/>
         <UsageCount Value="4"/>
-      </Unit46>
-      <Unit47>
+      </Unit44>
+      <Unit45>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/dbase/dbf_parser.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="162"/>
         <CursorPos X="5" Y="87"/>
         <UsageCount Value="4"/>
-      </Unit47>
-      <Unit48>
+      </Unit45>
+      <Unit46>
         <Filename Value="../../rxdb/rxmemds_parser.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="186"/>
         <CursorPos X="3" Y="189"/>
         <UsageCount Value="5"/>
-      </Unit48>
-      <Unit49>
+      </Unit46>
+      <Unit47>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-db/src/dbase/dbf_common.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="95"/>
         <CursorPos X="10" Y="110"/>
         <UsageCount Value="5"/>
-      </Unit49>
-      <Unit50>
+      </Unit47>
+      <Unit48>
         <Filename Value="../../../../lcl/grids.pas"/>
         <UnitName Value="Grids"/>
-        <EditorIndex Value="2"/>
+        <EditorIndex Value="-1"/>
         <TopLine Value="11502"/>
         <CursorPos Y="11522"/>
         <UsageCount Value="14"/>
-        <Loaded Value="True"/>
-      </Unit50>
-      <Unit51>
+      </Unit48>
+      <Unit49>
         <Filename Value="../../../lazutils/lazfreetype.pas"/>
         <UnitName Value="LazFreeType"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="814"/>
         <UsageCount Value="10"/>
-      </Unit51>
-      <Unit52>
+      </Unit49>
+      <Unit50>
         <Filename Value="../../../lazutils/ttobjs.pas"/>
         <UnitName Value="TTObjs"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="364"/>
         <CursorPos X="3" Y="382"/>
         <UsageCount Value="13"/>
-      </Unit52>
-      <Unit53>
+      </Unit50>
+      <Unit51>
         <Filename Value="../../../lazutils/tttables.pas"/>
         <UnitName Value="TTTables"/>
         <EditorIndex Value="-1"/>
         <UsageCount Value="5"/>
-      </Unit53>
-      <Unit54>
+      </Unit51>
+      <Unit52>
         <Filename Value="../../../../lcl/dbgrids.pas"/>
         <UnitName Value="DBGrids"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="4071"/>
         <CursorPos Y="4090"/>
         <UsageCount Value="7"/>
-      </Unit54>
-      <Unit55>
+      </Unit52>
+      <Unit53>
         <Filename Value="../../../../lcl/graphics.pp"/>
         <UnitName Value="Graphics"/>
         <EditorIndex Value="-1"/>
         <CursorPos X="14" Y="17"/>
         <UsageCount Value="13"/>
-      </Unit55>
-      <Unit56>
+      </Unit53>
+      <Unit54>
         <Filename Value="../../../../lcl/lcltype.pp"/>
         <UnitName Value="LCLType"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="1629"/>
         <CursorPos X="3" Y="1644"/>
         <UsageCount Value="6"/>
-      </Unit56>
-      <Unit57>
+      </Unit54>
+      <Unit55>
         <Filename Value="../../../install/source/fpcsrc/packages/fcl-image/src/fpimage.pp"/>
         <UnitName Value="FPimage"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="37"/>
         <CursorPos X="4" Y="45"/>
         <UsageCount Value="6"/>
-      </Unit57>
-      <Unit58>
+      </Unit55>
+      <Unit56>
         <Filename Value="../../rxdbgridexportpdfsetupunit.pas"/>
         <ComponentName Value="RxDBGridExportPdfSetupForm"/>
         <HasResources Value="True"/>
@@ -461,8 +445,8 @@
         <TopLine Value="88"/>
         <CursorPos X="78" Y="60"/>
         <UsageCount Value="22"/>
-      </Unit58>
-      <Unit59>
+      </Unit56>
+      <Unit57>
         <Filename Value="../../rxdbgridexportspreadsheet_paramsunit.pas"/>
         <ComponentName Value="RxDBGridExportSpreadSheet_ParamsForm"/>
         <HasResources Value="True"/>
@@ -472,167 +456,167 @@
         <TopLine Value="31"/>
         <CursorPos X="3" Y="46"/>
         <UsageCount Value="10"/>
-      </Unit59>
-      <Unit60>
+      </Unit57>
+      <Unit58>
         <Filename Value="../../../../lcl/controls.pp"/>
         <UnitName Value="Controls"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="5"/>
         <CursorPos X="14" Y="19"/>
         <UsageCount Value="6"/>
-      </Unit60>
-      <Unit61>
+      </Unit58>
+      <Unit59>
         <Filename Value="/home/OPTORG/alexs/1/1/testfppdf.lpr"/>
         <EditorIndex Value="-1"/>
         <UsageCount Value="39"/>
-      </Unit61>
-      <Unit62>
+      </Unit59>
+      <Unit60>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-pdf/src/fppdf.pp"/>
         <UnitName Value="fpPDF"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="3194"/>
         <CursorPos X="3" Y="3196"/>
         <UsageCount Value="32"/>
-      </Unit62>
-      <Unit63>
+      </Unit60>
+      <Unit61>
         <Filename Value="/home/install/source/fpcsrc/rtl/objpas/classes/classesh.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="236"/>
         <CursorPos X="3" Y="215"/>
         <UsageCount Value="6"/>
-      </Unit63>
-      <Unit64>
+      </Unit61>
+      <Unit62>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-base/src/contnrs.pp"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="16"/>
         <CursorPos X="3" Y="31"/>
         <UsageCount Value="8"/>
-      </Unit64>
-      <Unit65>
+      </Unit62>
+      <Unit63>
         <Filename Value="../../../../lcl/stdctrls.pp"/>
         <UnitName Value="StdCtrls"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="951"/>
         <CursorPos X="14" Y="964"/>
         <UsageCount Value="6"/>
-      </Unit65>
-      <Unit66>
+      </Unit63>
+      <Unit64>
         <Filename Value="../../../lazutils/tterror.pas"/>
         <UnitName Value="TTError"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="34"/>
         <CursorPos X="3" Y="49"/>
         <UsageCount Value="10"/>
-      </Unit66>
-      <Unit67>
+      </Unit64>
+      <Unit65>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-pdf/src/fpparsettf.pp"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="893"/>
         <CursorPos X="3" Y="896"/>
         <UsageCount Value="20"/>
-      </Unit67>
-      <Unit68>
+      </Unit65>
+      <Unit66>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-pdf/src/fpttfencodings.pp"/>
         <EditorIndex Value="-1"/>
         <UsageCount Value="20"/>
-      </Unit68>
-      <Unit69>
+      </Unit66>
+      <Unit67>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-pdf/src/fpttf.pp"/>
         <UnitName Value="fpTTF"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="17"/>
         <CursorPos X="29" Y="21"/>
         <UsageCount Value="25"/>
-      </Unit69>
-      <Unit70>
+      </Unit67>
+      <Unit68>
         <Filename Value="../../../../lcl/include/canvas.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="1756"/>
         <CursorPos X="3" Y="1765"/>
         <UsageCount Value="10"/>
-      </Unit70>
-      <Unit71>
+      </Unit68>
+      <Unit69>
         <Filename Value="../../../../lcl/include/winapih.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="136"/>
         <CursorPos X="10" Y="151"/>
         <UsageCount Value="9"/>
-      </Unit71>
-      <Unit72>
+      </Unit69>
+      <Unit70>
         <Filename Value="../../../../lcl/include/intfbasewinapi.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="1161"/>
         <CursorPos X="3" Y="1165"/>
         <UsageCount Value="9"/>
-      </Unit72>
-      <Unit73>
+      </Unit70>
+      <Unit71>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-pdf/tests/fpttf_test.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="143"/>
         <CursorPos X="13" Y="151"/>
         <UsageCount Value="15"/>
-      </Unit73>
-      <Unit74>
+      </Unit71>
+      <Unit72>
         <Filename Value="/home/install/source/fpcsrc/rtl/unix/sysunixh.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="14"/>
         <CursorPos X="2" Y="29"/>
         <UsageCount Value="9"/>
-      </Unit74>
-      <Unit75>
+      </Unit72>
+      <Unit73>
         <Filename Value="../../../lazutils/tttypes.pas"/>
         <UnitName Value="TTTypes"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="357"/>
         <CursorPos X="12" Y="372"/>
         <UsageCount Value="13"/>
-      </Unit75>
-      <Unit76>
+      </Unit73>
+      <Unit74>
         <Filename Value="../../../lazutils/lazutf8.pas"/>
         <UnitName Value="LazUTF8"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="483"/>
         <CursorPos X="3" Y="430"/>
         <UsageCount Value="9"/>
-      </Unit76>
-      <Unit77>
+      </Unit74>
+      <Unit75>
         <Filename Value="/home/install/source/fpcsrc/rtl/inc/ustringh.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="125"/>
         <CursorPos X="10" Y="140"/>
         <UsageCount Value="9"/>
-      </Unit77>
-      <Unit78>
+      </Unit75>
+      <Unit76>
         <Filename Value="/home/install/source/fpcsrc/rtl/inc/ustrings.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="1781"/>
         <CursorPos X="10" Y="1796"/>
         <UsageCount Value="9"/>
-      </Unit78>
-      <Unit79>
+      </Unit76>
+      <Unit77>
         <Filename Value="/home/install/source/fpcsrc/rtl/inc/systemh.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="550"/>
         <CursorPos X="3" Y="565"/>
         <UsageCount Value="9"/>
-      </Unit79>
-      <Unit80>
+      </Unit77>
+      <Unit78>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-image/src/fpimage.pp"/>
         <UnitName Value="FPimage"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="10"/>
         <CursorPos X="3" Y="25"/>
         <UsageCount Value="15"/>
-      </Unit80>
-      <Unit81>
+      </Unit78>
+      <Unit79>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-image/src/fpreadbmp.pp"/>
         <UnitName Value="FPReadBMP"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="25"/>
         <CursorPos X="15" Y="33"/>
         <UsageCount Value="10"/>
-      </Unit81>
-      <Unit82>
+      </Unit79>
+      <Unit80>
         <Filename Value="../../rxdbgridprintgrid_setupunit.pas"/>
         <ComponentName Value="RxDBGridPrintGrid_SetupForm"/>
         <HasResources Value="True"/>
@@ -642,198 +626,203 @@
         <TopLine Value="17"/>
         <CursorPos Y="99"/>
         <UsageCount Value="12"/>
-      </Unit82>
-      <Unit83>
+      </Unit80>
+      <Unit81>
         <Filename Value="../../../../lcl/include/customcombobox.inc"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="927"/>
         <CursorPos Y="946"/>
         <UsageCount Value="10"/>
-      </Unit83>
-      <Unit84>
+      </Unit81>
+      <Unit82>
         <Filename Value="../../../wst/type_lib_edtr/edit_helper.pas"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="412"/>
         <CursorPos X="19" Y="428"/>
         <UsageCount Value="10"/>
-      </Unit84>
-      <Unit85>
+      </Unit82>
+      <Unit83>
         <Filename Value="/home/install/source/fpcsrc/packages/fcl-passrc/src/pastree.pp"/>
         <UnitName Value="PasTree"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="572"/>
         <CursorPos X="3" Y="575"/>
         <UsageCount Value="10"/>
-      </Unit85>
-      <Unit86>
+      </Unit83>
+      <Unit84>
         <Filename Value="../../../wst/type_lib_edtr/uinterfaceedit.pas"/>
         <EditorIndex Value="-1"/>
         <CursorPos X="11" Y="13"/>
         <UsageCount Value="10"/>
-      </Unit86>
-      <Unit87>
+      </Unit84>
+      <Unit85>
         <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
         <UnitName Value="RxDBGridExportPdf"/>
-        <IsVisibleTab Value="True"/>
-        <EditorIndex Value="1"/>
+        <EditorIndex Value="-1"/>
         <TopLine Value="409"/>
         <CursorPos X="24" Y="412"/>
         <UsageCount Value="11"/>
-        <Loaded Value="True"/>
-      </Unit87>
-      <Unit88>
+      </Unit85>
+      <Unit86>
         <Filename Value="E:/install/source/fpcsrc/packages/fcl-pdf/src/fppdf.pp"/>
         <UnitName Value="fpPDF"/>
-        <EditorIndex Value="3"/>
+        <EditorIndex Value="-1"/>
         <TopLine Value="1026"/>
         <CursorPos X="15" Y="1039"/>
         <UsageCount Value="11"/>
-        <Loaded Value="True"/>
-      </Unit88>
-      <Unit89>
+      </Unit86>
+      <Unit87>
         <Filename Value="../../../../../1/fcl-pdf/fpmake.pp"/>
         <EditorIndex Value="-1"/>
         <UsageCount Value="10"/>
-      </Unit89>
-      <Unit90>
+      </Unit87>
+      <Unit88>
         <Filename Value="../../../../../1/fcl-pdf/examples/testfppdf.lpr"/>
-        <EditorIndex Value="4"/>
+        <EditorIndex Value="-1"/>
         <TopLine Value="75"/>
         <CursorPos Y="81"/>
         <UsageCount Value="11"/>
-        <Loaded Value="True"/>
-      </Unit90>
-      <Unit91>
+      </Unit88>
+      <Unit89>
         <Filename Value="E:/install/source/fpcsrc/packages/fcl-pdf/src/fpttf.pp"/>
         <UnitName Value="fpTTF"/>
         <EditorIndex Value="-1"/>
         <TopLine Value="433"/>
         <CursorPos X="3" Y="438"/>
         <UsageCount Value="10"/>
+      </Unit89>
+      <Unit90>
+        <Filename Value="../../../rxdb/rxdbgridexportpdf.pas"/>
+        <UnitName Value="RxDBGridExportPdf"/>
+        <EditorIndex Value="1"/>
+        <TopLine Value="110"/>
+        <CursorPos X="3" Y="129"/>
+        <UsageCount Value="10"/>
+        <Loaded Value="True"/>
+      </Unit90>
+      <Unit91>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <EditorIndex Value="2"/>
+        <TopLine Value="4085"/>
+        <CursorPos X="49" Y="4089"/>
+        <UsageCount Value="10"/>
+        <Loaded Value="True"/>
       </Unit91>
     </Units>
-    <JumpHistory Count="30" HistoryIndex="29">
+    <JumpHistory Count="27" HistoryIndex="26">
       <Position1>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="463" TopLine="438"/>
+        <Filename Value="unit1.pas"/>
+        <Caret Line="135" Column="9" TopLine="14"/>
       </Position1>
       <Position2>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="464" TopLine="438"/>
+        <Filename Value="../../../rxdb/rxdbgridexportpdf.pas"/>
+        <Caret Line="129" Column="3" TopLine="110"/>
       </Position2>
       <Position3>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="465" TopLine="439"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1173" Column="35" TopLine="1154"/>
       </Position3>
       <Position4>
-        <Filename Value="../../../../../1/fcl-pdf/examples/testfppdf.lpr"/>
-        <Caret Line="204" Column="3" TopLine="136"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="2350" Column="18" TopLine="2343"/>
       </Position4>
       <Position5>
-        <Filename Value="../../../../../1/fcl-pdf/examples/testfppdf.lpr"/>
-        <Caret Line="53" Column="17" TopLine="27"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1173" Column="17" TopLine="1154"/>
       </Position5>
       <Position6>
-        <Filename Value="../../../../../1/fcl-pdf/examples/testfppdf.lpr"/>
-        <Caret Line="776" Column="3" TopLine="757"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1167" Column="15" TopLine="1154"/>
       </Position6>
       <Position7>
-        <Filename Value="../../../../../1/fcl-pdf/examples/testfppdf.lpr"/>
-        <Caret Line="40" Column="17" TopLine="39"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="2301" Column="3" TopLine="2299"/>
       </Position7>
       <Position8>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="457" Column="21" TopLine="441"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="877" Column="15" TopLine="860"/>
       </Position8>
       <Position9>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="159" Column="15" TopLine="148"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="4083" Column="3" TopLine="4071"/>
       </Position9>
       <Position10>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="795" TopLine="783"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="879" Column="63" TopLine="860"/>
       </Position10>
       <Position11>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="670" Column="18" TopLine="644"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="4113" Column="5" TopLine="4109"/>
       </Position11>
       <Position12>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="162" Column="15" TopLine="157"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="877" Column="15" TopLine="862"/>
       </Position12>
       <Position13>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="410" Column="3" TopLine="420"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="4092" Column="28" TopLine="4072"/>
       </Position13>
       <Position14>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="163" Column="15" TopLine="147"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="879" Column="15" TopLine="860"/>
       </Position14>
       <Position15>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="465" Column="27" TopLine="449"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="4122" TopLine="4094"/>
       </Position15>
       <Position16>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="162" Column="15" TopLine="148"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="879" Column="15" TopLine="862"/>
       </Position16>
       <Position17>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="441" Column="43" TopLine="418"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="55" Column="3" TopLine="35"/>
       </Position17>
       <Position18>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="163" Column="15" TopLine="148"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="56" Column="25" TopLine="35"/>
       </Position18>
       <Position19>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="459" Column="3" TopLine="449"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="878" Column="53" TopLine="848"/>
       </Position19>
       <Position20>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="164" Column="15" TopLine="148"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="880" Column="61" TopLine="850"/>
       </Position20>
       <Position21>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="477" Column="3" TopLine="470"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1154" Column="27" TopLine="1121"/>
       </Position21>
       <Position22>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="164" Column="15" TopLine="149"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1168" Column="25" TopLine="1148"/>
       </Position22>
       <Position23>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="512" Column="49" TopLine="487"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="2305" TopLine="2300"/>
       </Position23>
       <Position24>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="163" Column="15" TopLine="150"/>
+        <Filename Value="../../../rxdb/rxdbgrid.pas"/>
+        <Caret Line="1163" Column="15" TopLine="1149"/>
       </Position24>
       <Position25>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="465" Column="24" TopLine="449"/>
+        <Filename Value="unit1.pas"/>
+        <Caret Line="135" Column="9" TopLine="14"/>
       </Position25>
       <Position26>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="169" Column="15" TopLine="148"/>
+        <Filename Value="unit1.pas"/>
+        <Caret Line="137" Column="9" TopLine="100"/>
       </Position26>
       <Position27>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="551" Column="8" TopLine="542"/>
+        <Filename Value="unit1.pas"/>
+        <Caret Line="146" Column="48" TopLine="133"/>
       </Position27>
-      <Position28>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="170" Column="15" TopLine="156"/>
-      </Position28>
-      <Position29>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="663" Column="71" TopLine="638"/>
-      </Position29>
-      <Position30>
-        <Filename Value="../../rxdb/rxdbgridexportpdf.pas"/>
-        <Caret Line="162" Column="15" TopLine="146"/>
-      </Position30>
     </JumpHistory>
+    <RunParams>
+      <FormatVersion Value="2"/>
+      <Modes Count="0" ActiveMode="default"/>
+    </RunParams>
   </ProjectSession>
   <Debugging>
     <BreakPoints Count="2">

components/rx/trunk/demos/rxdbgrid/RxDbGridExportToPDF/unit1.lfm

@@ -11,32 +11,47 @@ object Form1: TForm1
   LCLVersion = '1.9.0.0'
   object Panel1: TPanel
     Left = 0
-    Height = 37
-    Top = 360
+    Height = 50
+    Top = 347
     Width = 1043
     Align = alBottom
     AutoSize = True
-    ClientHeight = 37
+    ClientHeight = 50
     ClientWidth = 1043
     TabOrder = 0
     object Button1: TButton
       AnchorSideLeft.Control = Panel1
       AnchorSideLeft.Side = asrCenter
       AnchorSideTop.Control = Panel1
-      Left = 481
-      Height = 23
+      Left = 477
+      Height = 36
       Top = 7
-      Width = 81
+      Width = 88
       AutoSize = True
       BorderSpacing.Around = 6
       Caption = 'Create PDF'
       OnClick = Button1Click
       TabOrder = 0
     end
+    object CheckBox1: TCheckBox
+      AnchorSideLeft.Control = Button1
+      AnchorSideLeft.Side = asrBottom
+      AnchorSideTop.Control = Panel1
+      AnchorSideTop.Side = asrCenter
+      Left = 571
+      Height = 24
+      Top = 13
+      Width = 105
+      Caption = 'Enable tools'
+      Checked = True
+      OnChange = CheckBox1Change
+      State = cbChecked
+      TabOrder = 1
+    end
   end
   object PageControl1: TPageControl
     Left = 0
-    Height = 360
+    Height = 347
     Top = 0
     Width = 1043
     ActivePage = TabSheet1
@@ -45,13 +60,13 @@ object Form1: TForm1
     TabOrder = 1
     object TabSheet1: TTabSheet
       Caption = 'Test data'
-      ClientHeight = 334
-      ClientWidth = 1035
+      ClientHeight = 313
+      ClientWidth = 1033
       object RxDBGrid1: TRxDBGrid
         Left = 0
-        Height = 334
+        Height = 313
         Top = 0
-        Width = 1035
+        Width = 1033
         ColumnDefValues.BlobText = '(данные)'
         TitleButtons = True
         AutoSort = True
@@ -63,10 +78,9 @@ object Form1: TForm1
             Width = 50
             FieldName = 'ID'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -80,10 +94,9 @@ object Form1: TForm1
             Width = 120
             FieldName = 'PDATE'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -98,10 +111,9 @@ object Form1: TForm1
             Width = 364
             FieldName = 'NAME'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -133,10 +145,9 @@ object Form1: TForm1
             Width = 100
             FieldName = 'SUM'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -172,10 +183,9 @@ object Form1: TForm1
             Width = 60
             FieldName = 'FLAG'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -196,10 +206,9 @@ object Form1: TForm1
             Width = 200
             FieldName = 'Country'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -212,10 +221,9 @@ object Form1: TForm1
             Width = 200
             FieldName = 'Sity'
             EditButtons = <>
-            Filter.IsNull = False
-            Filter.IsAll = True
             Filter.DropDownRows = 0
             Filter.EmptyValue = '(Нет)'
+            Filter.NotEmptyValue = '(Не пусто)'
             Filter.AllValue = '(All values)'
             Filter.EmptyFont.Style = [fsItalic]
             Filter.ItemIndex = -1
@@ -295,7 +303,6 @@ object Form1: TForm1
         DataSource = DataSource1
         Flat = True
         Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgHeaderPushedLook]
-        ParentColor = False
         TabOrder = 0
         TitleStyle = tsNative
       end
@@ -396,8 +403,6 @@ object Form1: TForm1
       ProviderFlags = [pfInUpdate, pfInWhere]
       ReadOnly = False
       Required = False
-      MaxValue = 0
-      MinValue = 0
       Precision = 2
     end
     object RxMemoryData1Country: TStringField
@@ -438,6 +443,7 @@ object Form1: TForm1
   object RxDBGridExportPDF1: TRxDBGridExportPDF
     RxDBGrid = RxDBGrid1
     Caption = 'Export to PDF file'
+    Enabled = True
     FileName = 'test111.pdf'
     Options = [repExportTitle, repExportColors, repExportFooter, repOverwriteExisting, repExportImages]
     PdfOptions.PaperOrientation = ppoLandscape
@@ -554,5 +560,8 @@ object Form1: TForm1
       0000000000000000000000000000000000FF0000000000000000000000000000
       0000000000000000000000000000
     }
+    BitmapAdv = {
+      4C6900000000
+    }
   end
 end

components/rx/trunk/demos/rxdbgrid/RxDbGridExportToPDF/unit1.pas

@@ -15,6 +15,7 @@ type
 
   TForm1 = class(TForm)
     Button1: TButton;
+    CheckBox1: TCheckBox;
     DataSource1: TDataSource;
     ImageList1: TImageList;
     Memo1: TMemo;
@@ -33,6 +34,7 @@ type
     TabSheet1: TTabSheet;
     TabSheet2: TTabSheet;
     procedure Button1Click(Sender: TObject);
+    procedure CheckBox1Change(Sender: TObject);
     procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
     procedure FormCreate(Sender: TObject);
   private
@@ -139,6 +141,11 @@ begin
   RxDBGridExportPDF1.ShowSetupForm:=true;
 end;
 
+procedure TForm1.CheckBox1Change(Sender: TObject);
+begin
+  RxDBGridExportPDF1.Enabled:=CheckBox1.Checked;
+end;
+
 procedure TForm1.FormClose(Sender: TObject; var CloseAction: TCloseAction);
 begin
   FreeAndNil(FontDirList);

components/rx/trunk/rxdb/rxdbgrid.pas

@@ -876,6 +876,7 @@ type
     procedure DoSetColEdtBtn;
     procedure AddTools(ATools:TRxDBGridAbstractTools);
     procedure RemoveTools(ATools:TRxDBGridAbstractTools);
+    procedure UpdateToolsState(ATools:TRxDBGridAbstractTools);
 
     procedure OnDataSetScrolled(aDataSet:TDataSet; Distance: Integer);
     procedure FillFilterData;
@@ -1154,10 +1155,12 @@ type
 
   TRxDBGridAbstractTools = class(TComponent)
   private
+    FEnabled: boolean;
     FOnAfterExecute: TNotifyEvent;
     FOnBeforeExecute: TNotifyEvent;
     FShowSetupForm: boolean;
     procedure ExecTools(Sender:TObject);
+    procedure SetEnabled(AValue: boolean);
   protected
     FRxDBGrid: TRxDBGrid;
     FCaption:string;
@@ -1177,6 +1180,7 @@ type
     property ShowSetupForm:boolean read FShowSetupForm write FShowSetupForm default false;
     property OnBeforeExecute:TNotifyEvent read FOnBeforeExecute write FOnBeforeExecute;
     property OnAfterExecute:TNotifyEvent read FOnAfterExecute write FOnAfterExecute;
+    property Enabled:boolean read FEnabled write SetEnabled default true;
   end;
 
 procedure RegisterRxDBGridSortEngine(RxDBGridSortEngineClass: TRxDBGridSortEngineClass;
@@ -2332,12 +2336,20 @@ begin
   Execute;
 end;
 
+procedure TRxDBGridAbstractTools.SetEnabled(AValue: boolean);
+begin
+  if FEnabled=AValue then Exit;
+  FEnabled:=AValue;
+  FRxDBGrid.UpdateToolsState(Self);
+end;
+
 constructor TRxDBGridAbstractTools.Create(AOwner: TComponent);
 begin
   inherited Create(AOwner);
   FToolsEvents:=[];
   FCaption:=Name;
   FShowSetupForm:=false;
+  FEnabled:=true;
 end;
 
 destructor TRxDBGridAbstractTools.Destroy;
@@ -4065,6 +4077,8 @@ var
   i:integer;
   R: TMenuItem;
 begin
+  if not Assigned(ATools) then Exit;
+
   for i:=8 to F_PopupMenu.Items.Count - 1 do
     if F_PopupMenu.Items[i].Tag = IntPtr(ATools) then
       exit;
@@ -4074,6 +4088,7 @@ begin
   R.Caption := ATools.FCaption;
   R.OnClick := @(ATools.ExecTools);
   R.Tag:=IntPtr(ATools);
+  R.Enabled:=ATools.Enabled;
 
   if Assigned(FToolsList) and (FToolsList.IndexOf(ATools)<0) then
     FToolsList.Add(ATools);
@@ -4097,6 +4112,19 @@ begin
     FToolsList.Remove(ATools);
 end;
 
+procedure TRxDBGrid.UpdateToolsState(ATools: TRxDBGridAbstractTools);
+var
+  i: Integer;
+begin
+  if not Assigned(ATools) then Exit;
+  for i:=8 to F_PopupMenu.Items.Count - 1 do
+    if F_PopupMenu.Items[i].Tag = IntPtr(ATools) then
+    begin
+      F_PopupMenu.Items[i].Enabled:=ATools.Enabled;
+      exit;
+    end;
+end;
+
 procedure TRxDBGrid.OnDataSetScrolled(aDataSet: TDataSet; Distance: Integer);
 begin
   if Assigned(FSaveOnDataSetScrolled) then