diff --git a/components/rx/trunk/Demos/RxDbGridExportToPDF/project1.lps b/components/rx/trunk/Demos/RxDbGridExportToPDF/project1.lps
index ec8adaae2..916776d34 100644
--- a/components/rx/trunk/Demos/RxDbGridExportToPDF/project1.lps
+++ b/components/rx/trunk/Demos/RxDbGridExportToPDF/project1.lps
@@ -18,6 +18,7 @@
+
@@ -35,9 +36,12 @@
-
-
+
+
+
+
+
@@ -87,17 +91,15 @@
-
-
-
-
-
-
-
+
+
+
+
+
@@ -641,126 +643,122 @@
-
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
+
-
+
-
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
-
-
diff --git a/components/rx/trunk/Demos/RxDbGridExportToPDF/unit1.lfm b/components/rx/trunk/Demos/RxDbGridExportToPDF/unit1.lfm
index 4ac36931a..620f24566 100644
--- a/components/rx/trunk/Demos/RxDbGridExportToPDF/unit1.lfm
+++ b/components/rx/trunk/Demos/RxDbGridExportToPDF/unit1.lfm
@@ -53,7 +53,7 @@ object Form1: TForm1
Top = 0
Width = 1033
ColumnDefValues.BlobText = '(данные)'
- TitleButtons = False
+ TitleButtons = True
AutoSort = True
Columns = <
item
@@ -70,7 +70,7 @@ object Form1: TForm1
Footers = <>
end
item
- Color = clYellow
+ Color = clSkyBlue
Title.Alignment = taCenter
Title.Orientation = toHorizontal
Title.Caption = 'Дата поставки'
@@ -259,7 +259,7 @@ object Form1: TForm1
FooterOptions.Color = clYellow
FooterOptions.RowCount = 3
FooterOptions.DrawFullLine = True
- OptionsRx = [rdgAllowColumnsForm, rdgAllowDialogFind, rdgFooterRows, rdgAllowQuickFilter, rdgAllowToolMenu]
+ OptionsRx = [rdgAllowColumnsForm, rdgAllowDialogFind, rdgFooterRows, rdgAllowQuickFilter, rdgAllowToolMenu, rdgWordWrapTitles]
FooterColor = clYellow
FooterRowCount = 3
Align = alClient
@@ -269,9 +269,11 @@ object Form1: TForm1
SelectedColor = clHighlight
GridLineStyle = psSolid
DataSource = DataSource1
- Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
+ Flat = True
+ Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgHeaderPushedLook]
ParentColor = False
TabOrder = 0
+ TitleStyle = tsNative
end
end
object TabSheet2: TTabSheet