From 2ff6da7c686bad47dd247d19a10643d837f2d7a1 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Wed, 6 Aug 2014 10:06:26 +0000
Subject: [PATCH] TRxDBGridPrint - russian resources and demo

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3436 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 .../rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi  | 266 +++++-------------
 .../trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm | 214 +++++++++-----
 .../trunk/Demos/RxDBGrid/rxdbgridmainunit.pas |   7 +-
 components/rx/trunk/languages/rxdconst.ru.po  |  34 +--
 4 files changed, 234 insertions(+), 287 deletions(-)

diff --git a/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi b/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi
index 4875cafc9..c3c002ec7 100644
--- a/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi
+++ b/components/rx/trunk/Demos/RxDBGrid/RxDBGridDemo.lpi
@@ -11,7 +11,6 @@
       <ResourceType Value="res"/>
       <UseXPManifest Value="True"/>
       <Icon Value="0"/>
-      <ActiveWindowIndexAtStart Value="0"/>
     </General>
     <VersionInfo>
       <UseVersionInfo Value="True"/>
@@ -37,30 +36,33 @@
         <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
       </local>
     </RunParams>
-    <RequiredPackages Count="4">
+    <RequiredPackages Count="6">
       <Item1>
-        <PackageName Value="IDEIntf"/>
-        <MinVersion Major="1" Valid="True"/>
+        <PackageName Value="rxdbgrid_export_spreadsheet"/>
       </Item1>
       <Item2>
-        <PackageName Value="FCL"/>
-        <MinVersion Major="1" Valid="True"/>
+        <PackageName Value="rxdbgrid_print"/>
       </Item2>
       <Item3>
-        <PackageName Value="LCL"/>
+        <PackageName Value="IDEIntf"/>
+        <MinVersion Major="1" Valid="True"/>
       </Item3>
       <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="LCL"/>
+      </Item5>
+      <Item6>
         <PackageName Value="rxnew"/>
         <MinVersion Major="1" Release="18" Build="56" Valid="True"/>
-      </Item4>
+      </Item6>
     </RequiredPackages>
     <Units Count="103">
       <Unit0>
         <Filename Value="RxDBGridDemo.lpr"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="RxDBGridDemo"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="1"/>
         <CursorPos X="9" Y="16"/>
         <UsageCount Value="99"/>
       </Unit0>
@@ -71,17 +73,15 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="RxDBGridMainUnit"/>
-        <EditorIndex Value="0"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="62"/>
-        <CursorPos X="15" Y="76"/>
+        <IsVisibleTab Value="True"/>
+        <TopLine Value="66"/>
+        <CursorPos X="15" Y="79"/>
         <UsageCount Value="99"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
       </Unit1>
       <Unit2>
         <Filename Value="../../../fpcsrc/fcl/db/db.pp"/>
-        <UnitName Value="db"/>
         <TopLine Value="1112"/>
         <CursorPos X="17" Y="1116"/>
         <UsageCount Value="5"/>
@@ -94,50 +94,43 @@
       </Unit3>
       <Unit4>
         <Filename Value="../../rxmemds.pas"/>
-        <UnitName Value="rxmemds"/>
         <TopLine Value="337"/>
-        <CursorPos X="1" Y="356"/>
+        <CursorPos Y="356"/>
         <UsageCount Value="5"/>
       </Unit4>
       <Unit5>
         <Filename Value="../../rxdbgrid.pas"/>
         <UnitName Value="rxdbgrid"/>
-        <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="3742"/>
-        <CursorPos X="1" Y="3763"/>
+        <CursorPos Y="3763"/>
         <UsageCount Value="17"/>
         <Bookmarks Count="2">
-          <Item0 X="1" Y="2564" ID="2"/>
-          <Item1 X="1" Y="3763" ID="1"/>
+          <Item0 Y="2564" ID="2"/>
+          <Item1 Y="3763" ID="1"/>
         </Bookmarks>
         <Loaded Value="True"/>
       </Unit5>
       <Unit6>
         <Filename Value="../../../lcl/lresources.pp"/>
-        <UnitName Value="LResources"/>
         <TopLine Value="2626"/>
-        <CursorPos X="1" Y="2644"/>
+        <CursorPos Y="2644"/>
         <UsageCount Value="5"/>
       </Unit6>
       <Unit7>
         <Filename Value="../../../lcl/grids.pas"/>
-        <UnitName Value="Grids"/>
         <TopLine Value="385"/>
         <CursorPos X="33" Y="394"/>
         <UsageCount Value="6"/>
       </Unit7>
       <Unit8>
         <Filename Value="../../../lcl/dbgrids.pas"/>
-        <UnitName Value="DBGrids"/>
         <TopLine Value="187"/>
         <CursorPos X="30" Y="199"/>
         <UsageCount Value="6"/>
       </Unit8>
       <Unit9>
         <Filename Value="../../rxpopupunit.pas"/>
-        <UnitName Value="rxpopupunit"/>
         <TopLine Value="246"/>
         <CursorPos X="15" Y="249"/>
         <UsageCount Value="6"/>
@@ -145,46 +138,41 @@
       <Unit10>
         <Filename Value="../../../lcl/include/wincontrol.inc"/>
         <TopLine Value="7217"/>
-        <CursorPos X="1" Y="7236"/>
+        <CursorPos Y="7236"/>
         <UsageCount Value="5"/>
       </Unit10>
       <Unit11>
         <Filename Value="../../../lcl/include/control.inc"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="1"/>
         <UsageCount Value="5"/>
       </Unit11>
       <Unit12>
         <Filename Value="../../../lcl/lclmessageglue.pas"/>
-        <UnitName Value="LCLMessageGlue"/>
         <TopLine Value="92"/>
         <CursorPos X="46" Y="96"/>
         <UsageCount Value="5"/>
       </Unit12>
       <Unit13>
         <Filename Value="../../../lcl/controls.pp"/>
-        <UnitName Value="Controls"/>
         <TopLine Value="1779"/>
         <CursorPos X="60" Y="1798"/>
         <UsageCount Value="5"/>
       </Unit13>
       <Unit14>
         <Filename Value="../../../install/2/rxdbgrid.diff"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="21"/>
