From 4edac2bf87735b4ba1cecccab2a21dff8073f962 Mon Sep 17 00:00:00 2001
From: alexs75
Date: Fri, 5 Mar 2010 21:57:25 +0000
Subject: [PATCH] license info in files, documentation, new flag in RxDBGrid -
allow quick filter
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1176 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
components/rx/autopanel.pas | 31 ++
components/rx/boxprocs.pas | 38 ++-
components/rx/curredit.pas | 31 ++
components/rx/dateutil.pas | 38 ++-
components/rx/dbdateedit.pas | 31 ++
components/rx/dbutils.pas | 38 ++-
components/rx/docs/rxfpc.xml | 450 ++++++++++++++++++++++++-
components/rx/duallist.pas | 37 +-
components/rx/fduallst.lfm | 14 +-
components/rx/fduallst.lrs | 20 +-
components/rx/fduallst.pas | 37 +-
components/rx/folderlister.pas | 31 ++
components/rx/pagemngr.pas | 31 ++
components/rx/pickdate.pas | 41 ++-
components/rx/registerrx.pas | 40 ++-
components/rx/registerrxdb.pas | 31 ++
components/rx/rx.inc | 34 ++
components/rx/rxaboutdialog.pas | 16 +-
components/rx/rxaboutformunit.pas | 16 +-
components/rx/rxappicon.pas | 31 ++
components/rx/rxapputils.pas | 31 ++
components/rx/rxceeditlookupfields.pas | 31 ++
components/rx/rxclock.pas | 38 ++-
components/rx/rxconst.pas | 38 ++-
components/rx/rxctrls.pas | 38 ++-
components/rx/rxcustomchartpanel.pas | 31 ++
components/rx/rxdbcomb.pas | 37 +-
components/rx/rxdbctrls.pas | 31 ++
components/rx/rxdbgrid.pas | 39 ++-
components/rx/rxdbgrid_columsunit.lrs | 2 +-
components/rx/rxdbgrid_columsunit.pas | 31 ++
components/rx/rxdbgrid_findunit.pas | 31 ++
components/rx/rxdbspinedit.pas | 31 ++
components/rx/rxdbtimeedit.pas | 31 ++
components/rx/rxdconst.pas | 38 ++-
components/rx/rxdice.pas | 37 +-
components/rx/rxfileutils.pas | 3 +-
components/rx/rxfilterby.lfm | 20 +-
components/rx/rxfilterby.lrs | 22 +-
components/rx/rxfilterby.pas | 31 ++
components/rx/rxlogin.lfm | 66 ++--
components/rx/rxlogin.lrs | 97 +++---
components/rx/rxlogin.pas | 38 ++-
components/rx/rxlookup.pas | 31 ++
components/rx/rxmemds.pas | 37 +-
components/rx/rxnew.lpk | 144 ++++----
components/rx/rxpopupunit.pas | 31 ++
components/rx/rxsortby.lrs | 2 +-
components/rx/rxsortby.pas | 31 ++
components/rx/rxsortmemds.pas | 3 +-
components/rx/rxspin.pas | 38 ++-
components/rx/rxstrutils.pas | 36 +-
components/rx/rxswitch.pas | 38 ++-
components/rx/rxtbrsetup.lfm | 56 +--
components/rx/rxtbrsetup.lrs | 218 ++++++------
components/rx/rxtbrsetup.pas | 31 ++
components/rx/rxtimeedit.pas | 31 ++
components/rx/rxtoolbar.pas | 31 ++
components/rx/rxxpman.pas | 33 +-
components/rx/seldsfrm.lfm | 16 +-
components/rx/seldsfrm.lrs | 14 +-
components/rx/seldsfrm.pas | 31 ++
components/rx/tooledit.pas | 31 ++
components/rx/vclutils.pas | 31 ++
64 files changed, 2229 insertions(+), 513 deletions(-)
diff --git a/components/rx/autopanel.pas b/components/rx/autopanel.pas
index 4fb0419dc..70aa174f0 100644
--- a/components/rx/autopanel.pas
+++ b/components/rx/autopanel.pas
@@ -1,3 +1,34 @@
+{ AutoPanel unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit AutoPanel;
{$mode objfpc}{$H+}
diff --git a/components/rx/boxprocs.pas b/components/rx/boxprocs.pas
index e756f94a9..dc7f50b67 100644
--- a/components/rx/boxprocs.pas
+++ b/components/rx/boxprocs.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ boxprocs unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit boxprocs;
diff --git a/components/rx/curredit.pas b/components/rx/curredit.pas
index 642688bf8..d5b946fe8 100644
--- a/components/rx/curredit.pas
+++ b/components/rx/curredit.pas
@@ -1,3 +1,34 @@
+{ curredit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit curredit;
{$I rx.inc}
diff --git a/components/rx/dateutil.pas b/components/rx/dateutil.pas
index aae8a1620..848656543 100644
--- a/components/rx/dateutil.pas
+++ b/components/rx/dateutil.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ DateUtil unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit dateutil;
diff --git a/components/rx/dbdateedit.pas b/components/rx/dbdateedit.pas
index b9775b5eb..7c2d0c9e4 100644
--- a/components/rx/dbdateedit.pas
+++ b/components/rx/dbdateedit.pas
@@ -1,3 +1,34 @@
+{ dbdateedit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit dbdateedit;
{$I rx.inc}
diff --git a/components/rx/dbutils.pas b/components/rx/dbutils.pas
index 98eb339e7..0c85da01a 100644
--- a/components/rx/dbutils.pas
+++ b/components/rx/dbutils.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ dbutils unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit dbutils;
diff --git a/components/rx/docs/rxfpc.xml b/components/rx/docs/rxfpc.xml
index 312034e5c..3f01fdd65 100644
--- a/components/rx/docs/rxfpc.xml
+++ b/components/rx/docs/rxfpc.xml
@@ -7,16 +7,16 @@
-
+ Абстрактный класс сортировки данныхАбстрактный класс сортировки данных в RXDBGrid.
От этого класса необходимо создавать наследников, которые будут предоставлять функционал по сортировке данных в наборе данных, который подключен к RXDBGrid.
-
+ Абстрактный метод сортировки по столбцуЭтот метод необходимо перекрывать в наследнике для обеспечения функции сортировки данных при щелчке по столбцу в RxDBGrid-е
-
+ Абстрактный метод сортировки по нескольким столбцамВ RXDBGrid-е есть возможность сортировки по нескольким столбцам одновременно.
Если набор данных имеет такую возможность, то данный метод необходимо переопределить и вписать в нём вызов сортировки по нескольким столбцам.
@@ -41,8 +41,16 @@
-
-
+
+ Текст, выводимый в последней строке списка
+ При установленном занчении свойства
+ValueType равным fvtStaticText, в последней строки списка оторажается введённое здесь значение
+
+
+ Определяем тип занчения, автоматически расчитываемого в итоговой строке
+
+ Определяем тип занчения, автоматически расчитываемого в итоговой строке
+
@@ -90,16 +98,39 @@
-
-
-
+
+ Событие, возникающее до выполнения операции быстрого поиска данных в спике
+ Событие, возникающее до выполнения операции быстрого поиска данных в спике
+
+
+
+
+
+ Событие, возникающее после выполнения операции быстрого поиска данных в спике
+ Событие, возникающее после выполнения операции быстрого поиска данных в спике
+
+
+
+
+
+ Данный тип описывает событие при отображении в списке заголовка колонки
+ Данный тип описывает событие при отображении в списке заголовка колонки
+ property TitleButtons: Boolean;Свойство определяет, могут ли заголовки колонок в Grid-е быть использованы как кнопки. По умолчанию - False.
При установке свойства в значение True Вы можете обработать события OnTitleBtnClick для обработки нажатия на такую кнопку и OnCheckButton, OnGetBtnParams для установки свойств кнопок в заголовке.
-
+
+ Событие получения параметров ячейки в RxDBGrid-е
+
+
Событие получения параметров ячейки в RxDBGrid-е
+
+
+
+
+ property IniStorage: TFormPlacement;
@@ -110,8 +141,19 @@
-
-
+
+ Набор флагов, определяющие поведение при редактировании/добавлении или удалении данных в RxDBGrid
+ Набор флаговфлагов, определяющие поведение при редактировании/добавлении или удалении данных в RxDBGrid
+
+
+ Набор флагов, управляющих поведением RxDBGrid
+
+
+ Набор флагов, управлюящих поведением
+
+ RxDBGrid-а.
+
+
@@ -207,6 +249,366 @@
+
+ Тип описывает событие, возникающее во время операции быстрого поиска данных в спике
+ Тип описывает событие, возникающее во время операции быстрого поиска данных в спике
+
+
+
+
+
+
+ Маркер направления сортировки
+
+
Маркер направления сортировки.
+
Определяет отображение маркера сортировки в заголовке столбца RxDBGrid-а.
+
+
+
Параметр
+
Описание
+
+
+
smNone
+
Не отображать маркер
+
+
+
smDown
+
Отображать маркер "Вниз" - прямая сортировка
+
+
+
smUp
+
Отображать маркер "Вверх" - обратная сортировка
+
+
+
+
+
+
+
+
+
+ Данный тип описывает событие при отображении в списке заголовка колонки
+
+
Данный тип описывает событие при отображении в списке заголовка колонки
+
+
+
Параметр
+
Тип
+
Описание
+
+
+
Sender: TObject
+
Вх.
+
Указывает на экземпляр объекта RxDBGrid
+
+
+
+
Field: TField
+
Вх.
+
Определяет колонку, для которой необходимо определить параметры
+
+
+
AFont: TFont
+
Вх.
+
С помощью данного объекта можно указать параметры шрифта заголовка
+
+
+
Background: TColor
+
Вых.
+
Можно указать цвет фона заголовка колонки
+
+
+
SortMarker: TSortMarker
+
Вых.
+
Можно указать тип маркера сортировки
+
+
+
+
IsDown: Boolean
+
Вх.
+
Определяет, был ли клик мышкой по данному заголовку
+
+
+
+
+
+ Данный тип описывает событие получения параметров ячейки в RxDBGrid-е
+
+
Данный тип описывает событие получения параметров ячейки в RxDBGrid-е
+
+
+
Параметр
+
Тип параметра
+
Описание
+
+
+
Sender: TObject
+
вх.
+
Указывает на экземпляр объекта RxDBGrid
+
+
+
+
Field: TField
+
вх.
+
Определяет колонку, для которой произошло событие
+
+
+
AFont: TFont
+
вх.
+
С помощью данного объекта можно указать параметры шрифта ячейки
+
+
+
Background: TColor
+
вых.
+
Можно указать цвет фона ячейки
+
+
+
+
+
+
+
+
+ Параметры изменения данных в RxDBGrid
+
+
Флаги, определяющие параметры изменения данных в RxDBGrid
+
+
+
+
Параметр
+
Описание
+
+
+
aoInsert
+
Доступна вставка строки данных в RxDBGrid
+
+
+
+
aoUpdate
+
Доступна изменение данных в строке RxDBGrid
+
+
+
+
aoDelete
+
Доступно удаление строки данных из RxDBGrid
+
+
+
+
aoAppend
+
Доступно добавление строки данных в конец списка в RxDBGrid
+
+
+
+
+
+
+ Набор флагов, определяющие поведение при редактировании/добавлении или удалении данных в RxDBGrid
+
+
Набор флагов, определяющие поведение при редактировании/добавлении или удалении данных в
+RxDBGrid
+
+
+
+
+ Определяем тип занчения, автоматически расчитываемого в итоговой строке
+
+
Определяем тип занчения, автоматически расчитываемого в итоговой строке
+
+
+
Параметр
+
Значение
+
+
+
fvtNon
+
По умолчанию, ничего не отображаем
+
+
+
fvtSum
+
Отображается сумма по указанной колонке
+
+
+
fvtAvg
+
Расчитывается среднее значение по указанной колонке
+
+
+
fvtCount
+
Отображается общее количество строк в списке
+
+
+
fvtFieldValue
+
Отображается значение указанной колонки
+
+
+
fvtStaticText
+
Отображается текст из поля Value
+
+
+
+
fvtMin
+
Отображается минимальное значние указанного в свойстве FieldNameполя
+
+
+
fvtMax
+
Отображается максимальное значние указанного в свойстве FieldNameполя
Разрешает вызов формы управления отображением и порядком расположения колонок в RxDBGrid-е
+
+
+
rdgAllowDialogFind
+
Разрешает вызов формы поиска данных в RxDBGrid-е
+
+
+
rdgHighlightFocusCol
+
Подсвечивать текущую колонку
+
+
+
rdgHighlightFocusRow
+
Подсвечивать текущую строку
+
+
+
rdgDblClickOptimizeColWidth
+
При двойном щелчке по разделителю между колонками в RxDBGrid-е автоматически подбирать размер колонки по ширине отображаемых данных
+
+
+
rdgFooterRows
+
Отображать итоговую строку (подвал) спика
+
+
+
rdgXORColSizing
+
При изменении размера колонки отображать только будущую границу колонки, саму колонку при этом не менять. В противном случае при изменении размера ширина колонки меняется сразу. Параметр полезен для медленных компьютеров или терминального режима
+
+
+
rdgFilter
+
Разрешить локальную фильтрацию данных
+
+
+
rdgMultiTitleLines
+
Разрешить объединение заголовков колонок
+
+
+
rdgMrOkOnDblClik
+
При двойном щелчке мышки генерировать для формы-владельца грида событие mrOk - полезно при создании формы выбора из списка
+
+
+
rdgAllowQuickSearch
+
Разрешить быстрыый поиск в гриде - в этом режиме нажатие клавиш включет механизм встроенного поиска по текущей колонке, прямое редактирование в списке будет запрещено.
+
+
+
rdgAllowQuickFilter
+
Разрешить быструю фильтрацию в колонках - в заголовке списка будет доступна по нажатию клавиши Ctrl+E дополнительная строка, содержащая ComboBox-ы со значениями колонок. Аналогично сортировки в электронных таблицах.
+
+
+
rdgAllowFilterForm
+
Разрешает к использованию форму фильтрации в RxDBGrid-е
+
+
+
rdgAllowSortForm
+
Разрешает к использованию формы сортировки данных в RxDBGrid-е
+
+
+
rdgAllowToolMenu
+
Включает отображение меню инструментов в RxDBGrid-е. При активации данного параметра в верхнем левом углу грида отрисовывается специальный значок и при его нажатии мышкой выдаётся меню иснтрументов
+
+
+
rdgCaseInsensitiveSort
+
Параметр включает режим сортировки без учёта регистра символов в столбце RxDBGrid-а
+ Набор флагов, управлюящих поведением
+ RxDBGrid-а.
+
+
+
+
+
+
+
+ Параметры сортировки данных
+
+
Параметры сортировки данных
+
+
+
Параметр
+
Описание
+
+
+
seoCaseInsensitiveSort
+
При сортировке данных не учитывать регистр
+
+
+
+
+
+
+
+
+
+ Парамерты сортировки
+ Парамерты сортировки, набор флагов.
+
+
+
+
+
+ Мета-класс сортировщика данных
+ Мета-класс сортировщика данных, используется непосредственно при регистрации экземпляра класса (наследника от TRxDBGridSortEngine) сортировщика данных.
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ Регистрируем класс сортировщика в наборе данных
+
+
RxDBGridSortEngineClass:TRxDBGridSortEngineClass - класс сортировщика
+
DataSetClass:TDataSetClass -
+
+
+
+ Тип описывает событие, возникающее в момент полчения данных в лукпный редактор значения ячейки
+ Тип описывает событие, возникающее в момент полчения данных в лукпный редактор значения ячейки
+
+
+ Тип описывает событие, возникающее в момент показа выпадающего списка лукапного редактора значения ячейки
+ Тип описывает событие, возникающее в момент показа выпадающего списка лукапного редактора значения ячейки
+
@@ -684,6 +1086,8 @@ TRxDBCalcEdit является наследником TDBCalcEdit и имеет
+
+
Count
@@ -723,6 +1127,8 @@ TRxDBCalcEdit является наследником TDBCalcEdit и имеет
+
+
Execute и по содержимому которого будет произведено заполнение массива Files
@@ -1957,6 +2363,8 @@ Description
+
+
const SearchDomain, FileName:
@@ -1967,6 +2375,8 @@ Description
+
+
String;
@@ -1977,6 +2387,8 @@ Description
+
+
out UserName, DomainName:
@@ -1987,6 +2399,8 @@ Description
+
+
String);
Процедура возвращает имя и домен пользователя операционной системы владельца указанного файла.
Функция проверяет все разделители каталогов в указанном имени файла/каталога и, если нужно, меняет их на значение константыDirectorySeparator.
@@ -2040,6 +2460,8 @@ Description
+
+
string;
Функция GetUserName возвращает имя оператора, залогиненго в системе
@@ -2176,7 +2598,11 @@ Description
Метод отображет окно "О программе"Метод отображет окно "О программе"
-
+
+
+
+
+ Заголовок программыЗаголовок программы, выводимый на первой странице она
diff --git a/components/rx/duallist.pas b/components/rx/duallist.pas
index dbf8148d2..25996dd57 100644
--- a/components/rx/duallist.pas
+++ b/components/rx/duallist.pas
@@ -1,10 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ }
-{*******************************************************}
+{ duallist unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit duallist;
diff --git a/components/rx/fduallst.lfm b/components/rx/fduallst.lfm
index d89f738af..1630d2c8d 100644
--- a/components/rx/fduallst.lfm
+++ b/components/rx/fduallst.lfm
@@ -1,7 +1,7 @@
object DualListForm: TDualListForm
- Left = 428
+ Left = 451
Height = 344
- Top = 233
+ Top = 264
Width = 552
ActiveControl = IncBtn
BorderIcons = []
@@ -11,7 +11,7 @@ object DualListForm: TDualListForm
OnActivate = ListClick
OnShow = ListClick
Position = poScreenCenter
- LCLVersion = '0.9.27'
+ LCLVersion = '0.9.29'
object SrcLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
@@ -42,7 +42,7 @@ object DualListForm: TDualListForm
AnchorSideRight.Control = IncAllBtn
AnchorSideBottom.Control = ButtonPanel1
Left = 6
- Height = 260
+ Height = 262
Top = 30
Width = 242
Anchors = [akTop, akLeft, akRight, akBottom]
@@ -67,7 +67,7 @@ object DualListForm: TDualListForm
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel1
Left = 304
- Height = 260
+ Height = 262
Top = 30
Width = 242
Anchors = [akTop, akLeft, akRight, akBottom]
@@ -166,8 +166,8 @@ object DualListForm: TDualListForm
end
object ButtonPanel1: TButtonPanel
Left = 6
- Height = 42
- Top = 296
+ Height = 40
+ Top = 298
Width = 540
TabOrder = 6
ShowButtons = [pbOK, pbCancel, pbHelp]
diff --git a/components/rx/fduallst.lrs b/components/rx/fduallst.lrs
index c4e653848..fd0583630 100644
--- a/components/rx/fduallst.lrs
+++ b/components/rx/fduallst.lrs
@@ -1,12 +1,12 @@
-{ - , lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TDualListForm','FORMDATA',[
- 'TPF0'#13'TDualListForm'#12'DualListForm'#4'Left'#3#172#1#6'Height'#3'X'#1#3
- +'Top'#3#233#0#5'Width'#3'('#2#13'ActiveControl'#7#6'IncBtn'#11'BorderIcons'
- +#11#0#7'Caption'#6#12'DualListForm'#12'ClientHeight'#3'X'#1#11'ClientWidth'#3
- +'('#2#10'OnActivate'#7#9'ListClick'#6'OnShow'#7#9'ListClick'#8'Position'#7#14
- +'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#6'TLabel'#8'SrcLabel'#22'Ancho'
- +'rSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#2
+ 'TPF0'#13'TDualListForm'#12'DualListForm'#4'Left'#3#195#1#6'Height'#3'X'#1#3
+ +'Top'#3#8#1#5'Width'#3'('#2#13'ActiveControl'#7#6'IncBtn'#11'BorderIcons'#11
+ +#0#7'Caption'#6#12'DualListForm'#12'ClientHeight'#3'X'#1#11'ClientWidth'#3'('
+ +#2#10'OnActivate'#7#9'ListClick'#6'OnShow'#7#9'ListClick'#8'Position'#7#14'p'
+ +'oScreenCenter'#10'LCLVersion'#6#6'0.9.29'#0#6'TLabel'#8'SrcLabel'#22'Anchor'
+ +'SideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#2
+#6#6'Height'#2#18#3'Top'#2#6#5'Width'#2'2'#18'BorderSpacing.Left'#2#6#17'Bor'
+'derSpacing.Top'#2#6#7'Caption'#6#6'Source'#11'ParentColor'#8#0#0#6'TLabel'#8
+'DstLabel'#22'AnchorSideLeft.Control'#7#7'DstList'#21'AnchorSideTop.Control'
@@ -15,7 +15,7 @@ LazarusResources.Add('TDualListForm','FORMDATA',[
+'rcList'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#8
+'SrcLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'
+#7#9'IncAllBtn'#24'AnchorSideBottom.Control'#7#12'ButtonPanel1'#4'Left'#2#6#6
- +'Height'#3#4#1#3'Top'#2#30#5'Width'#3#242#0#7'Anchors'#11#5'akTop'#6'akLeft'
+ +'Height'#3#6#1#3'Top'#2#30#5'Width'#3#242#0#7'Anchors'#11#5'akTop'#6'akLeft'
+#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#11
+'MultiSelect'#9#7'OnClick'#7#9'ListClick'#10'OnDblClick'#7#11'IncBtnClick'#9
+'OnKeyDown'#7#14'SrcListKeyDown'#14'ParentShowHint'#8#8'ShowHint'#9#6'Sorted'
@@ -23,7 +23,7 @@ LazarusResources.Add('TDualListForm','FORMDATA',[
+'eLeft.Control'#7#9'IncAllBtn'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'Anc'
+'horSideTop.Control'#7#8'DstLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
+'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'
- +#24'AnchorSideBottom.Control'#7#12'ButtonPanel1'#4'Left'#3'0'#1#6'Height'#3#4
+ +#24'AnchorSideBottom.Control'#7#12'ButtonPanel1'#4'Left'#3'0'#1#6'Height'#3#6
+#1#3'Top'#2#30#5'Width'#3#242#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8
+'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#11'MultiSelect'
+#9#7'OnClick'#7#9'ListClick'#10'OnDblClick'#7#12'ExclBtnClick'#9'OnKeyDown'#7
@@ -56,6 +56,6 @@ LazarusResources.Add('TDualListForm','FORMDATA',[
+'cing.Top'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#2'<<'#10'Font.'
+'Color'#7#7'clBlack'#10'Font.Style'#11#6'fsBold'#0#7'OnClick'#7#15'ExclAllBt'
+'nClick'#10'ParentFont'#8#8'TabOrder'#2#4#0#0#12'TButtonPanel'#12'ButtonPane'
- +'l1'#4'Left'#2#6#6'Height'#2'*'#3'Top'#3'('#1#5'Width'#3#28#2#8'TabOrder'#2#6
+ +'l1'#4'Left'#2#6#6'Height'#2'('#3'Top'#3'*'#1#5'Width'#3#28#2#8'TabOrder'#2#6
+#11'ShowButtons'#11#4'pbOK'#8'pbCancel'#6'pbHelp'#0#0#0#0
]);
diff --git a/components/rx/fduallst.pas b/components/rx/fduallst.pas
index 49b9a3cba..e9f15e13f 100644
--- a/components/rx/fduallst.pas
+++ b/components/rx/fduallst.pas
@@ -1,10 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995 AO ROSNO }
-{ }
-{*******************************************************}
+{ fduallst unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit fduallst;
diff --git a/components/rx/folderlister.pas b/components/rx/folderlister.pas
index 56288b7eb..ed35fddd4 100644
--- a/components/rx/folderlister.pas
+++ b/components/rx/folderlister.pas
@@ -1,3 +1,34 @@
+{ folderlister unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit folderlister;
{$I rx.inc}
diff --git a/components/rx/pagemngr.pas b/components/rx/pagemngr.pas
index ab565617d..f2c8f8938 100644
--- a/components/rx/pagemngr.pas
+++ b/components/rx/pagemngr.pas
@@ -1,3 +1,34 @@
+{ pagemngr unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit pagemngr;
{$mode objfpc}{$H+}
diff --git a/components/rx/pickdate.pas b/components/rx/pickdate.pas
index 4c94d6dbe..7bbdb2038 100644
--- a/components/rx/pickdate.pas
+++ b/components/rx/pickdate.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ pickdate unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit pickdate;
@@ -19,9 +41,6 @@ uses
{ TRxCalendar }
-{ TRxCalendar implementation copied from Borland CALENDAR.PAS sample
- unit and modified }
-
const
//TRxShortDaysWeek: array[0..6] of string = ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');
TRxShortDaysOfWeek: array[0..6] of string =
diff --git a/components/rx/registerrx.pas b/components/rx/registerrx.pas
index eb8317b9d..760980d9a 100644
--- a/components/rx/registerrx.pas
+++ b/components/rx/registerrx.pas
@@ -1,3 +1,34 @@
+{ registerrx unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit registerrx;
{$mode objfpc}{$H+}
@@ -43,15 +74,18 @@ begin
end;
+{$IFDEF USE_TRxAppIcon}
procedure RegisterRxAppIcon;
begin
RegisterComponents('RX',[TRxAppIcon]);
end;
-
+{$ENDIF}
+{$IFDEF USE_TRXXPManifest}
procedure RegisterRxXPMan;
begin
RegisterComponents('RX',[TRXXPManifest]);
end;
+{$ENDIF}
procedure RegisterPageMngr;
begin
@@ -172,10 +206,14 @@ begin
RegisterUnit('curredit', @RegisterCurrEdit);
RegisterUnit('rxswitch', @RegisterRXSwitch);
RegisterUnit('rxdice', @RegisterRXDice);
+ {$IFDEF USE_TRXXPManifest}
RegisterUnit('RxXPMan', @RegisterRxXPMan);
+ {$ENDIF}
RegisterUnit('PageMngr', @RegisterPageMngr);
RegisterUnit('rxtoolbar', @RegisterRxToolBar);
+ {$IFDEF USE_TRxAppIcon}
RegisterUnit('rxappicon', @RegisterRxAppIcon);
+ {$ENDIF}
RegisterUnit('rxctrls', @RegisterRxCtrls);
RegisterUnit('RxCustomChartPanel', @RegisterChartPanel);
RegisterUnit('AutoPanel', @RegisterAutoPanel);
diff --git a/components/rx/registerrxdb.pas b/components/rx/registerrxdb.pas
index 155cae6a1..5e42dbfa0 100644
--- a/components/rx/registerrxdb.pas
+++ b/components/rx/registerrxdb.pas
@@ -1,3 +1,34 @@
+{ RegisterRxDB unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit RegisterRxDB;
{$mode objfpc}{$H+}
diff --git a/components/rx/rx.inc b/components/rx/rx.inc
index 569921641..ee9bae42d 100644
--- a/components/rx/rx.inc
+++ b/components/rx/rx.inc
@@ -1,3 +1,34 @@
+{ global include module
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
{$mode objfpc}
{$H+}
@@ -13,6 +44,9 @@
{.$DEFINE FIX_TRxMemoryData_Filter}
{.$DEFINE FIX_BUG_FieldNo}
+{.DEFINE USE_TRXXPManifest}
+{.$DEFINE USE_TRxAppIcon}
+
//
{.$DEFINE DBDateEdit_OLD}
{.$DEFINE OLD_STYLE_TEXT_ROTATE}
diff --git a/components/rx/rxaboutdialog.pas b/components/rx/rxaboutdialog.pas
index ba7cb0319..9cf2d4d83 100644
--- a/components/rx/rxaboutdialog.pas
+++ b/components/rx/rxaboutdialog.pas
@@ -1,11 +1,23 @@
{ RxAboutDialog
- Copyright (C) 2010 Lagunov A.A. alexs@hotbox.ru
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your
- option) any later version.
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
diff --git a/components/rx/rxaboutformunit.pas b/components/rx/rxaboutformunit.pas
index 80e39321c..88354371a 100644
--- a/components/rx/rxaboutformunit.pas
+++ b/components/rx/rxaboutformunit.pas
@@ -1,11 +1,23 @@
{ RxAboutForm
- Copyright (C) 2010 Lagunov A.A. alexs@hotbox.ru
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your
- option) any later version.
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
diff --git a/components/rx/rxappicon.pas b/components/rx/rxappicon.pas
index 37c8f3cd6..ad740c055 100644
--- a/components/rx/rxappicon.pas
+++ b/components/rx/rxappicon.pas
@@ -1,3 +1,34 @@
+{ rxappicon unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxappicon;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxapputils.pas b/components/rx/rxapputils.pas
index d08ec64b4..52e70a1d1 100644
--- a/components/rx/rxapputils.pas
+++ b/components/rx/rxapputils.pas
@@ -1,3 +1,34 @@
+{ rxapputils unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxapputils;
{$I rx.inc}
diff --git a/components/rx/rxceeditlookupfields.pas b/components/rx/rxceeditlookupfields.pas
index 93665d2c2..282c4082c 100644
--- a/components/rx/rxceeditlookupfields.pas
+++ b/components/rx/rxceeditlookupfields.pas
@@ -1,3 +1,34 @@
+{ rxceEditLookupFields unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxceEditLookupFields;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxclock.pas b/components/rx/rxclock.pas
index 0cd87838c..83bd8a403 100644
--- a/components/rx/rxclock.pas
+++ b/components/rx/rxclock.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxclock unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxclock;
diff --git a/components/rx/rxconst.pas b/components/rx/rxconst.pas
index 9de58517e..014f0f535 100644
--- a/components/rx/rxconst.pas
+++ b/components/rx/rxconst.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxconst unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxconst;
diff --git a/components/rx/rxctrls.pas b/components/rx/rxctrls.pas
index c974f6ea8..8a243f96e 100644
--- a/components/rx/rxctrls.pas
+++ b/components/rx/rxctrls.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxctrls unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxctrls;
diff --git a/components/rx/rxcustomchartpanel.pas b/components/rx/rxcustomchartpanel.pas
index 2f675cb79..8d9cd233d 100644
--- a/components/rx/rxcustomchartpanel.pas
+++ b/components/rx/rxcustomchartpanel.pas
@@ -1,3 +1,34 @@
+{ rxcustomchartpanel unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxcustomchartpanel;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdbcomb.pas b/components/rx/rxdbcomb.pas
index 422587d85..d720165a8 100644
--- a/components/rx/rxdbcomb.pas
+++ b/components/rx/rxdbcomb.pas
@@ -1,10 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1997 Master-Bank }
-{ }
-{*******************************************************}
+{ rxdbcomb unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxdbcomb;
diff --git a/components/rx/rxdbctrls.pas b/components/rx/rxdbctrls.pas
index 277590b12..9e625ebb4 100644
--- a/components/rx/rxdbctrls.pas
+++ b/components/rx/rxdbctrls.pas
@@ -1,3 +1,34 @@
+{ RxDBCtrls unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit RxDBCtrls;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdbgrid.pas b/components/rx/rxdbgrid.pas
index e7a9c76fe..1f42c3c48 100644
--- a/components/rx/rxdbgrid.pas
+++ b/components/rx/rxdbgrid.pas
@@ -1,3 +1,35 @@
+{ rxdbgrid unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
+
unit rxdbgrid;
{$I rx.inc}
@@ -42,6 +74,7 @@ type
rdgMultiTitleLines,
rdgMrOkOnDblClik,
rdgAllowQuickSearch,
+ rdgAllowQuickFilter,
rdgAllowFilterForm,
rdgAllowSortForm,
rdgAllowToolMenu,
@@ -1243,7 +1276,7 @@ procedure TRxDBGrid.UpdateJMenuStates;
begin
F_PopupMenu.Items[0].Enabled:=rdgAllowDialogFind in FOptionsRx;
F_PopupMenu.Items[1].Enabled:=rdgAllowFilterForm in FOptionsRx;
-// F_PopupMenu.Items[2].Enabled:=rdgFilter in FOptionsRx;
+ F_PopupMenu.Items[2].Enabled:=rdgAllowQuickFilter in FOptionsRx;
F_PopupMenu.Items[3].Enabled:=(rdgFilter in FOptionsRx) or (rdgAllowFilterForm in FOptionsRx);
F_PopupMenu.Items[5].Enabled:=rdgAllowSortForm in FOptionsRx;
F_PopupMenu.Items[6].Enabled:=rdgAllowColumnsForm in FOptionsRx;
@@ -2076,7 +2109,7 @@ begin
end;
end;
ord('E'):begin
- if ssCtrl in Shift then
+ if (ssCtrl in Shift) and (rdgAllowQuickFilter in FOptionsRx) then
begin
OnFilter(Self);
exit;
@@ -2659,7 +2692,7 @@ begin
FMarkerUp := LoadLazResBitmapImage('rx_markerup');
FMarkerDown := LoadLazResBitmapImage('rx_markerdown');
Options:=Options - [dgTabs];
- OptionsRx:=OptionsRx + [rdgAllowColumnsForm]+[rdgAllowDialogFind];
+ OptionsRx:=OptionsRx + [rdgAllowColumnsForm, rdgAllowDialogFind, rdgAllowQuickFilter];
FAutoSort:=True;
// FTitleButtons:=True;
diff --git a/components/rx/rxdbgrid_columsunit.lrs b/components/rx/rxdbgrid_columsunit.lrs
index fa49aa533..34ca26887 100644
--- a/components/rx/rxdbgrid_columsunit.lrs
+++ b/components/rx/rxdbgrid_columsunit.lrs
@@ -1,4 +1,4 @@
-{ Это - файл ресурсов, автоматически созданный lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TrxDBGridColumsForm','FORMDATA',[
'TPF0'#19'TrxDBGridColumsForm'#18'rxDBGridColumsForm'#4'Left'#3#233#1#6'Heigh'
diff --git a/components/rx/rxdbgrid_columsunit.pas b/components/rx/rxdbgrid_columsunit.pas
index 5a25b76ed..03890a093 100644
--- a/components/rx/rxdbgrid_columsunit.pas
+++ b/components/rx/rxdbgrid_columsunit.pas
@@ -1,3 +1,34 @@
+{ rxdbgrid_columsunit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxdbgrid_columsunit;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdbgrid_findunit.pas b/components/rx/rxdbgrid_findunit.pas
index 7f773d541..a53ceb3ea 100644
--- a/components/rx/rxdbgrid_findunit.pas
+++ b/components/rx/rxdbgrid_findunit.pas
@@ -1,3 +1,34 @@
+{ rxdbgrid_findunit unit
+
+Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxdbgrid_findunit;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdbspinedit.pas b/components/rx/rxdbspinedit.pas
index 058233e75..cdf8a92d2 100644
--- a/components/rx/rxdbspinedit.pas
+++ b/components/rx/rxdbspinedit.pas
@@ -1,3 +1,34 @@
+{ RxDBSpinEdit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit RxDBSpinEdit;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdbtimeedit.pas b/components/rx/rxdbtimeedit.pas
index 0e8eb0bf6..4c5746459 100644
--- a/components/rx/rxdbtimeedit.pas
+++ b/components/rx/rxdbtimeedit.pas
@@ -1,3 +1,34 @@
+{ RxDBTimeEdit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit RxDBTimeEdit;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxdconst.pas b/components/rx/rxdconst.pas
index 4c8cbf42a..870a5825f 100644
--- a/components/rx/rxdconst.pas
+++ b/components/rx/rxdconst.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997 Master-Bank }
-{ }
-{*******************************************************}
+{ string const unit fo DB-aware modules
+
+Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxdconst;
diff --git a/components/rx/rxdice.pas b/components/rx/rxdice.pas
index bccc435f4..c936f2221 100644
--- a/components/rx/rxdice.pas
+++ b/components/rx/rxdice.pas
@@ -1,12 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxdice unit
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxdice;
interface
diff --git a/components/rx/rxfileutils.pas b/components/rx/rxfileutils.pas
index cfc958ea8..041090a49 100644
--- a/components/rx/rxfileutils.pas
+++ b/components/rx/rxfileutils.pas
@@ -1,6 +1,7 @@
{ rxFileUtils is part of RxFPC library
- Copyright (C) 2010 Lagunov A.A. alexs75@hotbox.ru
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
diff --git a/components/rx/rxfilterby.lfm b/components/rx/rxfilterby.lfm
index e9acac6bd..47dbbe4fa 100644
--- a/components/rx/rxfilterby.lfm
+++ b/components/rx/rxfilterby.lfm
@@ -9,7 +9,7 @@ object rxFilterByForm: TrxFilterByForm
ClientWidth = 644
OnCreate = FormCreate
Position = poScreenCenter
- LCLVersion = '0.9.27'
+ LCLVersion = '0.9.29'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
@@ -129,7 +129,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 271
- Height = 27
+ Height = 29
Top = 54
Width = 250
Anchors = [akTop, akLeft, akRight]
@@ -199,7 +199,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 91
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -270,7 +270,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 130
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -341,7 +341,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 169
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -412,7 +412,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 208
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -483,7 +483,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 247
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -554,7 +554,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 286
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -625,7 +625,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 325
Width = 251
Anchors = [akTop, akLeft, akRight]
@@ -696,7 +696,7 @@ object rxFilterByForm: TrxFilterByForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComboBox3
Left = 270
- Height = 27
+ Height = 29
Top = 364
Width = 251
Anchors = [akTop, akLeft, akRight]
diff --git a/components/rx/rxfilterby.lrs b/components/rx/rxfilterby.lrs
index d2ac72a9b..6c5178d14 100644
--- a/components/rx/rxfilterby.lrs
+++ b/components/rx/rxfilterby.lrs
@@ -1,11 +1,11 @@
-{ Это - файл ресурсов, автоматически созданный lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TrxFilterByForm','FORMDATA',[
'TPF0'#15'TrxFilterByForm'#14'rxFilterByForm'#4'Left'#3#208#1#6'Height'#3#189
+#1#3'Top'#2's'#5'Width'#3#132#2#13'ActiveControl'#7#5'Edit1'#7'Caption'#6#17
+'Filter conditions'#12'ClientHeight'#3#189#1#11'ClientWidth'#3#132#2#8'OnCre'
+'ate'#7#10'FormCreate'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0'
- +'.9.27'#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7#5'Owner'#21'Ancho'
+ +'.9.29'#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7#5'Owner'#21'Ancho'
+'rSideTop.Control'#7#5'Owner'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#6#5'Width'
+#3#252#0#20'BorderSpacing.Around'#2#6#7'Caption'#6'!Select filter expression'
+' for data'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#10'ParentFont'#8
@@ -41,7 +41,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'ownCount'#2#9#10'ItemHeight'#2#0#8'OnChange'#7#14'ComboBoxChange'#5'Style'#7
+#14'csDropDownList'#8'TabOrder'#2#1#0#0#5'TEdit'#5'Edit1'#21'AnchorSideTop.C'
+'ontrol'#7#6'Label2'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRigh'
- +'t.Control'#7#9'ComboBox3'#4'Left'#3#15#1#6'Height'#2#27#3'Top'#2'6'#5'Width'
+ +'t.Control'#7#9'ComboBox3'#4'Left'#3#15#1#6'Height'#2#29#3'Top'#2'6'#5'Width'
+#3#250#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Arou'
+'nd'#2#6#8'OnChange'#7#10'EditChange'#8'TabOrder'#2#2#0#0#9'TComboBox'#9'Com'
+'boBox3'#21'AnchorSideTop.Control'#7#6'Label2'#18'AnchorSideTop.Side'#7#9'as'
@@ -65,7 +65,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'t'#5'Edit2'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'AnchorSideLeft.Sid'
+'e'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#9'ComboBox1'#18'AnchorSideTop'
+'.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4'Left'#3
- ,#14#1#6'Height'#2#27#3'Top'#2'['#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6'a'
+ ,#14#1#6'Height'#2#29#3'Top'#2'['#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6'a'
+'kLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#8
+'OnChange'#7#10'EditChange'#8'TabOrder'#2#6#0#0#9'TComboBox'#9'ComboBox6'#21
+'AnchorSideTop.Control'#7#9'ComboBox1'#18'AnchorSideTop.Side'#7#9'asrBottom'
@@ -89,7 +89,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'t'#5'Edit3'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'AnchorSideLeft.Sid'
+'e'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#9'ComboBox4'#18'AnchorSideTop'
+'.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4'Left'#3
- +#14#1#6'Height'#2#27#3'Top'#3#130#0#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6
+ +#14#1#6'Height'#2#29#3'Top'#3#130#0#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#8
+'OnChange'#7#10'EditChange'#8'TabOrder'#2#10#0#0#9'TComboBox'#9'ComboBox9'#21
+'AnchorSideTop.Control'#7#9'ComboBox4'#18'AnchorSideTop.Side'#7#9'asrBottom'
@@ -113,7 +113,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+#0#5'TEdit'#5'Edit4'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'AnchorSide'
+'Left.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#9'ComboBox7'#18'Ancho'
+'rSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4
- +'Left'#3#14#1#6'Height'#2#27#3'Top'#3#169#0#5'Width'#3#251#0#7'Anchors'#11#5
+ +'Left'#3#14#1#6'Height'#2#29#3'Top'#3#169#0#5'Width'#3#251#0#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.T'
+'op'#2#6#8'OnChange'#7#10'EditChange'#8'TabOrder'#2#14#0#0#9'TComboBox'#10'C'
+'omboBox12'#21'AnchorSideTop.Control'#7#9'ComboBox7'#18'AnchorSideTop.Side'#7
@@ -137,7 +137,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+#2#17#0#0#5'TEdit'#5'Edit5'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'Anc'
+'horSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#10'ComboBox10'
+#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'Combo'
- +'Box3'#4'Left'#3#14#1#6'Height'#2#27#3'Top'#3#208#0#5'Width'#3#251#0#7'Ancho'
+ +'Box3'#4'Left'#3#14#1#6'Height'#2#29#3'Top'#3#208#0#5'Width'#3#251#0#7'Ancho'
+'rs'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'Border'
+'Spacing.Top'#2#6#8'OnChange'#7#10'EditChange'#8'TabOrder'#2#18#0#0#9'TCombo'
+'Box'#10'ComboBox15'#21'AnchorSideTop.Control'#7#10'ComboBox10'#18'AnchorSid'
@@ -161,7 +161,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'ownList'#8'TabOrder'#2#21#0#0#5'TEdit'#5'Edit6'#22'AnchorSideLeft.Control'#7
+#9'ComboBox2'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Contro'
+'l'#7#10'ComboBox13'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRigh'
- +'t.Control'#7#9'ComboBox3'#4'Left'#3#14#1#6'Height'#2#27#3'Top'#3#247#0#5'Wi'
+ +'t.Control'#7#9'ComboBox3'#4'Left'#3#14#1#6'Height'#2#29#3'Top'#3#247#0#5'Wi'
+'dth'#3#251#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing'
+'.Left'#2#6#17'BorderSpacing.Top'#2#6#8'OnChange'#7#10'EditChange'#8'TabOrde'
+'r'#2#22#0#0#9'TComboBox'#10'ComboBox18'#21'AnchorSideTop.Control'#7#10'Comb'
@@ -185,7 +185,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'Style'#7#14'csDropDownList'#8'TabOrder'#2#25#0#0#5'TEdit'#5'Edit7'#22'Ancho'
+'rSideLeft.Control'#7#9'ComboBox2'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21
+'AnchorSideTop.Control'#7#10'ComboBox16'#18'AnchorSideTop.Side'#7#9'asrBotto'
- +'m'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4'Left'#3#14#1#6'Height'#2#27
+ +'m'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4'Left'#3#14#1#6'Height'#2#29
+#3'Top'#3#30#1#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#8'OnChange'#7#10'EditC'
+'hange'#8'TabOrder'#2#26#0#0#9'TComboBox'#10'ComboBox21'#21'AnchorSideTop.Co'
@@ -210,7 +210,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+'Edit8'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'AnchorSideLeft.Side'#7#9
+'asrBottom'#21'AnchorSideTop.Control'#7#10'ComboBox19'#18'AnchorSideTop.Side'
+#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4'Left'#3#14#1#6
- +'Height'#2#27#3'Top'#3'E'#1#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6'akLeft'
+ +'Height'#2#29#3'Top'#3'E'#1#5'Width'#3#251#0#7'Anchors'#11#5'akTop'#6'akLeft'
+#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#8'OnChang'
+'e'#7#10'EditChange'#8'TabOrder'#2#30#0#0#9'TComboBox'#10'ComboBox24'#21'Anc'
+'horSideTop.Control'#7#10'ComboBox19'#18'AnchorSideTop.Side'#7#9'asrBottom'
@@ -234,7 +234,7 @@ LazarusResources.Add('TrxFilterByForm','FORMDATA',[
+#0#5'TEdit'#5'Edit9'#22'AnchorSideLeft.Control'#7#9'ComboBox2'#19'AnchorSide'
+'Left.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#10'ComboBox22'#18'Anc'
+'horSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#9'ComboBox3'#4
- +'Left'#3#14#1#6'Height'#2#27#3'Top'#3'l'#1#5'Width'#3#251#0#7'Anchors'#11#5
+ +'Left'#3#14#1#6'Height'#2#29#3'Top'#3'l'#1#5'Width'#3#251#0#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.T'
+'op'#2#6#8'OnChange'#7#10'EditChange'#8'TabOrder'#2'"'#0#0#9'TComboBox'#10'C'
+'omboBox27'#22'AnchorSideLeft.Control'#7#5'Owner'#24'AnchorSideBottom.Contro'
diff --git a/components/rx/rxfilterby.pas b/components/rx/rxfilterby.pas
index 615b79b49..329977f12 100644
--- a/components/rx/rxfilterby.pas
+++ b/components/rx/rxfilterby.pas
@@ -1,3 +1,34 @@
+{ rxfilterby unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxfilterby;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxlogin.lfm b/components/rx/rxlogin.lfm
index 9146de347..420c45215 100644
--- a/components/rx/rxlogin.lfm
+++ b/components/rx/rxlogin.lfm
@@ -13,7 +13,7 @@ object RxLoginForm: TRxLoginForm
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
- LCLVersion = '0.9.27'
+ LCLVersion = '0.9.29'
object AppIcon: TImage
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
@@ -193,8 +193,8 @@ object RxLoginForm: TRxLoginForm
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 18
- Top = 63
- Width = 70
+ Top = 65
+ Width = 73
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = 'UserName'
@@ -207,8 +207,8 @@ object RxLoginForm: TRxLoginForm
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 18
- Top = 96
- Width = 60
+ Top = 100
+ Width = 67
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = 'Password'
@@ -238,8 +238,8 @@ object RxLoginForm: TRxLoginForm
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 18
- Top = 133
- Width = 63
+ Top = 137
+ Width = 67
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = 'Database'
@@ -254,12 +254,11 @@ object RxLoginForm: TRxLoginForm
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Cursor = crIBeam
- Left = 94
- Height = 27
+ Left = 97
+ Height = 29
Top = 54
- Width = 355
+ Width = 352
Anchors = [akTop, akLeft, akRight]
- AutoSize = True
BorderSpacing.Left = 12
BorderSpacing.Around = 6
TabOrder = 0
@@ -271,12 +270,11 @@ object RxLoginForm: TRxLoginForm
AnchorSideRight.Control = UserNameEdit
AnchorSideRight.Side = asrBottom
Cursor = crIBeam
- Left = 94
- Height = 27
- Top = 87
- Width = 355
+ Left = 97
+ Height = 29
+ Top = 89
+ Width = 352
Anchors = [akTop, akLeft, akRight]
- AutoSize = True
BorderSpacing.Top = 6
EchoMode = emPassword
PasswordChar = '*'
@@ -288,15 +286,13 @@ object RxLoginForm: TRxLoginForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = UserNameEdit
AnchorSideRight.Side = asrBottom
- Left = 94
+ Left = 97
Height = 31
- Top = 120
- Width = 355
+ Top = 124
+ Width = 352
Anchors = [akTop, akLeft, akRight]
- AutoComplete = False
BorderSpacing.Top = 6
ItemHeight = 0
- ItemWidth = 0
Style = csDropDownList
TabOrder = 2
end
@@ -306,9 +302,9 @@ object RxLoginForm: TRxLoginForm
AnchorSideRight.Control = btnCancel
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
- Left = 190
- Height = 38
- Top = 159
+ Left = 187
+ Height = 36
+ Top = 161
Width = 60
Anchors = [akTop, akRight, akBottom]
AutoSize = True
@@ -328,10 +324,10 @@ object RxLoginForm: TRxLoginForm
AnchorSideRight.Control = btnHelp
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
- Left = 256
- Height = 38
- Top = 159
- Width = 93
+ Left = 253
+ Height = 36
+ Top = 161
+ Width = 95
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
@@ -348,10 +344,10 @@ object RxLoginForm: TRxLoginForm
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
- Left = 355
- Height = 38
- Top = 159
- Width = 94
+ Left = 354
+ Height = 36
+ Top = 161
+ Width = 95
Anchors = [akTop, akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
@@ -366,9 +362,9 @@ object RxLoginForm: TRxLoginForm
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 6
- Height = 38
- Top = 159
- Width = 73
+ Height = 36
+ Top = 161
+ Width = 78
Anchors = [akTop, akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 6
diff --git a/components/rx/rxlogin.lrs b/components/rx/rxlogin.lrs
index 7e420be04..70f85c67d 100644
--- a/components/rx/rxlogin.lrs
+++ b/components/rx/rxlogin.lrs
@@ -1,4 +1,4 @@
-{ - , lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TRxLoginForm','FORMDATA',[
'TPF0'#12'TRxLoginForm'#11'RxLoginForm'#6'Cursor'#7#7'crArrow'#4'Left'#3#202#1
@@ -6,7 +6,7 @@ LazarusResources.Add('TRxLoginForm','FORMDATA',[
+'erNameEdit'#11'BorderIcons'#11#12'biSystemMenu'#6'biHelp'#0#7'Caption'#6#11
+'RxLoginForm'#12'ClientHeight'#3#203#0#11'ClientWidth'#3#199#1#9'FormStyle'#7
+#11'fsStayOnTop'#8'OnCreate'#7#10'FormCreate'#6'OnShow'#7#8'FormShow'#8'Posi'
- +'tion'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#6'TImage'#7'AppIcon'
+ +'tion'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.29'#0#6'TImage'#7'AppIcon'
+#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4
+'Left'#2#6#6'Height'#2' '#3'Top'#2#6#5'Width'#2' '#8'AutoSize'#9#20'BorderSp'
+'acing.Around'#2#6#0#0#6'TImage'#8'KeyImage'#22'AnchorSideLeft.Control'#7#5
@@ -151,12 +151,12 @@ LazarusResources.Add('TRxLoginForm','FORMDATA',[
+'pacing.Around'#2#6#7'Caption'#6#9'HintLabel'#11'ParentColor'#8#13'ShowAccel'
+'Char'#8#0#0#6'TLabel'#13'UserNameLabel'#22'AnchorSideLeft.Control'#7#5'Owne'
+'r'#24'AnchorSideBottom.Control'#7#12'UserNameEdit'#21'AnchorSideBottom.Side'
- +#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#18#3'Top'#2'?'#5'Width'#2'F'#7'Ancho'
+ +#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#18#3'Top'#2'A'#5'Width'#2'I'#7'Ancho'
+'rs'#11#6'akLeft'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#7'Caption'#6#8'Us'
+'erName'#12'FocusControl'#7#12'UserNameEdit'#11'ParentColor'#8#0#0#6'TLabel'
+#13'PasswordLabel'#22'AnchorSideLeft.Control'#7#5'Owner'#24'AnchorSideBottom'
+'.Control'#7#12'PasswordEdit'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Lef'
- +'t'#2#6#6'Height'#2#18#3'Top'#2'`'#5'Width'#2'<'#7'Anchors'#11#6'akLeft'#8'a'
+ +'t'#2#6#6'Height'#2#18#3'Top'#2'd'#5'Width'#2'C'#7'Anchors'#11#6'akLeft'#8'a'
+'kBottom'#0#18'BorderSpacing.Left'#2#6#7'Caption'#6#8'Password'#12'FocusCont'
+'rol'#7#12'PasswordEdit'#11'ParentColor'#8#0#0#6'TLabel'#13'AppTitleLabel'#22
+'AnchorSideLeft.Control'#7#7'AppIcon'#19'AnchorSideLeft.Side'#7#9'asrBottom'
@@ -167,54 +167,53 @@ LazarusResources.Add('TRxLoginForm','FORMDATA',[
+#13'AppTitleLabel'#11'ParentColor'#8#13'ShowAccelChar'#8#0#0#6'TLabel'#13'Da'
+'taBaseLabel'#22'AnchorSideLeft.Control'#7#5'Owner'#24'AnchorSideBottom.Cont'
+'rol'#7#11'CustomCombo'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6
- +#6'Height'#2#18#3'Top'#3#133#0#5'Width'#2'?'#7'Anchors'#11#6'akLeft'#8'akBot'
+ +#6'Height'#2#18#3'Top'#3#137#0#5'Width'#2'C'#7'Anchors'#11#6'akLeft'#8'akBot'
+'tom'#0#18'BorderSpacing.Left'#2#6#7'Caption'#6#8'Database'#12'FocusControl'
+#7#11'CustomCombo'#11'ParentColor'#8#0#0#5'TEdit'#12'UserNameEdit'#22'Anchor'
+'SideLeft.Control'#7#13'UserNameLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'
+#21'AnchorSideTop.Control'#7#13'AppTitleLabel'#18'AnchorSideTop.Side'#7#9'as'
+'rBottom'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9
- +'asrBottom'#6'Cursor'#7#7'crIBeam'#4'Left'#2'^'#6'Height'#2#27#3'Top'#2'6'#5
- +'Width'#3'c'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#18
- +'BorderSpacing.Left'#2#12#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#0#0#5
- +'TEdit'#12'PasswordEdit'#22'AnchorSideLeft.Control'#7#12'UserNameEdit'#21'An'
- +'chorSideTop.Control'#7#12'UserNameEdit'#18'AnchorSideTop.Side'#7#9'asrBotto'
- +'m'#23'AnchorSideRight.Control'#7#12'UserNameEdit'#20'AnchorSideRight.Side'#7
- +#9'asrBottom'#6'Cursor'#7#7'crIBeam'#4'Left'#2'^'#6'Height'#2#27#3'Top'#2'W'
- +#5'Width'#3'c'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9
- +#17'BorderSpacing.Top'#2#6#8'EchoMode'#7#10'emPassword'#12'PasswordChar'#6#1
- +'*'#8'TabOrder'#2#1#0#0#9'TComboBox'#11'CustomCombo'#22'AnchorSideLeft.Contr'
- +'ol'#7#12'UserNameEdit'#21'AnchorSideTop.Control'#7#12'PasswordEdit'#18'Anch'
- +'orSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#12'UserNameEdi'
- +'t'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2'^'#6'Height'#2#31#3'To'
- +'p'#2'x'#5'Width'#3'c'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#12'Au'
- +'toComplete'#8#17'BorderSpacing.Top'#2#6#10'ItemHeight'#2#0#9'ItemWidth'#2#0
- +#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#2#0#0#7'TBitBtn'#5'btnOK'#22'An'
- +'chorSideLeft.Control'#7#12'PasswordEdit'#21'AnchorSideTop.Control'#7#9'btnC'
- +'ancel'#23'AnchorSideRight.Control'#7#9'btnCancel'#24'AnchorSideBottom.Contr'
- +'ol'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#190#0#6'H'
- +'eight'#2'&'#3'Top'#3#159#0#5'Width'#2'<'#7'Anchors'#11#5'akTop'#7'akRight'#8
- ,'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bott'
- +'om'#2#6#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#5'&'#208#158#208#154
- +#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#7'OnClick'#7#10'btnOKCli'
- +'ck'#8'TabOrder'#2#3#0#0#7'TBitBtn'#9'btnCancel'#21'AnchorSideTop.Control'#7
- +#11'CustomCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Co'
- +'ntrol'#7#7'btnHelp'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBo'
- +'ttom.Side'#7#9'asrBottom'#4'Left'#3#0#1#6'Height'#2'&'#3'Top'#3#159#0#5'Wid'
- +'th'#2']'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpac'
- +'ing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#2#6'Cancel'#9#7'Caption'#6
- +#12#208#158#209#130#208#188#208#181#208#189#208#176#4'Kind'#7#8'bkCancel'#11
- +'ModalResult'#2#2#8'TabOrder'#2#4#0#0#7'TBitBtn'#7'btnHelp'#21'AnchorSideTop'
- +'.Control'#7#9'btnCancel'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSi'
- +'deRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'Anc'
- +'horSideBottom.Side'#7#9'asrBottom'#4'Left'#3'c'#1#6'Height'#2'&'#3'Top'#3
- +#159#0#5'Width'#2'^'#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0#8'AutoS'
- +'ize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6
- +#15'&'#208#161#208#191#209#128#208#176#208#178#208#186#208#176#4'Kind'#7#6'b'
- +'kHelp'#8'TabOrder'#2#5#0#0#7'TBitBtn'#7'btnMore'#22'AnchorSideLeft.Control'
- +#7#5'Owner'#21'AnchorSideTop.Control'#7#9'btnCancel'#24'AnchorSideBottom.Con'
- +'trol'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Hei'
- +'ght'#2'&'#3'Top'#3#159#0#5'Width'#2'I'#7'Anchors'#11#5'akTop'#6'akLeft'#8'a'
- +'kBottom'#0#8'AutoSize'#9#18'BorderSpacing.Left'#2#6#20'BorderSpacing.Bottom'
- +#2#6#7'Caption'#6#7'More >>'#7'OnClick'#7#12'btnMoreClick'#8'TabOrder'#2#6#0
- +#0#0
+ +'asrBottom'#6'Cursor'#7#7'crIBeam'#4'Left'#2'a'#6'Height'#2#29#3'Top'#2'6'#5
+ +'Width'#3'`'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacin'
+ +'g.Left'#2#12#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#0#0#5'TEdit'#12'P'
+ +'asswordEdit'#22'AnchorSideLeft.Control'#7#12'UserNameEdit'#21'AnchorSideTop'
+ +'.Control'#7#12'UserNameEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'Ancho'
+ +'rSideRight.Control'#7#12'UserNameEdit'#20'AnchorSideRight.Side'#7#9'asrBott'
+ +'om'#6'Cursor'#7#7'crIBeam'#4'Left'#2'a'#6'Height'#2#29#3'Top'#2'Y'#5'Width'
+ +#3'`'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2
+ +#6#8'EchoMode'#7#10'emPassword'#12'PasswordChar'#6#1'*'#8'TabOrder'#2#1#0#0#9
+ +'TComboBox'#11'CustomCombo'#22'AnchorSideLeft.Control'#7#12'UserNameEdit'#21
+ +'AnchorSideTop.Control'#7#12'PasswordEdit'#18'AnchorSideTop.Side'#7#9'asrBot'
+ +'tom'#23'AnchorSideRight.Control'#7#12'UserNameEdit'#20'AnchorSideRight.Side'
+ +#7#9'asrBottom'#4'Left'#2'a'#6'Height'#2#31#3'Top'#2'|'#5'Width'#3'`'#1#7'An'
+ +'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#10'Item'
+ +'Height'#2#0#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#2#0#0#7'TBitBtn'#5
+ +'btnOK'#22'AnchorSideLeft.Control'#7#12'PasswordEdit'#21'AnchorSideTop.Contr'
+ +'ol'#7#9'btnCancel'#23'AnchorSideRight.Control'#7#9'btnCancel'#24'AnchorSide'
+ +'Bottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'
+ +#3#187#0#6'Height'#2'$'#3'Top'#3#161#0#5'Width'#2'<'#7'Anchors'#11#5'akTop'#7
+ +'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderS'
+ ,'pacing.Bottom'#2#6#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#5'&'#208
+ +#158#208#154#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#7'OnClick'#7
+ +#10'btnOKClick'#8'TabOrder'#2#3#0#0#7'TBitBtn'#9'btnCancel'#21'AnchorSideTop'
+ +'.Control'#7#11'CustomCombo'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'Anchor'
+ +'SideRight.Control'#7#7'btnHelp'#24'AnchorSideBottom.Control'#7#5'Owner'#21
+ +'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#253#0#6'Height'#2'$'#3'Top'
+ +#3#161#0#5'Width'#2'_'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9
+ +#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#2#6'Cancel'#9#7
+ +'Caption'#6#12#208#158#209#130#208#188#208#181#208#189#208#176#4'Kind'#7#8'b'
+ +'kCancel'#11'ModalResult'#2#2#8'TabOrder'#2#4#0#0#7'TBitBtn'#7'btnHelp'#21'A'
+ +'nchorSideTop.Control'#7#9'btnCancel'#23'AnchorSideRight.Control'#7#5'Owner'
+ +#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Ow'
+ +'ner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'b'#1#6'Height'#2'$'
+ +#3'Top'#3#161#0#5'Width'#2'_'#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0
+ +#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Ca'
+ +'ption'#6#15'&'#208#161#208#191#209#128#208#176#208#178#208#186#208#176#4'Ki'
+ +'nd'#7#6'bkHelp'#8'TabOrder'#2#5#0#0#7'TBitBtn'#7'btnMore'#22'AnchorSideLeft'
+ +'.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#9'btnCancel'#24'AnchorSide'
+ +'Bottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'
+ +#2#6#6'Height'#2'$'#3'Top'#3#161#0#5'Width'#2'N'#7'Anchors'#11#5'akTop'#6'ak'
+ +'Left'#8'akBottom'#0#8'AutoSize'#9#18'BorderSpacing.Left'#2#6#20'BorderSpaci'
+ +'ng.Bottom'#2#6#7'Caption'#6#7'More >>'#7'OnClick'#7#12'btnMoreClick'#8'TabO'
+ +'rder'#2#6#0#0#0
]);
diff --git a/components/rx/rxlogin.pas b/components/rx/rxlogin.pas
index 87fa6d5ef..92cf0d49e 100644
--- a/components/rx/rxlogin.pas
+++ b/components/rx/rxlogin.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxlogin unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxlogin;
diff --git a/components/rx/rxlookup.pas b/components/rx/rxlookup.pas
index 51a74e2f4..8b0ee4309 100644
--- a/components/rx/rxlookup.pas
+++ b/components/rx/rxlookup.pas
@@ -1,3 +1,34 @@
+{ rxlookup unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxlookup;
{$I rx.inc}
diff --git a/components/rx/rxmemds.pas b/components/rx/rxmemds.pas
index 5e930a3c0..77b68e8df 100644
--- a/components/rx/rxmemds.pas
+++ b/components/rx/rxmemds.pas
@@ -1,10 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxmemds unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxmemds;
diff --git a/components/rx/rxnew.lpk b/components/rx/rxnew.lpk
index 23b440246..e0d6c09b7 100644
--- a/components/rx/rxnew.lpk
+++ b/components/rx/rxnew.lpk
@@ -26,7 +26,7 @@ translate to Lazarus by alexs in 2005 - 2009
-
+
@@ -117,150 +117,130 @@ translate to Lazarus by alexs in 2005 - 2009
-
-
-
-
-
-
-
-
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
-
-
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
-
-
-
-
-
-
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
-
+
+
-
+
diff --git a/components/rx/rxpopupunit.pas b/components/rx/rxpopupunit.pas
index 765f535d1..1d80444ae 100644
--- a/components/rx/rxpopupunit.pas
+++ b/components/rx/rxpopupunit.pas
@@ -1,3 +1,34 @@
+{ rxpopupunit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxpopupunit;
{$I rx.inc}
diff --git a/components/rx/rxsortby.lrs b/components/rx/rxsortby.lrs
index a8ba63b02..4a9445fb6 100644
--- a/components/rx/rxsortby.lrs
+++ b/components/rx/rxsortby.lrs
@@ -1,4 +1,4 @@
-{ Это - файл ресурсов, автоматически созданный lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TrxSortByForm','FORMDATA',[
'TPF0'#13'TrxSortByForm'#12'rxSortByForm'#4'Left'#3#194#1#6'Height'#3#155#1#3
diff --git a/components/rx/rxsortby.pas b/components/rx/rxsortby.pas
index 87c1089b3..50f970da0 100644
--- a/components/rx/rxsortby.pas
+++ b/components/rx/rxsortby.pas
@@ -1,3 +1,34 @@
+{ RXDBGrid unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxsortby;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxsortmemds.pas b/components/rx/rxsortmemds.pas
index 1860aeecd..c317bf87c 100644
--- a/components/rx/rxsortmemds.pas
+++ b/components/rx/rxsortmemds.pas
@@ -1,6 +1,7 @@
{ This module from FPC port of RX components library
- Copyright (C) 2006-2009 Lagunov Aleksey (alexs75@hotbox.ru)
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
diff --git a/components/rx/rxspin.pas b/components/rx/rxspin.pas
index ea496be1a..a4288adbe 100644
--- a/components/rx/rxspin.pas
+++ b/components/rx/rxspin.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxspin unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxspin;
diff --git a/components/rx/rxstrutils.pas b/components/rx/rxstrutils.pas
index 57c5f566b..6f0556e7c 100644
--- a/components/rx/rxstrutils.pas
+++ b/components/rx/rxstrutils.pas
@@ -1,9 +1,35 @@
+{ RxStrUtils unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ Copyright (c) 1995, 1996 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
{ This unit based on AlexGraf String Library }
{ by Alexei Lukin (c) 1992 }
{ }
diff --git a/components/rx/rxswitch.pas b/components/rx/rxswitch.pas
index a47be5127..a976b21c6 100644
--- a/components/rx/rxswitch.pas
+++ b/components/rx/rxswitch.pas
@@ -1,11 +1,33 @@
-{*******************************************************}
-{ }
-{ Delphi VCL Extensions (RX) }
-{ }
-{ Copyright (c) 1995 AO ROSNO }
-{ Copyright (c) 1997, 1998 Master-Bank }
-{ }
-{*******************************************************}
+{ rxswitch unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
unit rxswitch;
diff --git a/components/rx/rxtbrsetup.lfm b/components/rx/rxtbrsetup.lfm
index 20e1ed4d3..1f2199fed 100644
--- a/components/rx/rxtbrsetup.lfm
+++ b/components/rx/rxtbrsetup.lfm
@@ -13,19 +13,19 @@ object ToolPanelSetupForm: TToolPanelSetupForm
OnDestroy = FormDestroy
OnResize = FormResize
Position = poScreenCenter
- LCLVersion = '0.9.27'
+ LCLVersion = '0.9.29'
object PageControl1: TPageControl
Left = 0
- Height = 433
+ Height = 435
Top = 0
Width = 659
- ActivePage = TabSheet2
+ ActivePage = TabSheet1
Align = alClient
- TabIndex = 1
+ TabIndex = 0
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'Visible buttons'
- ClientHeight = 402
+ ClientHeight = 404
ClientWidth = 655
object Label1: TLabel
AnchorSideLeft.Control = BitBtn3
@@ -130,7 +130,7 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = cbShowCaption
Left = 355
- Height = 271
+ Height = 275
Top = 30
Width = 294
Anchors = [akTop, akLeft, akRight, akBottom]
@@ -157,7 +157,7 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideRight.Control = BitBtn6
AnchorSideBottom.Control = cbShowCaption
Left = 14
- Height = 271
+ Height = 275
Top = 30
Width = 286
Anchors = [akTop, akLeft, akRight, akBottom]
@@ -174,7 +174,7 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideBottom.Side = asrBottom
Left = 3
Height = 62
- Top = 334
+ Top = 336
Width = 643
Alignment = taLeftJustify
Anchors = [akLeft, akRight, akBottom]
@@ -187,9 +187,9 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideLeft.Control = TabSheet1
AnchorSideBottom.Control = Panel1
Left = 6
- Height = 21
- Top = 307
- Width = 116
+ Height = 19
+ Top = 311
+ Width = 113
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'Show caption'
@@ -199,16 +199,16 @@ object ToolPanelSetupForm: TToolPanelSetupForm
end
object TabSheet2: TTabSheet
Caption = 'Options'
- ClientHeight = 402
+ ClientHeight = 404
ClientWidth = 655
object cbShowHint: TCheckBox
AnchorSideLeft.Control = TabSheet2
AnchorSideTop.Control = cbTransp
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 21
- Top = 163
- Width = 91
+ Height = 19
+ Top = 159
+ Width = 88
BorderSpacing.Around = 6
Caption = 'Show hint'
TabOrder = 0
@@ -218,9 +218,9 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideTop.Control = cbFlatBtn
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 21
- Top = 136
- Width = 105
+ Height = 19
+ Top = 134
+ Width = 102
BorderSpacing.Around = 6
Caption = 'Transparent'
TabOrder = 1
@@ -230,9 +230,9 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideTop.Control = RadioGroup1
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 21
+ Height = 19
Top = 109
- Width = 105
+ Width = 102
BorderSpacing.Around = 6
Caption = 'Flat buttons'
TabOrder = 2
@@ -257,8 +257,8 @@ object ToolPanelSetupForm: TToolPanelSetupForm
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
- ClientHeight = 78
- ClientWidth = 310
+ ClientHeight = 76
+ ClientWidth = 306
Items.Strings = (
'None'
'Left'
@@ -272,7 +272,7 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideTop.Control = TabSheet2
AnchorSideRight.Control = Panel2
Left = 6
- Height = 94
+ Height = 90
Top = 6
Width = 314
Anchors = [akTop, akLeft, akRight]
@@ -288,8 +288,8 @@ object ToolPanelSetupForm: TToolPanelSetupForm
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
- ClientHeight = 75
- ClientWidth = 310
+ ClientHeight = 69
+ ClientWidth = 306
Items.Strings = (
'Standart'
'Windows XP'
@@ -305,7 +305,7 @@ object ToolPanelSetupForm: TToolPanelSetupForm
AnchorSideBottom.Control = TabSheet2
AnchorSideBottom.Side = asrBottom
Left = 326
- Height = 390
+ Height = 392
Top = 6
Width = 3
Anchors = [akTop, akLeft, akBottom]
@@ -316,8 +316,8 @@ object ToolPanelSetupForm: TToolPanelSetupForm
end
object ButtonPanel1: TButtonPanel
Left = 6
- Height = 42
- Top = 439
+ Height = 40
+ Top = 441
Width = 647
TabOrder = 1
ShowButtons = [pbClose, pbHelp]
diff --git a/components/rx/rxtbrsetup.lrs b/components/rx/rxtbrsetup.lrs
index 0c3ecf46b..eded17722 100644
--- a/components/rx/rxtbrsetup.lrs
+++ b/components/rx/rxtbrsetup.lrs
@@ -1,112 +1,112 @@
-{ - , lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TToolPanelSetupForm','FORMDATA',[
- 'TPF0'#19'TToolPanelSetupForm'#18'ToolPanelSetupForm'#4'Left'#3''#1#6'Height'
- +#3#231#1#3'Top'#3#176#0#5'Width'#3#147#2#13'ActiveControl'#7#12'PageControl1'
- +#7'Caption'#6#16'Tool panel setup'#12'ClientHeight'#3#231#1#11'ClientWidth'#3
- +#147#2#9'FormStyle'#7#11'fsStayOnTop'#7'OnClose'#7#9'FormClose'#8'OnCreate'#7
- +#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#8'OnResize'#7#10'FormResize'#8
- +'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#12'TPageControl'
- +#12'PageControl1'#4'Left'#2#0#6'Height'#3#177#1#3'Top'#2#0#5'Width'#3#147#2
- +#10'ActivePage'#7#9'TabSheet2'#5'Align'#7#8'alClient'#8'TabIndex'#2#1#8'TabO'
- +'rder'#2#0#0#9'TTabSheet'#9'TabSheet1'#7'Caption'#6#15'Visible buttons'#12'C'
- +'lientHeight'#3#146#1#11'ClientWidth'#3#143#2#0#6'TLabel'#6'Label1'#22'Ancho'
- +'rSideLeft.Control'#7#7'BitBtn3'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'A'
- +'nchorSideTop.Control'#7#9'TabSheet1'#4'Left'#3'c'#1#6'Height'#2#18#3'Top'#2
- +#6#5'Width'#2'u'#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'Avaliable butt'
- +'ons'#12'FocusControl'#7#16'ListBtnAvaliable'#11'ParentColor'#8#0#0#6'TLabel'
- +#6'Label2'#21'AnchorSideTop.Control'#7#9'TabSheet1'#4'Left'#2#8#6'Height'#2
- +#18#3'Top'#2#6#5'Width'#2'g'#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'Vi'
- +'sible buttons'#12'FocusControl'#7#14'ListBtnVisible'#11'ParentColor'#8#0#0#7
- +'TBitBtn'#7'BitBtn3'#22'AnchorSideLeft.Control'#7#7'BitBtn6'#21'AnchorSideTo'
- +'p.Control'#7#7'BitBtn4'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSide'
- +'Right.Control'#7#7'BitBtn6'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'
- +#3'2'#1#6'Height'#2#30#3'Top'#3#152#0#5'Width'#2'+'#7'Anchors'#11#5'akTop'#6
- +'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#25'BorderSpacing.InnerBorder'
- +#2#2#7'Caption'#6#2'<<'#9'NumGlyphs'#2#0#7'OnClick'#7#12'BitBtn3Click'#8'Tab'
- +'Order'#2#0#0#0#7'TBitBtn'#7'BitBtn4'#22'AnchorSideLeft.Control'#7#7'BitBtn6'
- +#21'AnchorSideTop.Control'#7#7'BitBtn5'#18'AnchorSideTop.Side'#7#9'asrBottom'
- +#23'AnchorSideRight.Control'#7#7'BitBtn6'#20'AnchorSideRight.Side'#7#9'asrBo'
- +'ttom'#4'Left'#3'2'#1#6'Height'#2'!'#3'Top'#2'q'#5'Width'#2'+'#7'Anchors'#11
- +#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#17'BorderSpacing.Top'#2#6#25
- +'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#1'<'#9'NumGlyphs'#2#0#7'OnClick'
- +#7#12'BitBtn4Click'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'BitBtn5'#22'AnchorSideL'
- +'eft.Control'#7#7'BitBtn6'#21'AnchorSideTop.Control'#7#7'BitBtn6'#18'AnchorS'
- +'ideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#7'BitBtn6'#20'Anc'
- +'horSideRight.Side'#7#9'asrBottom'#4'Left'#3'2'#1#6'Height'#2'&'#3'Top'#2'E'
- +#5'Width'#2'+'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacin'
- +'g.Top'#2#6#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#1'>'#9'NumGlyphs'
- +#2#0#7'OnClick'#7#12'BitBtn5Click'#8'TabOrder'#2#2#0#0#7'TBitBtn'#7'BitBtn6'
- +#22'AnchorSideLeft.Control'#7#9'TabSheet1'#19'AnchorSideLeft.Side'#7#9'asrCe'
- +'nter'#21'AnchorSideTop.Control'#7#16'ListBtnAvaliable'#4'Left'#3'2'#1#6'Hei'
- +'ght'#2'!'#3'Top'#2#30#5'Width'#2'+'#8'AutoSize'#9#25'BorderSpacing.InnerBor'
- +'der'#2#2#7'Caption'#6#2'>>'#9'NumGlyphs'#2#0#7'OnClick'#7#12'BitBtn6Click'#8
- +'TabOrder'#2#3#0#0#8'TListBox'#16'ListBtnAvaliable'#22'AnchorSideLeft.Contro'
- +'l'#7#7'BitBtn3'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Con'
- +'trol'#7#6'Label1'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.'
- +'Control'#7#9'TabSheet1'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSi'
- +'deBottom.Control'#7#13'cbShowCaption'#4'Left'#3'c'#1#6'Height'#3#15#1#3'Top'
- +#2#30#5'Width'#3'&'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'
- +#0#20'BorderSpacing.Around'#2#6#13'Items.Strings'#1#6#3'111'#6#3'222'#6#3'33'
- +'3'#6#2'44'#6#3'555'#6#3'666'#6#3'777'#0#10'ItemHeight'#2#0#7'OnClick'#7#21
- +'ListBtnAvaliableClick'#10'OnDrawItem'#7#16'ListBox1DrawItem'#5'Style'#7#16
- +'lbOwnerDrawFixed'#8'TabOrder'#2#4#0#0#8'TListBox'#14'ListBtnVisible'#22'Anc'
- +'horSideLeft.Control'#7#6'Label2'#21'AnchorSideTop.Control'#7#6'Label2'#18'A'
- +'nchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#7'BitBtn6'
- +#24'AnchorSideBottom.Control'#7#13'cbShowCaption'#4'Left'#2#14#6'Height'#3#15
- +#1#3'Top'#2#30#5'Width'#3#30#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8
- +'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#7'OnClick'#7#21
- +'ListBtnAvaliableClick'#10'OnDrawItem'#7#16'ListBox1DrawItem'#5'Style'#7#16
- +'lbOwnerDrawFixed'#8'TabOrder'#2#5#8'TopIndex'#2#255#0#0#6'TPanel'#6'Panel1'
- +#24'AnchorSideBottom.Control'#7#9'TabSheet1'#21'AnchorSideBottom.Side'#7#9'a'
- +'srBottom'#4'Left'#2#3#6'Height'#2'>'#3'Top'#3'N'#1#5'Width'#3#131#2#9'Align'
- +'ment'#7#13'taLeftJustify'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0
- +#20'BorderSpacing.Around'#2#6#10'BevelOuter'#7#9'bvLowered'#11'FullRepaint'#8
- +#8'TabOrder'#2#6#0#0#9'TCheckBox'#13'cbShowCaption'#22'AnchorSideLeft.Contro'
- +'l'#7#9'TabSheet1'#24'AnchorSideBottom.Control'#7#6'Panel1'#4'Left'#2#6#6'He'
- +'ight'#2#21#3'Top'#3'3'#1#5'Width'#2't'#7'Anchors'#11#6'akLeft'#8'akBottom'#0
- ,#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'Show caption'#8'OnChange'#7#19
- +'cbShowCaptionChange'#8'TabOrder'#2#7#0#0#0#9'TTabSheet'#9'TabSheet2'#7'Capt'
- +'ion'#6#7'Options'#12'ClientHeight'#3#146#1#11'ClientWidth'#3#143#2#0#9'TChe'
- +'ckBox'#10'cbShowHint'#22'AnchorSideLeft.Control'#7#9'TabSheet2'#21'AnchorSi'
- +'deTop.Control'#7#8'cbTransp'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2
- +#6#6'Height'#2#21#3'Top'#3#163#0#5'Width'#2'['#20'BorderSpacing.Around'#2#6#7
- +'Caption'#6#9'Show hint'#8'TabOrder'#2#0#0#0#9'TCheckBox'#8'cbTransp'#22'Anc'
- +'horSideLeft.Control'#7#9'TabSheet2'#21'AnchorSideTop.Control'#7#9'cbFlatBtn'
- +#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#21#3'Top'#3
- +#136#0#5'Width'#2'i'#20'BorderSpacing.Around'#2#6#7'Caption'#6#11'Transparen'
- +'t'#8'TabOrder'#2#1#0#0#9'TCheckBox'#9'cbFlatBtn'#22'AnchorSideLeft.Control'
- +#7#9'TabSheet2'#21'AnchorSideTop.Control'#7#11'RadioGroup1'#18'AnchorSideTop'
- +'.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#21#3'Top'#2'm'#5'Width'#2'i'
- +#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'Flat buttons'#8'TabOrder'#2#2#0
- +#0#11'TRadioGroup'#11'RadioGroup1'#22'AnchorSideLeft.Control'#7#6'Panel2'#19
- +'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#9'TabSheet2'
- +#23'AnchorSideRight.Control'#7#9'TabSheet2'#20'AnchorSideRight.Side'#7#9'asr'
- +'Bottom'#4'Left'#3'O'#1#6'Height'#2'a'#3'Top'#2#6#5'Width'#3':'#1#7'Anchors'
- +#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#8#20'BorderSpacing.Around'#2
- +#6#7'Caption'#6#12'Button align'#28'ChildSizing.LeftRightSpacing'#2#6#28'Chi'
- +'ldSizing.TopBottomSpacing'#2#6#28'ChildSizing.ShrinkHorizontal'#7#14'crsSca'
- +'leChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizin'
- +'g.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLin'
- +'e'#2#1#12'ClientHeight'#2'N'#11'ClientWidth'#3'6'#1#13'Items.Strings'#1#6#4
- +'None'#6#4'Left'#6#5'Rignt'#0#8'TabOrder'#2#3#7'TabStop'#9#0#0#11'TRadioGrou'
- +'p'#11'RadioGroup2'#22'AnchorSideLeft.Control'#7#9'TabSheet2'#21'AnchorSideT'
- +'op.Control'#7#9'TabSheet2'#23'AnchorSideRight.Control'#7#6'Panel2'#4'Left'#2
- +#6#6'Height'#2'^'#3'Top'#2#6#5'Width'#3':'#1#7'Anchors'#11#5'akTop'#6'akLeft'
- +#7'akRight'#0#8'AutoFill'#9#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Cap'
- +'tion'#6#14'Tool bar style'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSiz'
- +'ing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogen'
- +'ousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResi'
- +'ze'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.Sh'
- +'rinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRig'
- +'htThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'K'
- +#11'ClientWidth'#3'6'#1#13'Items.Strings'#1#6#8'Standart'#6#10'Windows XP'#6
- +#6'Native'#0#8'TabOrder'#2#4#7'TabStop'#9#0#0#6'TPanel'#6'Panel2'#22'AnchorS'
- +'ideLeft.Control'#7#9'TabSheet2'#19'AnchorSideLeft.Side'#7#9'asrCenter'#21'A'
- +'nchorSideTop.Control'#7#9'TabSheet2'#24'AnchorSideBottom.Control'#7#9'TabSh'
- +'eet2'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'F'#1#6'Height'#3
- +#134#1#3'Top'#2#6#5'Width'#2#3#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0
- +#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0#0#0#0#12'TButtonPanel'#12'Bu'
- +'ttonPanel1'#4'Left'#2#6#6'Height'#2'*'#3'Top'#3#183#1#5'Width'#3#135#2#8'Ta'
- +'bOrder'#2#1#11'ShowButtons'#11#7'pbClose'#6'pbHelp'#0#0#0#0
+ 'TPF0'#19'TToolPanelSetupForm'#18'ToolPanelSetupForm'#4'Left'#3#127#1#6'Heigh'
+ +'t'#3#231#1#3'Top'#3#176#0#5'Width'#3#147#2#13'ActiveControl'#7#12'PageContr'
+ +'ol1'#7'Caption'#6#16'Tool panel setup'#12'ClientHeight'#3#231#1#11'ClientWi'
+ +'dth'#3#147#2#9'FormStyle'#7#11'fsStayOnTop'#7'OnClose'#7#9'FormClose'#8'OnC'
+ +'reate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#8'OnResize'#7#10'For'
+ +'mResize'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.29'#0#12'T'
+ +'PageControl'#12'PageControl1'#4'Left'#2#0#6'Height'#3#179#1#3'Top'#2#0#5'Wi'
+ +'dth'#3#147#2#10'ActivePage'#7#9'TabSheet1'#5'Align'#7#8'alClient'#8'TabInde'
+ +'x'#2#0#8'TabOrder'#2#0#0#9'TTabSheet'#9'TabSheet1'#7'Caption'#6#15'Visible '
+ +'buttons'#12'ClientHeight'#3#148#1#11'ClientWidth'#3#143#2#0#6'TLabel'#6'Lab'
+ +'el1'#22'AnchorSideLeft.Control'#7#7'BitBtn3'#19'AnchorSideLeft.Side'#7#9'as'
+ +'rBottom'#21'AnchorSideTop.Control'#7#9'TabSheet1'#4'Left'#3'c'#1#6'Height'#2
+ +#18#3'Top'#2#6#5'Width'#2'u'#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'Av'
+ +'aliable buttons'#12'FocusControl'#7#16'ListBtnAvaliable'#11'ParentColor'#8#0
+ +#0#6'TLabel'#6'Label2'#21'AnchorSideTop.Control'#7#9'TabSheet1'#4'Left'#2#8#6
+ +'Height'#2#18#3'Top'#2#6#5'Width'#2'g'#20'BorderSpacing.Around'#2#6#7'Captio'
+ +'n'#6#15'Visible buttons'#12'FocusControl'#7#14'ListBtnVisible'#11'ParentCol'
+ +'or'#8#0#0#7'TBitBtn'#7'BitBtn3'#22'AnchorSideLeft.Control'#7#7'BitBtn6'#21
+ +'AnchorSideTop.Control'#7#7'BitBtn4'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
+ +'AnchorSideRight.Control'#7#7'BitBtn6'#20'AnchorSideRight.Side'#7#9'asrBotto'
+ +'m'#4'Left'#3'2'#1#6'Height'#2#30#3'Top'#3#152#0#5'Width'#2'+'#7'Anchors'#11
+ +#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#25'BorderSpacing.'
+ +'InnerBorder'#2#2#7'Caption'#6#2'<<'#9'NumGlyphs'#2#0#7'OnClick'#7#12'BitBtn'
+ +'3Click'#8'TabOrder'#2#0#0#0#7'TBitBtn'#7'BitBtn4'#22'AnchorSideLeft.Control'
+ +#7#7'BitBtn6'#21'AnchorSideTop.Control'#7#7'BitBtn5'#18'AnchorSideTop.Side'#7
+ +#9'asrBottom'#23'AnchorSideRight.Control'#7#7'BitBtn6'#20'AnchorSideRight.Si'
+ +'de'#7#9'asrBottom'#4'Left'#3'2'#1#6'Height'#2'!'#3'Top'#2'q'#5'Width'#2'+'#7
+ +'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#17'BorderSpacing.'
+ +'Top'#2#6#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#1'<'#9'NumGlyphs'#2
+ +#0#7'OnClick'#7#12'BitBtn4Click'#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'BitBtn5'#22
+ +'AnchorSideLeft.Control'#7#7'BitBtn6'#21'AnchorSideTop.Control'#7#7'BitBtn6'
+ +#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#7'BitBt'
+ +'n6'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3'2'#1#6'Height'#2'&'#3
+ +'Top'#2'E'#5'Width'#2'+'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'Bo'
+ +'rderSpacing.Top'#2#6#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#1'>'#9
+ +'NumGlyphs'#2#0#7'OnClick'#7#12'BitBtn5Click'#8'TabOrder'#2#2#0#0#7'TBitBtn'
+ +#7'BitBtn6'#22'AnchorSideLeft.Control'#7#9'TabSheet1'#19'AnchorSideLeft.Side'
+ +#7#9'asrCenter'#21'AnchorSideTop.Control'#7#16'ListBtnAvaliable'#4'Left'#3'2'
+ +#1#6'Height'#2'!'#3'Top'#2#30#5'Width'#2'+'#8'AutoSize'#9#25'BorderSpacing.I'
+ +'nnerBorder'#2#2#7'Caption'#6#2'>>'#9'NumGlyphs'#2#0#7'OnClick'#7#12'BitBtn6'
+ +'Click'#8'TabOrder'#2#3#0#0#8'TListBox'#16'ListBtnAvaliable'#22'AnchorSideLe'
+ +'ft.Control'#7#7'BitBtn3'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSi'
+ +'deTop.Control'#7#6'Label1'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorS'
+ +'ideRight.Control'#7#9'TabSheet1'#20'AnchorSideRight.Side'#7#9'asrBottom'#24
+ +'AnchorSideBottom.Control'#7#13'cbShowCaption'#4'Left'#3'c'#1#6'Height'#3#19
+ +#1#3'Top'#2#30#5'Width'#3'&'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8
+ +'akBottom'#0#20'BorderSpacing.Around'#2#6#13'Items.Strings'#1#6#3'111'#6#3'2'
+ +'22'#6#3'333'#6#2'44'#6#3'555'#6#3'666'#6#3'777'#0#10'ItemHeight'#2#0#7'OnCl'
+ +'ick'#7#21'ListBtnAvaliableClick'#10'OnDrawItem'#7#16'ListBox1DrawItem'#5'St'
+ +'yle'#7#16'lbOwnerDrawFixed'#8'TabOrder'#2#4#0#0#8'TListBox'#14'ListBtnVisib'
+ +'le'#22'AnchorSideLeft.Control'#7#6'Label2'#21'AnchorSideTop.Control'#7#6'La'
+ +'bel2'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#7
+ +'BitBtn6'#24'AnchorSideBottom.Control'#7#13'cbShowCaption'#4'Left'#2#14#6'He'
+ +'ight'#3#19#1#3'Top'#2#30#5'Width'#3#30#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
+ +'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#7'On'
+ +'Click'#7#21'ListBtnAvaliableClick'#10'OnDrawItem'#7#16'ListBox1DrawItem'#5
+ +'Style'#7#16'lbOwnerDrawFixed'#8'TabOrder'#2#5#8'TopIndex'#2#255#0#0#6'TPane'
+ +'l'#6'Panel1'#24'AnchorSideBottom.Control'#7#9'TabSheet1'#21'AnchorSideBotto'
+ +'m.Side'#7#9'asrBottom'#4'Left'#2#3#6'Height'#2'>'#3'Top'#3'P'#1#5'Width'#3
+ +#131#2#9'Alignment'#7#13'taLeftJustify'#7'Anchors'#11#6'akLeft'#7'akRight'#8
+ +'akBottom'#0#20'BorderSpacing.Around'#2#6#10'BevelOuter'#7#9'bvLowered'#11'F'
+ +'ullRepaint'#8#8'TabOrder'#2#6#0#0#9'TCheckBox'#13'cbShowCaption'#22'AnchorS'
+ +'ideLeft.Control'#7#9'TabSheet1'#24'AnchorSideBottom.Control'#7#6'Panel1'#4
+ +'Left'#2#6#6'Height'#2#19#3'Top'#3'7'#1#5'Width'#2'q'#7'Anchors'#11#6'akLeft'
+ ,#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'Show caption'#8
+ +'OnChange'#7#19'cbShowCaptionChange'#8'TabOrder'#2#7#0#0#0#9'TTabSheet'#9'Ta'
+ +'bSheet2'#7'Caption'#6#7'Options'#12'ClientHeight'#3#148#1#11'ClientWidth'#3
+ +#143#2#0#9'TCheckBox'#10'cbShowHint'#22'AnchorSideLeft.Control'#7#9'TabSheet'
+ +'2'#21'AnchorSideTop.Control'#7#8'cbTransp'#18'AnchorSideTop.Side'#7#9'asrBo'
+ +'ttom'#4'Left'#2#6#6'Height'#2#19#3'Top'#3#159#0#5'Width'#2'X'#20'BorderSpac'
+ +'ing.Around'#2#6#7'Caption'#6#9'Show hint'#8'TabOrder'#2#0#0#0#9'TCheckBox'#8
+ +'cbTransp'#22'AnchorSideLeft.Control'#7#9'TabSheet2'#21'AnchorSideTop.Contro'
+ +'l'#7#9'cbFlatBtn'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Heigh'
+ +'t'#2#19#3'Top'#3#134#0#5'Width'#2'f'#20'BorderSpacing.Around'#2#6#7'Caption'
+ +#6#11'Transparent'#8'TabOrder'#2#1#0#0#9'TCheckBox'#9'cbFlatBtn'#22'AnchorSi'
+ +'deLeft.Control'#7#9'TabSheet2'#21'AnchorSideTop.Control'#7#11'RadioGroup1'
+ +#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#19#3'Top'#2'm'
+ +#5'Width'#2'f'#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'Flat buttons'#8
+ +'TabOrder'#2#2#0#0#11'TRadioGroup'#11'RadioGroup1'#22'AnchorSideLeft.Control'
+ +#7#6'Panel2'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'
+ +#7#9'TabSheet2'#23'AnchorSideRight.Control'#7#9'TabSheet2'#20'AnchorSideRigh'
+ +'t.Side'#7#9'asrBottom'#4'Left'#3'O'#1#6'Height'#2'a'#3'Top'#2#6#5'Width'#3
+ +':'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#8#20'BorderS'
+ +'pacing.Around'#2#6#7'Caption'#6#12'Button align'#28'ChildSizing.LeftRightSp'
+ +'acing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#28'ChildSizing.ShrinkHorizo'
+ +'ntal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChil'
+ +'ds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizi'
+ +'ng.ControlsPerLine'#2#1#12'ClientHeight'#2'L'#11'ClientWidth'#3'2'#1#13'Ite'
+ +'ms.Strings'#1#6#4'None'#6#4'Left'#6#5'Rignt'#0#8'TabOrder'#2#3#7'TabStop'#9
+ +#0#0#11'TRadioGroup'#11'RadioGroup2'#22'AnchorSideLeft.Control'#7#9'TabSheet'
+ +'2'#21'AnchorSideTop.Control'#7#9'TabSheet2'#23'AnchorSideRight.Control'#7#6
+ +'Panel2'#4'Left'#2#6#6'Height'#2'Z'#3'Top'#2#6#5'Width'#3':'#1#7'Anchors'#11
+ +#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#9#8'AutoSize'#9#20'BorderSpacin'
+ +'g.Around'#2#6#7'Caption'#6#14'Tool bar style'#28'ChildSizing.LeftRightSpaci'
+ +'ng'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizont'
+ +'al'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crs'
+ +'HomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'
+ +#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7
+ +#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'Cl'
+ +'ientHeight'#2'E'#11'ClientWidth'#3'2'#1#13'Items.Strings'#1#6#8'Standart'#6
+ +#10'Windows XP'#6#6'Native'#0#8'TabOrder'#2#4#7'TabStop'#9#0#0#6'TPanel'#6'P'
+ +'anel2'#22'AnchorSideLeft.Control'#7#9'TabSheet2'#19'AnchorSideLeft.Side'#7#9
+ +'asrCenter'#21'AnchorSideTop.Control'#7#9'TabSheet2'#24'AnchorSideBottom.Con'
+ +'trol'#7#9'TabSheet2'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'F'#1
+ +#6'Height'#3#136#1#3'Top'#2#6#5'Width'#2#3#7'Anchors'#11#5'akTop'#6'akLeft'#8
+ +'akBottom'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0#0#0#0#12'TButton'
+ +'Panel'#12'ButtonPanel1'#4'Left'#2#6#6'Height'#2'('#3'Top'#3#185#1#5'Width'#3
+ +#135#2#8'TabOrder'#2#1#11'ShowButtons'#11#7'pbClose'#6'pbHelp'#0#0#0#0
]);
diff --git a/components/rx/rxtbrsetup.pas b/components/rx/rxtbrsetup.pas
index 2942b67a5..d580743db 100644
--- a/components/rx/rxtbrsetup.pas
+++ b/components/rx/rxtbrsetup.pas
@@ -1,3 +1,34 @@
+{ rxtbrsetup unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxtbrsetup;
{$I rx.inc}
diff --git a/components/rx/rxtimeedit.pas b/components/rx/rxtimeedit.pas
index b4fb01675..d0565c638 100644
--- a/components/rx/rxtimeedit.pas
+++ b/components/rx/rxtimeedit.pas
@@ -1,3 +1,34 @@
+{ RxTimeEdit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit RxTimeEdit;
{$mode objfpc}{$H+}
diff --git a/components/rx/rxtoolbar.pas b/components/rx/rxtoolbar.pas
index 144150aed..567a56688 100644
--- a/components/rx/rxtoolbar.pas
+++ b/components/rx/rxtoolbar.pas
@@ -1,3 +1,34 @@
+{ rxtoolbar unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxtoolbar;
{$I rx.inc}
diff --git a/components/rx/rxxpman.pas b/components/rx/rxxpman.pas
index 618489be1..b24ac1943 100644
--- a/components/rx/rxxpman.pas
+++ b/components/rx/rxxpman.pas
@@ -1,3 +1,34 @@
+{ rxxpman unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit rxxpman;
{$mode objfpc}{$H+}
@@ -22,7 +53,7 @@ type
implementation
{$IFDEF WIN32}
-{$R WindowsXP.RES}
+{.$R WindowsXP.RES}
{$ENDIF}
end.
diff --git a/components/rx/seldsfrm.lfm b/components/rx/seldsfrm.lfm
index d63b4d5d6..04276bd6c 100644
--- a/components/rx/seldsfrm.lfm
+++ b/components/rx/seldsfrm.lfm
@@ -9,14 +9,14 @@ object SelectDataSetForm: TSelectDataSetForm
ClientWidth = 400
OnCreate = FormCreate
Position = poScreenCenter
- LCLVersion = '0.9.27'
+ LCLVersion = '0.9.29'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 18
- Top = 33
+ Top = 31
Width = 106
BorderSpacing.Around = 6
Caption = 'Sourse dataset'
@@ -27,9 +27,9 @@ object SelectDataSetForm: TSelectDataSetForm
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
- Height = 21
+ Height = 19
Top = 6
- Width = 159
+ Width = 156
BorderSpacing.Around = 6
Caption = 'Copy only metadata'
OnChange = CheckBox1Change
@@ -43,8 +43,8 @@ object SelectDataSetForm: TSelectDataSetForm
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel1
Left = 6
- Height = 204
- Top = 57
+ Height = 208
+ Top = 55
Width = 388
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
@@ -56,8 +56,8 @@ object SelectDataSetForm: TSelectDataSetForm
end
object ButtonPanel1: TButtonPanel
Left = 6
- Height = 42
- Top = 267
+ Height = 40
+ Top = 269
Width = 388
TabOrder = 2
ShowButtons = [pbOK, pbCancel, pbHelp]
diff --git a/components/rx/seldsfrm.lrs b/components/rx/seldsfrm.lrs
index 062155b5a..3164ac634 100644
--- a/components/rx/seldsfrm.lrs
+++ b/components/rx/seldsfrm.lrs
@@ -1,26 +1,26 @@
-{ - , lazarus }
+{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TSelectDataSetForm','FORMDATA',[
'TPF0'#18'TSelectDataSetForm'#17'SelectDataSetForm'#4'Left'#3#189#1#6'Height'
+#3';'#1#3'Top'#3#197#0#5'Width'#3#144#1#13'ActiveControl'#7#9'CheckBox1'#7'C'
+'aption'#6#25'Select dataset to copy to'#12'ClientHeight'#3';'#1#11'ClientWi'
+'dth'#3#144#1#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScreenCenter'
- +#10'LCLVersion'#6#6'0.9.27'#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'
+ +#10'LCLVersion'#6#6'0.9.29'#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'
+#7#5'Owner'#21'AnchorSideTop.Control'#7#9'CheckBox1'#18'AnchorSideTop.Side'#7
- +#9'asrBottom'#4'Left'#2#6#6'Height'#2#18#3'Top'#2'!'#5'Width'#2'j'#20'Border'
+ +#9'asrBottom'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#31#5'Width'#2'j'#20'Border'
+'Spacing.Around'#2#6#7'Caption'#6#14'Sourse dataset'#12'FocusControl'#7#11'D'
+'ataSetList'#11'ParentColor'#8#0#0#9'TCheckBox'#9'CheckBox1'#22'AnchorSideLe'
+'ft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#2#6#6'H'
- +'eight'#2#21#3'Top'#2#6#5'Width'#3#159#0#20'BorderSpacing.Around'#2#6#7'Capt'
+ +'eight'#2#19#3'Top'#2#6#5'Width'#3#156#0#20'BorderSpacing.Around'#2#6#7'Capt'
+'ion'#6#18'Copy only metadata'#8'OnChange'#7#15'CheckBox1Change'#8'TabOrder'
+#2#0#0#0#8'TListBox'#11'DataSetList'#22'AnchorSideLeft.Control'#7#5'Owner'#21
+'AnchorSideTop.Control'#7#6'Label1'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
+'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'
- +#24'AnchorSideBottom.Control'#7#12'ButtonPanel1'#4'Left'#2#6#6'Height'#3#204
- +#0#3'Top'#2'9'#5'Width'#3#132#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8
+ +#24'AnchorSideBottom.Control'#7#12'ButtonPanel1'#4'Left'#2#6#6'Height'#3#208
+ +#0#3'Top'#2'7'#5'Width'#3#132#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8
+'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#10'OnDblClick'#7
+#16'ListBox1DblClick'#10'OnKeyPress'#7#16'ListBox1KeyPress'#8'TabOrder'#2#1#8
+'TopIndex'#2#255#0#0#12'TButtonPanel'#12'ButtonPanel1'#4'Left'#2#6#6'Height'
- +#2'*'#3'Top'#3#11#1#5'Width'#3#132#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pb'
+ +#2'('#3'Top'#3#13#1#5'Width'#3#132#1#8'TabOrder'#2#2#11'ShowButtons'#11#4'pb'
+'OK'#8'pbCancel'#6'pbHelp'#0#0#0#0
]);
diff --git a/components/rx/seldsfrm.pas b/components/rx/seldsfrm.pas
index 38c35707e..2127d4153 100644
--- a/components/rx/seldsfrm.pas
+++ b/components/rx/seldsfrm.pas
@@ -1,3 +1,34 @@
+{ seldsfrm unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru and Lazarus team
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit seldsfrm;
{$mode objfpc}{$H+}
diff --git a/components/rx/tooledit.pas b/components/rx/tooledit.pas
index 9c3771f67..5f8ff29c9 100644
--- a/components/rx/tooledit.pas
+++ b/components/rx/tooledit.pas
@@ -1,3 +1,34 @@
+{ tooledit unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit tooledit;
{$I rx.inc}
diff --git a/components/rx/vclutils.pas b/components/rx/vclutils.pas
index a36331c0d..77c5169b5 100644
--- a/components/rx/vclutils.pas
+++ b/components/rx/vclutils.pas
@@ -1,3 +1,34 @@
+{ vclutils unit
+
+ Copyright (C) 2005-2010 Lagunov Aleksey alexs@hotbox.ru
+ original conception from rx library for Delphi (c)
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or (at your
+ option) any later version with the following modification:
+
+ As a special exception, the copyright holders of this library give you
+ permission to link this library with independent modules to produce an
+ executable, regardless of the license terms of these independent modules,and
+ to copy and distribute the resulting executable under terms of your choice,
+ provided that you also meet, for each linked independent module, the terms
+ and conditions of the license of that module. An independent module is a
+ module which is not derived from or based on this library. If you modify
+ this library, you may extend this exception to your version of the library,
+ but you are not obligated to do so. If you do not wish to do so, delete this
+ exception statement from your version.
+
+ This program is distributed in the hope that it will be useful, but WITHOUT
+ ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
+ for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; if not, write to the Free Software Foundation,
+ Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+}
+
unit vclutils;
{$I rx.inc}