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поля
fvtRecNoОтображается номер текущей записи из списка
+
+ + + + +
+ + Набор флагов, управляющих поведением RxDBGrid + +

Набор флагов, управляющих поведением RxDBGrid +

+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+ ПараметрОписание
rdgAllowColumnsFormРазрешает вызов формы управления отображением и порядком расположения колонок в 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-а + +

+ Набор флагов, управлюящих поведением + 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);

Процедура возвращает имя и домен пользователя операционной системы владельца указанного файла.

@@ -2014,14 +2428,20 @@ Description + + const DirName: + + string): + + 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}