+        <CursorPos Y="21"/>
         <UsageCount Value="5"/>
         <DefaultSyntaxHighlighter Value="Diff"/>
       </Unit14>
       <Unit15>
         <Filename Value="../../../lcl/interfaces/gtk/gtkdevicecontext.inc"/>
         <TopLine Value="626"/>
-        <CursorPos X="1" Y="644"/>
+        <CursorPos Y="644"/>
         <UsageCount Value="5"/>
       </Unit15>
       <Unit16>
         <Filename Value="../../../lcl/interfaces/gtk2/gtk2winapi.inc"/>
         <TopLine Value="559"/>
-        <CursorPos X="1" Y="577"/>
+        <CursorPos Y="577"/>
         <UsageCount Value="5"/>
       </Unit16>
       <Unit17>
@@ -192,16 +180,12 @@
         <ComponentName Value="rxDBGridColumsForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="rxdbgrid_columsunit"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="103"/>
         <CursorPos X="55" Y="103"/>
         <UsageCount Value="11"/>
       </Unit17>
       <Unit18>
         <Filename Value="../../rxdconst.pas"/>
-        <UnitName Value="rxdconst"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="144"/>
         <CursorPos X="21" Y="165"/>
         <UsageCount Value="11"/>
@@ -214,42 +198,35 @@
       </Unit19>
       <Unit20>
         <Filename Value="../../backup/rxdbgrid.pas"/>
-        <UnitName Value="rxdbgrid"/>
         <TopLine Value="1207"/>
-        <CursorPos X="1" Y="1227"/>
+        <CursorPos Y="1227"/>
         <UsageCount Value="5"/>
       </Unit20>
       <Unit21>
         <Filename Value="../../rxaboutdialog.pas"/>
-        <UnitName Value="RxAboutDialog"/>
         <TopLine Value="10"/>
         <CursorPos X="73" Y="30"/>
         <UsageCount Value="6"/>
       </Unit21>
       <Unit22>
         <Filename Value="../../registerrx.pas"/>
-        <UnitName Value="registerrx"/>
         <TopLine Value="174"/>
         <CursorPos X="18" Y="201"/>
         <UsageCount Value="6"/>
       </Unit22>
       <Unit23>
         <Filename Value="../../../ideintf/idewindowintf.pas"/>
-        <UnitName Value="IDEWindowIntf"/>
         <TopLine Value="31"/>
-        <CursorPos X="1" Y="1"/>
         <UsageCount Value="5"/>
       </Unit23>
       <Unit24>
         <Filename Value="../../../lcl/extdlgs.pas"/>
-        <UnitName Value="ExtDlgs"/>
         <TopLine Value="105"/>
         <CursorPos X="35" Y="122"/>
         <UsageCount Value="5"/>
       </Unit24>
       <Unit25>
         <Filename Value="../../../lcl/dialogs.pp"/>
-        <UnitName Value="Dialogs"/>
         <TopLine Value="62"/>
         <CursorPos X="21" Y="79"/>
         <UsageCount Value="5"/>
@@ -262,7 +239,6 @@
       </Unit26>
       <Unit27>
         <Filename Value="../../../lcl/widgetset/wsdialogs.pp"/>
-        <UnitName Value="WSDialogs"/>
         <TopLine Value="132"/>
         <CursorPos X="3" Y="136"/>
         <UsageCount Value="5"/>
@@ -271,28 +247,24 @@
         <Filename Value="../../rxaboutformunit.pas"/>
         <ComponentName Value="rxAboutFormForm"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="rxAboutFormUnit"/>
         <TopLine Value="41"/>
         <CursorPos X="26" Y="55"/>
         <UsageCount Value="6"/>
       </Unit28>
       <Unit29>
         <Filename Value="../../rxversinfo.pas"/>
-        <UnitName Value="RxVersInfo"/>
         <TopLine Value="72"/>
         <CursorPos X="49" Y="105"/>
         <UsageCount Value="5"/>
       </Unit29>
       <Unit30>
         <Filename Value="../../../lcl/buttonpanel.pas"/>
-        <UnitName Value="ButtonPanel"/>
         <TopLine Value="11"/>
         <CursorPos X="6" Y="15"/>
         <UsageCount Value="6"/>
       </Unit30>
       <Unit31>
         <Filename Value="../../../lcl/extctrls.pp"/>
-        <UnitName Value="ExtCtrls"/>
         <TopLine Value="604"/>
         <CursorPos X="15" Y="607"/>
         <UsageCount Value="6"/>
@@ -305,7 +277,6 @@
       </Unit32>
       <Unit33>
         <Filename Value="../../../install/fpcsrc/rtl/objpas/classes/classesh.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="426"/>
         <CursorPos X="17" Y="448"/>
         <UsageCount Value="13"/>
@@ -315,21 +286,17 @@
         <ComponentName Value="smsSendAboutForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="smsSendAboutUnit"/>
         <TopLine Value="28"/>
-        <CursorPos X="1" Y="57"/>
+        <CursorPos Y="57"/>
         <UsageCount Value="6"/>
       </Unit34>
       <Unit35>
         <Filename Value="../../../smsprog/sms_shared/smsabstarctconstunit.pas"/>
-        <UnitName Value="smsAbstarctConstUnit"/>
-        <TopLine Value="1"/>
         <CursorPos X="42" Y="11"/>
         <UsageCount Value="6"/>
       </Unit35>
       <Unit36>
         <Filename Value="../../rxconst.pas"/>
-        <UnitName Value="rxconst"/>
         <TopLine Value="34"/>
         <CursorPos X="3" Y="51"/>
         <UsageCount Value="6"/>
@@ -339,7 +306,6 @@
         <ComponentName Value="smssendParamsForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="smssendParamsUnit"/>
         <TopLine Value="49"/>
         <CursorPos X="34" Y="60"/>
         <UsageCount Value="6"/>
@@ -349,50 +315,40 @@
         <ComponentName Value="smsSendDemoMainForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="smsSendDemoMainUnit"/>
         <TopLine Value="41"/>
         <CursorPos X="105" Y="29"/>
         <UsageCount Value="6"/>
       </Unit38>
       <Unit39>
         <Filename Value="../../../rxnet/demo/send_demo/send_demo.lpr"/>
