From 87df2fb58ed2c872215ae1339f78f261d3fcd1cf Mon Sep 17 00:00:00 2001 From: alexs75 Date: Thu, 22 May 2008 17:05:47 +0000 Subject: [PATCH] new version - 2.0.0.136 git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@454 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/rx/docs/WhatsNew.eng.txt | 3 +- components/rx/docs/WhatsNew.rus.txt | 3 +- components/rx/rxdbcomb.pas | 1 + components/rx/rxdconst.pas | 90 ++++++++++++++--------------- components/rx/rxtoolbar.pas | 1 + 5 files changed, 51 insertions(+), 47 deletions(-) diff --git a/components/rx/docs/WhatsNew.eng.txt b/components/rx/docs/WhatsNew.eng.txt index 6c47754c3..13c04315d 100644 --- a/components/rx/docs/WhatsNew.eng.txt +++ b/components/rx/docs/WhatsNew.eng.txt @@ -1,3 +1,4 @@ +22.05.2008 - version 2.0.0.136 (svn revision 100) + In TRxCustomDBLookupCombo add check for CircularDataLink + in TRxCustomDBLookupCombo accelerated drawing data - In TRxCustomDBLookupCombo fix select first record if DataField is emty @@ -39,7 +40,7 @@ + In TRxDBLookupCombo property DropDownCount now work - fix error in TRxDBLookupCombo after set value for DataField and LookupSourse.Active=false + In PopUpFormOptions add editor for property Collumns[x].FieldName -29.08.2007 - 1.1.5.98 (svn revision 39) +29.08.2007 - version 1.1.5.98 (svn revision 39) + In RxDBgrid - after close dataset list of SelectedRows is cleared + fix resaizing find form for RxDbGrd + compile in latest Lazarus diff --git a/components/rx/docs/WhatsNew.rus.txt b/components/rx/docs/WhatsNew.rus.txt index 3dfd36d59..7b432ab15 100644 --- a/components/rx/docs/WhatsNew.rus.txt +++ b/components/rx/docs/WhatsNew.rus.txt @@ -1,4 +1,5 @@ - + У объекта TRxCustomDBLookupCombo введён контроль на CircularDataLink +22.05.2008 - версия 2.0.0.136 (svn revision 100) + + У объекта TRxCustomDBLookupCombo введён контроль на CircularDataLink + У объекта TRxCustomDBLookupCombo ускорена отрисовка данных - У объекта TRxCustomDBLookupCombo исправлен выбор первой записи из справочника при пустом значени в DataField diff --git a/components/rx/rxdbcomb.pas b/components/rx/rxdbcomb.pas index 2d3129b94..fbcaa9665 100644 --- a/components/rx/rxdbcomb.pas +++ b/components/rx/rxdbcomb.pas @@ -86,6 +86,7 @@ type property Anchors; property ArrowKeysTraverseList; property AutoDropDown; + property AutoSize; property BorderSpacing; property Style; { must be published before Items } property Color; diff --git a/components/rx/rxdconst.pas b/components/rx/rxdconst.pas index 600bd3c97..69886d4bc 100644 --- a/components/rx/rxdconst.pas +++ b/components/rx/rxdconst.pas @@ -103,51 +103,51 @@ resourcestring SDeleteMultipleRecords = MaxExtStrID - 130;*) - SLocalDatabase = ' '; - SRetryLogin = ' ?'; - SExprNotBoolean = ' ''%s'' '; - SExprBadNullTest = 'NULL- ''='' ''<>'''; - SExprBadField = ' ''%s'' '; - SCaptureFilter = ' '; - SNotCaptureFilter = ' '; - SInactiveData = ''; - SBrowseData = ''; - SEditData = ''; - SInsertData = ''; - SSetKeyData = ''; - SCalcFieldsData = ''; - SRegistration = ''; - SAppTitleLabel = ' "%s"'; - SHintLabel = ' '; - SUserNameLabel = '& :'; - SPasswordLabel = '&:'; - SInvalidUserName = ' '; - SChangePassword = ' '; - SOldPasswordLabel = '& :'; - SNewPasswordLabel = '& :'; - SConfirmPasswordLabel = '&:'; - SPasswordChanged = ' '; - SPasswordNotChanged = ' '; - SPasswordsMismatch = ' '; - SDBExceptCaption = ' '; - SBDEErrorLabel = ' BDE'; - SServerErrorLabel = ' '; - SErrorMsgLabel = ' '; - SNextButton = '&'; - SPrevButton = '&'; - SExprIncorrect = ' '; - SExprTermination = ' '; - SExprNameError = ' '; - SExprStringError = ' '; - SExprInvalidChar = ' : ''%s'''; - SExprNoRParen = ' '')'', : %s'; - SExprExpected = ' , %s'; - SExprBadCompare = ' '; - SConfirmSave = ' . ?'; - SDatabaseName = ' : %s'; - SUnlockCaption = ''; - SUnlockHint = ' '; - SDeleteMultipleRecords = ' ?'; + SLocalDatabase = 'Невозможно произвести эту операцию с локальной базой данных'; + SRetryLogin = 'Вы хотите повторить попытку соединения с базой данных?'; + SExprNotBoolean = 'Поле ''%s'' не является полем логического типа'; + SExprBadNullTest = 'NULL-значения допустимы только в операциях ''='' и ''<>'''; + SExprBadField = 'Поле ''%s'' не может быть использовано в выражении фильтра'; + SCaptureFilter = 'Элементы управления захвачены фильтром'; + SNotCaptureFilter = 'Элементы управления должны быть захвачены фильтром'; + SInactiveData = 'неактивно'; + SBrowseData = 'просмотр'; + SEditData = 'редактирование'; + SInsertData = 'добавление'; + SSetKeyData = 'поиск'; + SCalcFieldsData = 'подсчет'; + SRegistration = 'Регистрация'; + SAppTitleLabel = 'Программа "%s"'; + SHintLabel = 'Введите Ваше пользовательское имя и пароль'; + SUserNameLabel = '&Имя пользователя:'; + SPasswordLabel = '&Пароль:'; + SInvalidUserName = 'Неверное имя пользователя или пароль'; + SChangePassword = 'Смена пароля'; + SOldPasswordLabel = '&Старый пароль:'; + SNewPasswordLabel = '&Новый пароль:'; + SConfirmPasswordLabel = '&Подтверждение:'; + SPasswordChanged = 'Пароль сменен'; + SPasswordNotChanged = 'Пароль не сменен'; + SPasswordsMismatch = 'Новый пароль и подтверждение не совпадают'; + SDBExceptCaption = 'Ошибка процессора БД'; + SBDEErrorLabel = 'Ошибка BDE'; + SServerErrorLabel = 'Ошибка сервера'; + SErrorMsgLabel = 'Сообщение об ошибке'; + SNextButton = '&Дальше'; + SPrevButton = '&Назад'; + SExprIncorrect = 'Некорректно сформулировано выражение фильтра'; + SExprTermination = 'Неверное завершение выражения фильтра'; + SExprNameError = 'Невозможно определить завершение имени поля'; + SExprStringError = 'Невозможно определить завершение строковой константы'; + SExprInvalidChar = 'Неверный символ в выражении фильтра: ''%s'''; + SExprNoRParen = 'Ожидалось '')'', а встречено: %s'; + SExprExpected = 'Ожидалось выражение, а встречено %s'; + SExprBadCompare = 'Операции сравнения требуют наличия поля и константы'; + SConfirmSave = 'Данные были изменены. Сохранять?'; + SDatabaseName = 'База данных: %s'; + SUnlockCaption = 'Разблокирование'; + SUnlockHint = 'Введите ваш пароль'; + SDeleteMultipleRecords = 'Удалить все выбранные записи?'; SPropDefByLookup = 'PropDefByLookup'; SDataSourceFixed = 'SDataSourceFixed'; diff --git a/components/rx/rxtoolbar.pas b/components/rx/rxtoolbar.pas index 1b933f0e1..eed1cac0a 100644 --- a/components/rx/rxtoolbar.pas +++ b/components/rx/rxtoolbar.pas @@ -627,6 +627,7 @@ end; procedure TToolbarButton.SetAutoSize(AValue: boolean); begin FAutoSize:=AValue; + if csLoading in ComponentState then exit; UpdateSize; Invalidate; end;