-        <UnitName Value="send_demo"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="1"/>
         <UsageCount Value="6"/>
       </Unit39>
       <Unit40>
         <Filename Value="../../../doceditor/lazdeopts.pp"/>
-        <UnitName Value="LazDEOpts"/>
         <TopLine Value="43"/>
-        <CursorPos X="1" Y="56"/>
+        <CursorPos Y="56"/>
         <UsageCount Value="6"/>
       </Unit40>
       <Unit41>
         <Filename Value="../../rxfileutils.pas"/>
-        <UnitName Value="rxFileUtils"/>
         <TopLine Value="18"/>
         <CursorPos X="33" Y="42"/>
         <UsageCount Value="6"/>
       </Unit41>
       <Unit42>
         <Filename Value="../../registerrxdb.pas"/>
-        <UnitName Value="RegisterRxDB"/>
         <TopLine Value="2"/>
         <CursorPos X="20" Y="17"/>
         <UsageCount Value="6"/>
       </Unit42>
       <Unit43>
         <Filename Value="../../../ideintf/dbpropedits.pas"/>
-        <UnitName Value="DBPropEdits"/>
         <TopLine Value="13"/>
         <CursorPos X="6" Y="19"/>
         <UsageCount Value="6"/>
       </Unit43>
       <Unit44>
         <Filename Value="../../../ideintf/propedits.pp"/>
-        <UnitName Value="PropEdits"/>
-        <TopLine Value="1"/>
         <CursorPos X="6" Y="26"/>
         <UsageCount Value="6"/>
       </Unit44>
@@ -401,61 +357,47 @@
         <ComponentName Value="rxDBGridFindForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="rxdbgrid_findunit"/>
         <TopLine Value="78"/>
-        <CursorPos X="1" Y="94"/>
+        <CursorPos Y="94"/>
         <UsageCount Value="6"/>
       </Unit45>
       <Unit46>
         <Filename Value="../../rxtoolbar.pas"/>
-        <UnitName Value="rxtoolbar"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="1"/>
         <CursorPos X="52" Y="26"/>
         <UsageCount Value="8"/>
       </Unit46>
       <Unit47>
         <Filename Value="../../../synedit/synedit.pp"/>
-        <UnitName Value="SynEdit"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="5699"/>
-        <CursorPos X="1" Y="5702"/>
+        <CursorPos Y="5702"/>
         <UsageCount Value="13"/>
       </Unit47>
       <Unit48>
         <Filename Value="../../../synedit/syneditkeycmds.pp"/>
-        <UnitName Value="SynEditKeyCmds"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="750"/>
         <CursorPos X="3" Y="752"/>
         <UsageCount Value="9"/>
       </Unit48>
       <Unit49>
         <Filename Value="../../../install/fpcsrc/rtl/objpas/classes/classes.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="429"/>
         <CursorPos X="33" Y="447"/>
         <UsageCount Value="6"/>
       </Unit49>
       <Unit50>
         <Filename Value="../../../lcl/actnlist.pas"/>
-        <UnitName Value="ActnList"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="206"/>
         <CursorPos X="33" Y="224"/>
         <UsageCount Value="6"/>
       </Unit50>
       <Unit51>
         <Filename Value="../../../lcl/lclproc.pas"/>
-        <UnitName Value="LCLProc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1154"/>
         <CursorPos X="10" Y="1165"/>
         <UsageCount Value="6"/>
       </Unit51>
       <Unit52>
         <Filename Value="rxdbgridmainunit.lfm"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="133"/>
         <CursorPos X="5" Y="103"/>
         <UsageCount Value="7"/>
@@ -463,54 +405,42 @@
       </Unit52>
       <Unit53>
         <Filename Value="../../../install/fpcsrc/rtl/objpas/classes/collect.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="286"/>
-        <CursorPos X="1" Y="288"/>
+        <CursorPos Y="288"/>
         <UsageCount Value="12"/>
       </Unit53>
       <Unit54>
         <Filename Value="../../../wine/1/1/rx.diff"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="9"/>
+        <CursorPos Y="9"/>
         <UsageCount Value="7"/>
         <DefaultSyntaxHighlighter Value="Diff"/>
       </Unit54>
       <Unit55>
         <Filename Value="../../../install/fpcsrc/packages/fcl-db/src/base/db.pas"/>
-        <UnitName Value="db"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="541"/>
-        <CursorPos X="1" Y="569"/>
+        <CursorPos Y="569"/>
         <UsageCount Value="7"/>
       </Unit55>
       <Unit56>
         <Filename Value="../../../lcl/include/canvas.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1116"/>
-        <CursorPos X="1" Y="1132"/>
+        <CursorPos Y="1132"/>
         <UsageCount Value="8"/>
       </Unit56>
       <Unit57>
         <Filename Value="../../exsortsql.pas"/>
-        <UnitName Value="exsortsql"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="69"/>
         <CursorPos X="49" Y="3"/>
         <UsageCount Value="7"/>
       </Unit57>
       <Unit58>
         <Filename Value="../../../../lcl/dbgrids.pas"/>
-        <UnitName Value="DBGrids"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="216"/>
         <CursorPos X="3" Y="216"/>
         <UsageCount Value="19"/>
       </Unit58>
       <Unit59>
         <Filename Value="../../../../lcl/grids.pas"/>
-        <UnitName Value="Grids"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="11283"/>
         <CursorPos X="45" Y="11304"/>
         <UsageCount Value="22"/>
@@ -520,62 +450,49 @@
       </Unit59>
       <Unit60>
         <Filename Value="../../../../../../install/fpcsrc/rtl/objpas/classes/classesh.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1554"/>
         <CursorPos X="38" Y="1569"/>
         <UsageCount Value="7"/>
       </Unit60>
       <Unit61>
         <Filename Value="../../../../lcl/buttons.pp"/>
-        <UnitName Value="Buttons"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="333"/>
         <CursorPos X="3" Y="360"/>
         <UsageCount Value="7"/>
       </Unit61>
       <Unit62>
         <Filename Value="../../../../../../install/fpcsrc/packages/fcl-db/src/base/db.pas"/>
-        <UnitName Value="db"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1588"/>
         <CursorPos X="15" Y="1609"/>
         <UsageCount Value="7"/>
       </Unit62>
       <Unit63>
         <Filename Value="../../vclutils.pas"/>
-        <UnitName Value="vclutils"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="35"/>
+        <CursorPos Y="35"/>
         <UsageCount Value="9"/>
       </Unit63>
       <Unit64>
         <Filename Value="../../../../lcl/include/canvas.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1317"/>
-        <CursorPos X="1" Y="1338"/>
+        <CursorPos Y="1338"/>
         <UsageCount Value="7"/>
       </Unit64>
       <Unit65>
         <Filename Value="../../../../lcl/graphics.pp"/>
-        <UnitName Value="Graphics"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="93"/>
         <CursorPos X="3" Y="99"/>
         <UsageCount Value="8"/>
       </Unit65>
       <Unit66>
         <Filename Value="../../../../lcl/include/lclintf.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="132"/>
-        <CursorPos X="1" Y="155"/>
+        <CursorPos Y="155"/>
         <UsageCount Value="7"/>
       </Unit66>
       <Unit67>
         <Filename Value="../../../../lcl/interfaces/gtk2/gtk2lclintf.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="167"/>
-        <CursorPos X="1" Y="190"/>
+        <CursorPos Y="190"/>
         <UsageCount Value="7"/>
       </Unit67>
       <Unit68>
@@ -583,8 +500,6 @@
         <ComponentName Value="rxSortByForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="rxsortby"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="50"/>
         <CursorPos X="14" Y="65"/>
         <UsageCount Value="9"/>
@@ -594,260 +509,207 @@
         <ComponentName Value="rxFilterByForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="rxfilterby"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="315"/>
-        <CursorPos X="1" Y="350"/>
+        <CursorPos Y="350"/>
         <UsageCount Value="7"/>
       </Unit69>
       <Unit70>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/classes/classesh.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="72"/>
         <CursorPos X="30" Y="95"/>
         <UsageCount Value="11"/>
       </Unit70>
       <Unit71>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/classes/stringl.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="593"/>
         <CursorPos X="3" Y="598"/>
         <UsageCount Value="7"/>
       </Unit71>
       <Unit72>
         <Filename Value="../../rxstrutils.pas"/>
-        <UnitName Value="rxstrutils"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="140"/>
         <CursorPos X="23" Y="168"/>
         <UsageCount Value="7"/>
       </Unit72>
       <Unit73>
         <Filename Value="../../rxlookup.pas"/>
-        <UnitName Value="rxlookup"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1176"/>
         <CursorPos X="3" Y="1196"/>
         <UsageCount Value="14"/>
       </Unit73>
       <Unit74>
         <Filename Value="../../../../../../install/source/fpcsrc/packages/fcl-db/src/base/db.pas"/>
-        <UnitName Value="db"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="1776"/>
         <CursorPos X="14" Y="1796"/>
         <UsageCount Value="14"/>
       </Unit74>
       <Unit75>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/classes/collect.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="397"/>
         <CursorPos X="3" Y="399"/>
         <UsageCount Value="11"/>
       </Unit75>
       <Unit76>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/classes/lists.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="131"/>
         <CursorPos X="3" Y="133"/>
         <UsageCount Value="11"/>
       </Unit76>
       <Unit77>
         <Filename Value="../../rxsortmemds.pas"/>
-        <UnitName Value="rxsortmemds"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="16"/>
-        <CursorPos X="1" Y="1"/>
         <UsageCount Value="8"/>
       </Unit77>
       <Unit78>
         <Filename Value="../../../../lcl/controls.pp"/>
-        <UnitName Value="Controls"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="2126"/>
         <CursorPos X="15" Y="2146"/>
         <UsageCount Value="11"/>
       </Unit78>
       <Unit79>
         <Filename Value="../../../../lcl/stdctrls.pp"/>
-        <UnitName Value="StdCtrls"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="233"/>
         <CursorPos X="3" Y="254"/>
         <UsageCount Value="9"/>
       </Unit79>
       <Unit80>
         <Filename Value="../../../../lcl/lcltype.pp"/>
-        <UnitName Value="LCLType"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="439"/>
         <CursorPos X="3" Y="433"/>
         <UsageCount Value="10"/>
       </Unit80>
       <Unit81>
         <Filename Value="../../../../lcl/include/customcontrol.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="70"/>
         <CursorPos X="3" Y="79"/>
         <UsageCount Value="9"/>
       </Unit81>
       <Unit82>
         <Filename Value="../../../../lcl/include/wincontrol.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="7862"/>
         <CursorPos X="3" Y="7901"/>
         <UsageCount Value="11"/>
       </Unit82>
       <Unit83>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/types.pp"/>
-        <UnitName Value="types"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="70"/>
         <CursorPos X="16" Y="91"/>
         <UsageCount Value="10"/>
       </Unit83>
       <Unit84>
         <Filename Value="../../../../lcl/include/control.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="3955"/>
-        <CursorPos X="1" Y="3977"/>
+        <CursorPos Y="3977"/>
         <UsageCount Value="10"/>
       </Unit84>
       <Unit85>
         <Filename Value="../../../../lcl/include/scrollingwincontrol.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="65"/>
-        <CursorPos X="1" Y="87"/>
+        <CursorPos Y="87"/>
         <UsageCount Value="10"/>
       </Unit85>
       <Unit86>
         <Filename Value="../../../../lcl/include/customform.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="732"/>
-        <CursorPos X="1" Y="761"/>
+        <CursorPos Y="761"/>
         <UsageCount Value="10"/>
       </Unit86>
       <Unit87>
         <Filename Value="../../../../lcl/editbtn.pas"/>
-        <UnitName Value="EditBtn"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="648"/>
-        <CursorPos X="1" Y="670"/>
+        <CursorPos Y="670"/>
         <UsageCount Value="10"/>
       </Unit87>
       <Unit88>
         <Filename Value="../../../../lcl/include/winapi.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="596"/>
-        <CursorPos X="1" Y="618"/>
+        <CursorPos Y="618"/>
         <UsageCount Value="10"/>
       </Unit88>
       <Unit89>
         <Filename Value="../../../../lcl/lclintf.pas"/>
-        <UnitName Value="LCLIntf"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="63"/>
         <CursorPos X="39" Y="49"/>
         <UsageCount Value="10"/>
       </Unit89>
       <Unit90>
         <Filename Value="../../../../lcl/include/lclintfh.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="130"/>
-        <CursorPos X="1" Y="130"/>
+        <CursorPos Y="130"/>
         <UsageCount Value="10"/>
       </Unit90>
       <Unit91>
         <Filename Value="../../../../lcl/lmessages.pp"/>
-        <UnitName Value="LMessages"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="241"/>
-        <CursorPos X="1" Y="256"/>
+        <CursorPos Y="256"/>
         <UsageCount Value="11"/>
       </Unit91>
       <Unit92>
         <Filename Value="../../../../lcl/forms.pp"/>
-        <UnitName Value="Forms"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="248"/>
         <CursorPos X="16" Y="285"/>
         <UsageCount Value="11"/>
       </Unit92>
       <Unit93>
         <Filename Value="../../../../lcl/include/customframe.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="184"/>
         <CursorPos X="3" Y="186"/>
         <UsageCount Value="10"/>
       </Unit93>
       <Unit94>
         <Filename Value="../../../../lcl/lclversion.pas"/>
-        <UnitName Value="LCLVersion"/>
-        <WindowIndex Value="0"/>
-        <TopLine Value="1"/>
-        <CursorPos X="1" Y="1"/>
         <UsageCount Value="11"/>
       </Unit94>
       <Unit95>
         <Filename Value="../../rx.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="42"/>
-        <CursorPos X="1" Y="63"/>
+        <CursorPos Y="63"/>
         <UsageCount Value="10"/>
       </Unit95>
       <Unit96>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/objpas/classes/classes.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="846"/>
         <CursorPos X="3" Y="851"/>
         <UsageCount Value="10"/>
       </Unit96>
       <Unit97>
         <Filename Value="../../../../lcl/clipbrd.pp"/>
-        <UnitName Value="Clipbrd"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="176"/>
         <CursorPos X="15" Y="190"/>
         <UsageCount Value="10"/>
       </Unit97>
       <Unit98>
         <Filename Value="../../../../lcl/include/clipbrd.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="178"/>
         <CursorPos X="3" Y="180"/>
         <UsageCount Value="10"/>
       </Unit98>
       <Unit99>
         <Filename Value="../../../../../../install/source/fpcsrc/rtl/inc/objpash.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="178"/>
         <CursorPos X="23" Y="193"/>
         <UsageCount Value="10"/>
       </Unit99>
       <Unit100>
         <Filename Value="../../../../lcl/buttonpanel.pas"/>
-        <UnitName Value="ButtonPanel"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="339"/>
-        <CursorPos X="1" Y="349"/>
+        <CursorPos Y="349"/>
         <UsageCount Value="11"/>
       </Unit100>
       <Unit101>
         <Filename Value="/home/alexs/install/source/fpcsrc/rtl/objpas/classes/classesh.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="468"/>
         <CursorPos X="15" Y="489"/>
         <UsageCount Value="10"/>
       </Unit101>
       <Unit102>
         <Filename Value="/home/alexs/install/source/fpcsrc/rtl/objpas/classes/collect.inc"/>
-        <WindowIndex Value="0"/>
         <TopLine Value="41"/>
         <CursorPos X="2" Y="44"/>
         <UsageCount Value="10"/>
       </Unit102>
     </Units>
-    <JumpHistory Count="8" HistoryIndex="7">
+    <JumpHistory Count="14" HistoryIndex="13">
       <Position1>
         <Filename Value="../../rxdbgrid.pas"/>
         <Caret Line="867" Column="35" TopLine="845"/>
@@ -870,7 +732,7 @@
       </Position5>
       <Position6>
         <Filename Value="../../rxdbgrid.pas"/>
-        <Caret Line="5712" Column="1" TopLine="5677"/>
+        <Caret Line="5712" TopLine="5677"/>
       </Position6>
       <Position7>
         <Filename Value="../../rxdbgrid.pas"/>
@@ -880,6 +742,30 @@
         <Filename Value="../../rxdbgrid.pas"/>
         <Caret Line="875" Column="63" TopLine="854"/>
       </Position8>
+      <Position9>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="76" Column="15" TopLine="62"/>
+      </Position9>
+      <Position10>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="75" Column="15" TopLine="62"/>
+      </Position10>
+      <Position11>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="76" Column="15" TopLine="63"/>
+      </Position11>
+      <Position12>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="77" Column="15" TopLine="64"/>
+      </Position12>
+      <Position13>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="79" Column="15" TopLine="66"/>
+      </Position13>
+      <Position14>
+        <Filename Value="rxdbgridmainunit.pas"/>
+        <Caret Line="78" Column="15" TopLine="65"/>
+      </Position14>
     </JumpHistory>
   </ProjectOptions>
   <CompilerOptions>
@@ -903,9 +789,6 @@
         </Win32>
       </Options>
     </Linking>
-    <Other>
-      <CompilerPath Value="$(CompPath)"/>
-    </Other>
   </CompilerOptions>
   <Debugging>
     <Watches Count="5">
@@ -934,5 +817,4 @@
       </Item2>
     </Exceptions>
   </Debugging>
-  <EditorMacros Count="0"/>
 </CONFIG>
diff --git a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm
index c6f47c29a..d86ab9643 100644
--- a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm
+++ b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.lfm
@@ -1,11 +1,11 @@
 object RxDBGridMainForm: TRxDBGridMainForm
-  Left = 59
+  Left = 363
   Height = 721
-  Top = 36
+  Top = 238
   Width = 1187
   ActiveControl = Panel1
   Caption = 'RxDBGrid Demo'
-  ClientHeight = 696
+  ClientHeight = 694
   ClientWidth = 1187
   Menu = MainMenu1
   OnCreate = FormCreate
@@ -13,8 +13,8 @@ object RxDBGridMainForm: TRxDBGridMainForm
   LCLVersion = '1.3'
   object RxDBGrid1: TRxDBGrid
     Left = 0
-    Height = 630
-    Top = 66
+    Height = 624
+    Top = 70
     Width = 1187
     TitleButtons = True
     AutoSort = True
@@ -29,18 +29,18 @@ object RxDBGridMainForm: TRxDBGridMainForm
         FieldName = 'DEVELOPER_ID'
         Constraints.MinWidth = 50
         Constraints.MaxWidth = 150
+        EditButtons = <>
+        Filter.Font.Style = [fsItalic]
+        Filter.DropDownRows = 0
+        Filter.EmptyValue = '(Нет)'
+        Filter.EmptyFont.Style = [fsItalic]
+        Filter.ItemIndex = -1
         ImageList = ImageList1
         KeyList.Strings = (
           '1=0'
           '2=1'
           '3=2'
         )
-        Filter.Font.Style = [fsItalic]
-        Filter.DropDownRows = 0
-        Filter.EmptyValue = '(Нет)'
-        Filter.EmptyFont.Style = [fsItalic]
-        Filter.ItemIndex = -1
-        EditButtons = <>
       end    
       item
         Title.Alignment = taCenter
@@ -50,18 +50,16 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Title.ShowHint = True
         Width = 100
         FieldName = 'ID'
-        Footer.Alignment = taRightJustify
-        Footer.DisplayFormat = 'Count: %d'
-        Footer.ValueType = fvtCount
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
+        EditButtons = <>
         Filter.Font.Style = [fsItalic]
         Filter.DropDownRows = 0
         Filter.Color = clLime
         Filter.EmptyValue = '(Нет)'
         Filter.EmptyFont.Style = [fsItalic]
         Filter.ItemIndex = -1
-        EditButtons = <>
+        Footer.Alignment = taRightJustify
+        Footer.DisplayFormat = 'Count: %d'
+        Footer.ValueType = fvtCount
       end    
       item
         Title.Alignment = taCenter
@@ -72,14 +70,13 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Width = 136
         FieldName = 'Developer'
         Constraints.MinWidth = 10
-        Constraints.MaxWidth = 0
+        EditButtons = <>
         Filter.Font.Style = [fsItalic]
         Filter.DropDownRows = 0
         Filter.Color = clLime
         Filter.EmptyValue = '(Нет)'
         Filter.EmptyFont.Style = [fsItalic]
         Filter.ItemIndex = -1
-        EditButtons = <>
       end    
       item
         Title.Alignment = taCenter
@@ -89,15 +86,13 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Title.ShowHint = True
         Width = 110
         FieldName = 'NAME'
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
+        EditButtons = <>
         Filter.Font.Style = [fsItalic]
         Filter.DropDownRows = 0
         Filter.Color = clLime
         Filter.EmptyValue = '(Нет)'
         Filter.EmptyFont.Style = [fsItalic]
         Filter.ItemIndex = -1
-        EditButtons = <>
         WordWrap = True
       end    
       item
@@ -109,18 +104,6 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Width = 136
         FieldName = 'PRICE'
         DisplayFormat = '#,##0.00'
-        Footer.Alignment = taRightJustify
-        Footer.DisplayFormat = '#,##0.00'
-        Footer.FieldName = 'PRICE'
-        Footer.ValueType = fvtSum
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
-        Filter.Font.Style = [fsItalic]
-        Filter.DropDownRows = 0
-        Filter.Color = clLime
-        Filter.EmptyValue = '(Нет)'
-        Filter.EmptyFont.Style = [fsItalic]
-        Filter.ItemIndex = -1
         EditButtons = <        
           item
             Glyph.Data = {
@@ -135,6 +118,16 @@ object RxDBGridMainForm: TRxDBGridMainForm
             Hint = 'Clear value'
             OnClick = TRxColumnEditButtons2Click
           end>
+        Filter.Font.Style = [fsItalic]
+        Filter.DropDownRows = 0
+        Filter.Color = clLime
+        Filter.EmptyValue = '(Нет)'
+        Filter.EmptyFont.Style = [fsItalic]
+        Filter.ItemIndex = -1
+        Footer.Alignment = taRightJustify
+        Footer.DisplayFormat = '#,##0.00'
+        Footer.FieldName = 'PRICE'
+        Footer.ValueType = fvtSum
       end    
       item
         Title.Alignment = taCenter
@@ -144,14 +137,12 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Title.ShowHint = True
         Width = 136
         FieldName = 'Date_Present'
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
+        EditButtons = <>
         Filter.Font.Style = [fsItalic]
         Filter.DropDownRows = 0
         Filter.EmptyValue = '(Нет)'
         Filter.EmptyFont.Style = [fsItalic]
         Filter.ItemIndex = -1
-        EditButtons = <>
       end    
       item
         Title.Alignment = taCenter
@@ -161,14 +152,12 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Title.ShowHint = True
         Width = 141
         FieldName = 'DEVELOPER_ID'
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
+        EditButtons = <>
         Filter.Font.Style = [fsItalic]
         Filter.DropDownRows = 0
         Filter.EmptyValue = '(Нет)'
         Filter.EmptyFont.Style = [fsItalic]
         Filter.ItemIndex = -1
-        EditButtons = <>
       end    
       item
         ButtonStyle = cbsPickList
@@ -181,13 +170,6 @@ object RxDBGridMainForm: TRxDBGridMainForm
         Title.Caption = 'Rait'
         Title.Orientation = toHorizontal
         FieldName = 'RAIT'
-        Constraints.MinWidth = 0
-        Constraints.MaxWidth = 0
-        Filter.Font.Style = [fsItalic]
-        Filter.DropDownRows = 0
-        Filter.EmptyValue = '(Нет)'
-        Filter.EmptyFont.Style = [fsItalic]
-        Filter.ItemIndex = -1
         DirectInput = False
         EditButtons = <        
           item
@@ -226,11 +208,71 @@ object RxDBGridMainForm: TRxDBGridMainForm
             Hint = 'Вторая кнопка'
             OnClick = TRxColumnEditButtons1Click
           end>
+        Filter.Font.Style = [fsItalic]
+        Filter.DropDownRows = 0
+        Filter.EmptyValue = '(Нет)'
+        Filter.EmptyFont.Style = [fsItalic]
+        Filter.ItemIndex = -1
+      end>
+    KeyStrokes = <    
+      item
+        Command = rxgcShowFindDlg
+        ShortCut = 16454
+        Enabled = True
+      end    
+      item
+        Command = rxgcShowColumnsDlg
+        ShortCut = 16471
+        Enabled = True
+      end    
+      item
+        Command = rxgcShowFilterDlg
+        ShortCut = 16468
+        Enabled = True
+      end    
+      item
+        Command = rxgcShowSortDlg
+        ShortCut = 16467
+        Enabled = True
+      end    
+      item
+        Command = rxgcShowQuickFilter
+        ShortCut = 16465
+        Enabled = True
+      end    
+      item
+        Command = rxgcHideQuickFilter
+        ShortCut = 16456
+        Enabled = True
+      end    
+      item
+        Command = rxgcSelectAll
+        ShortCut = 16449
+        Enabled = True
+      end    
+      item
+        Command = rxgcDeSelectAll
+        ShortCut = 16429
+        Enabled = True
+      end    
+      item
+        Command = rxgcInvertSelection
+        ShortCut = 16426
+        Enabled = True
+      end    
+      item
+        Command = rxgcOptimizeColumnsWidth
+        ShortCut = 16427
+        Enabled = True
+      end    
+      item
+        Command = rxgcCopyCellValue
+        ShortCut = 16451
+        Enabled = True
       end>
     FooterOptions.Active = True
     FooterOptions.Color = clYellow
     FooterOptions.RowCount = 1
-    PropertyStorage = XMLPropStorage1
     Version = 1
     OptionsRx = [rdgAllowColumnsForm, rdgAllowDialogFind, rdgHighlightFocusCol, rdgHighlightFocusRow, rdgDblClickOptimizeColWidth, rdgFooterRows, rdgXORColSizing, rdgMultiTitleLines, rdgAllowQuickSearch, rdgAllowQuickFilter, rdgAllowFilterForm, rdgAllowSortForm, rdgAllowToolMenu]
     FooterColor = clYellow
@@ -252,22 +294,22 @@ object RxDBGridMainForm: TRxDBGridMainForm
   end
   object Panel1: TPanel
     Left = 0
-    Height = 66
+    Height = 70
     Top = 0
     Width = 1187
     Align = alTop
     AutoSize = True
-    ClientHeight = 66
+    ClientHeight = 70
     ClientWidth = 1187
     TabOrder = 1
     object Label1: TLabel
       AnchorSideLeft.Control = Button2
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = Panel1
-      Left = 260
-      Height = 19
+      Left = 270
+      Height = 21
       Top = 7
-      Width = 33
+      Width = 36
       BorderSpacing.Around = 6
       Caption = 'Mode'
       ParentColor = False
@@ -276,9 +318,9 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = Panel1
       AnchorSideTop.Control = Panel1
       Left = 7
-      Height = 31
+      Height = 33
       Top = 7
-      Width = 85
+      Width = 87
       Action = actCalcTotal
       AutoSize = True
       BorderSpacing.Around = 6
@@ -288,10 +330,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = Button1
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = Panel1
-      Left = 98
-      Height = 31
+      Left = 100
+      Height = 33
       Top = 7
-      Width = 156
+      Width = 164
       Action = actOptimizeColumnsWidthAll
       AutoSize = True
       BorderSpacing.Around = 6
@@ -302,11 +344,11 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = CheckBox2
       AnchorSideTop.Side = asrBottom
-      Left = 489
+      Left = 499
       Height = 23
       Hint = 'Use filter line'
       Top = 36
-      Width = 79
+      Width = 82
       BorderSpacing.Left = 6
       Caption = 'Use filter'
       OnChange = CheckBox1Change
@@ -316,9 +358,9 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = Label1
       AnchorSideTop.Control = Label1
       AnchorSideTop.Side = asrBottom
-      Left = 266
-      Height = 27
-      Top = 32
+      Left = 276
+      Height = 29
+      Top = 34
       Width = 217
       BorderSpacing.Around = 6
       ItemHeight = 0
@@ -336,11 +378,11 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = ComboBox1
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = Panel1
-      Left = 489
+      Left = 499
       Height = 23
       Hint = 'Auto fill column width'
       Top = 7
-      Width = 125
+      Width = 131
       BorderSpacing.Around = 6
       Caption = 'Auto fill columns'
       OnChange = CheckBox2Change
@@ -350,10 +392,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = CheckBox2
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = Panel1
-      Left = 620
+      Left = 636
       Height = 23
       Top = 7
-      Width = 115
+      Width = 119
       BorderSpacing.Around = 6
       Caption = 'Show indicator'
       Checked = True
@@ -366,10 +408,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = CheckBox3
       AnchorSideTop.Side = asrBottom
-      Left = 620
+      Left = 636
       Height = 23
       Top = 36
-      Width = 110
+      Width = 115
       BorderSpacing.Around = 6
       Caption = 'Show headers'
       Checked = True
@@ -381,10 +423,10 @@ object RxDBGridMainForm: TRxDBGridMainForm
       AnchorSideLeft.Control = CheckBox3
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = Panel1
-      Left = 741
+      Left = 761
       Height = 23
       Top = 7
-      Width = 93
+      Width = 94
       BorderSpacing.Around = 6
       Caption = 'Word wrap'
       OnChange = CheckBox5Change
@@ -636,11 +678,6 @@ object RxDBGridMainForm: TRxDBGridMainForm
       Size = 130
     end
   end
-  object XMLPropStorage1: TXMLPropStorage
-    StoredValues = <>
-    left = 272
-    top = 128
-  end
   object ImageList1: TImageList
     left = 152
     top = 348
@@ -1296,4 +1333,29 @@ object RxDBGridMainForm: TRxDBGridMainForm
     left = 856
     top = 48
   end
+  object RxIniPropStorage1: TRxIniPropStorage
+    StoredValues = <>
+    SeparateFiles = False
+    left = 464
+    top = 192
+  end
+  object RxDBGridExportSpreadSheet1: TRxDBGridExportSpreadSheet
+    RxDBGrid = RxDBGrid1
+    Caption = 'Export data'
+    ShowSetupForm = True
+    PageName = 'RxDBGrid demo'
+    Options = [ressExportTitle, ressExportColors, ressExportFooter, ressOverwriteExisting]
+    left = 504
+    top = 270
+  end
+  object RxDBGridPrint1: TRxDBGridPrint
+    RxDBGrid = RxDBGrid1
+    Caption = 'Print list'
+    ShowSetupForm = True
+    Options = [rxpoShowTitle, rxpoShowFooter, rxpoShowGridColor, rxpoShowFooterColor, rxpoShowReportTitle]
+    ShowProgress = True
+    ReportTitle = 'RxDBGrid demo'
+    left = 548
+    top = 269
+  end
 end
diff --git a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.pas b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.pas
index 9f510adb4..960d1e1a9 100644
--- a/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.pas
+++ b/components/rx/trunk/Demos/RxDBGrid/rxdbgridmainunit.pas
@@ -6,7 +6,8 @@ interface
 
 uses
   Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, rxmemds,
-  DB, rxdbgrid, RxAboutDialog, ExtCtrls, Buttons, Menus, ActnList, StdCtrls,
+  DB, rxdbgrid, RxAboutDialog, RxIniPropStorage, RxDBGridPrintGrid,
+  RxDBGridExportSpreadSheet, ExtCtrls, Buttons, Menus, ActnList, StdCtrls,
   DBGrids, XMLPropStorage, types;
 
 type
@@ -21,6 +22,9 @@ type
     MenuItem8: TMenuItem;
     MenuItem9: TMenuItem;
     RxAboutDialog1: TRxAboutDialog;
+    RxDBGridExportSpreadSheet1: TRxDBGridExportSpreadSheet;
+    RxDBGridPrint1: TRxDBGridPrint;
+    RxIniPropStorage1: TRxIniPropStorage;
     RxMemoryData1RAIT: TStringField;
     SpeedButton1: TSpeedButton;
     sysExit: TAction;
@@ -62,7 +66,6 @@ type
     RxMemoryData2: TRxMemoryData;
     RxMemoryData2DEVELOPER_ID1: TLongintField;
     RxMemoryData2DEVELOPER_NAME1: TStringField;
-    XMLPropStorage1: TXMLPropStorage;
     procedure actCalcTotalExecute(Sender: TObject);
     procedure actOptimizeColumnsWidthAllExecute(Sender: TObject);
     procedure actOptimizeWidthCol1Execute(Sender: TObject);
diff --git a/components/rx/trunk/languages/rxdconst.ru.po b/components/rx/trunk/languages/rxdconst.ru.po
index ebb15536b..995112dde 100644
--- a/components/rx/trunk/languages/rxdconst.ru.po
+++ b/components/rx/trunk/languages/rxdconst.ru.po
@@ -7,7 +7,7 @@ msgstr "Программа \"%s\""
 
 #: rxdconst.sbottomcaption
 msgid "Bottom"
-msgstr ""
+msgstr "Низ"
 
 #: rxdconst.sbrowsedata
 msgid "browse"
@@ -169,11 +169,11 @@ msgstr "Ошибка в имени пользователя или пароле"
 
 #: rxdconst.slandscape
 msgid "Landscape"
-msgstr ""
+msgstr "Аольбом"
 
 #: rxdconst.sleftcaption
 msgid "Left"
-msgstr ""
+msgstr "Левая"
 
 #: rxdconst.slocaldatabase
 msgid "Unable complete this operation on local dataset"
@@ -217,7 +217,7 @@ msgstr "Открыть после экспорта"
 
 #: rxdconst.sorientation
 msgid "Orientation"
-msgstr ""
+msgstr "Ориентация"
 
 #: rxdconst.soverwriteexisting
 msgid "Overwrite existing"
@@ -225,7 +225,7 @@ msgstr "Перезаписать существующее"
 
 #: rxdconst.spagemargins
 msgid "Page margins"
-msgstr ""
+msgstr "Отступы на странице"
 
 #: rxdconst.spagename
 msgid "Page name"
@@ -249,7 +249,7 @@ msgstr "Новый пароль и подтверждение не совпад
 
 #: rxdconst.sportrait
 msgid "Portrait"
-msgstr ""
+msgstr "Портрет"
 
 #: rxdconst.sprevbutton
 msgid "&Prior"
@@ -257,11 +257,11 @@ msgstr "&Превыдущие"
 
 #: rxdconst.sprintgrid
 msgid "Print grid"
-msgstr ""
+msgstr "Печать списка"
 
 #: rxdconst.sprintoptions
 msgid "Print options"
-msgstr ""
+msgstr "Параметры печати"
 
 #: rxdconst.spropdefbylookup
 msgid "PropDefByLookup"
@@ -273,7 +273,7 @@ msgstr "Регистрация"
 
 #: rxdconst.sreporttitle
 msgid "Report title"
-msgstr ""
+msgstr "Заголовок отчёта"
 
 #: rxdconst.sretrylogin
 msgid "Retry to connect with database?"
@@ -281,7 +281,7 @@ msgstr "Вы хотите повторить попытку соединения
 
 #: rxdconst.srightcaption
 msgid "Right"
-msgstr ""
+msgstr "Справа"
 
 #: rxdconst.srxallfields
 msgid "All fields"
@@ -515,27 +515,27 @@ msgstr "поиск"
 
 #: rxdconst.sshowcolumnheaderonallpage
 msgid "Show column header on all page"
-msgstr ""
+msgstr "Отображать заголовки колонок на всех страницах"
 
 #: rxdconst.sshowfooter
 msgid "Show footer"
-msgstr ""
+msgstr "Отображать итоги"
 
 #: rxdconst.sshowfootercolor
 msgid "Show footer color"
-msgstr ""
+msgstr "Итоги в цвете"
 
 #: rxdconst.sshowgridcolor
 msgid "Show grid color"
-msgstr ""
+msgstr "Список в цвете"
 
 #: rxdconst.sshowreporttitle
 msgid "Show report title"
-msgstr ""
+msgstr "Отображать заголово отчёта"
 
 #: rxdconst.sshowtitle
 msgid "Show column title"
-msgstr ""
+msgstr "Отображать заголовки колонок"
 
 #: rxdconst.stoolsexportspeadsheet
 msgid "Export to speadsheet"
@@ -543,7 +543,7 @@ msgstr "Экспорт в электронную таблицу"
 
 #: rxdconst.stopcaption
 msgid "Top"
-msgstr ""
+msgstr "Сверху"
 
 #: rxdconst.sunknownfieldtype
 msgid "SUnknownFieldType %s"