Использование Delphi для создания приложений баз данных. Устюгова В.Н. - 22 стр.

UptoLike

ВУЗ: 

КФУ | Казань

Составители: 

Рубрика: 

22
Значения поля выбора данных
SalesPerson набора данных
Orders в работающем
приложении выбираются из
набора данных Emps.
4. Используя связанные таблицы из базы данных DBDEMOS создать приложение, в
котором создать поле выбора данных.
События и свойства компонента TField
При работе с компонентом TField могут возникнуть события
OnSetText, OnValidate, OnChange и OnGetText.
Событие OnGetText позволяет определить алгоритм форматирования значения в поле
перед тем, как поле будет показано в визуальных компонентах, работающих с данными -
TDBGrid, TDBEdit и т.д.
Параметры процедуры обработчика события:
Text - отформатированное значение, показываемое в столбце компонента TDBGrid, в
TDBEdit или других визуальных компонентах, связанных с таблицей;
DisplayText - позволяет определить, произошло событие OnGetText при показе значения
(значений) поля (True) или при модификации пользователем значения поля (False).
Например, при показе содержимого поля Company значение следует заключать в
кавычки (хотя оно хранится без кавычек). Если пользователь захочет изменить значение поля
в какой-либо записи, нужно показывать содержимое поля, представленное заглавными
буквами.
procedure TForml.Table2CompanyGetText(Sender: TField; var Text: OpenString;
DisplayText: Boolean);
begin
IF DisplayText THEN
Text :=’”’+ Table2Company.AsString ’”’
ELSE Text := AnsiUpperCase(Table2Company.AsString);
end; // ’”’ одиночная кавычка двойная кавычка одиночная кавычка 
                                                           Значения поля выбора данных
                                                           SalesPerson набора данных
                                                           Orders     в    работающем
                                                           приложении выбираются из
                                                           набора данных Emps.




     4. Используя связанные таблицы из базы данных DBDEMOS создать приложение, в
котором создать поле выбора данных.

                        События и свойства компонента TField

                              При работе с компонентом TField могут возникнуть события
                              OnSetText, OnValidate, OnChange и OnGetText.




     Событие OnGetText позволяет определить алгоритм форматирования значения в поле
перед тем, как поле будет показано в визуальных компонентах, работающих с данными -
TDBGrid, TDBEdit и т.д.
     Параметры процедуры обработчика события:
Text - отформатированное значение, показываемое в столбце компонента TDBGrid, в
TDBEdit или других визуальных компонентах, связанных с таблицей;
DisplayText - позволяет определить, произошло событие OnGetText при показе значения
(значений) поля (True) или при модификации пользователем значения поля (False).
     Например, при показе содержимого поля Company значение следует заключать в
кавычки (хотя оно хранится без кавычек). Если пользователь захочет изменить значение поля
в какой-либо записи, нужно показывать содержимое поля, представленное заглавными
буквами.

procedure TForml.Table2CompanyGetText(Sender: TField; var Text: OpenString;
DisplayText: Boolean);
begin
IF DisplayText THEN
Text :=’”’+ Table2Company.AsString ’”’
ELSE Text := AnsiUpperCase(Table2Company.AsString);
end; // ’”’ одиночная кавычка двойная кавычка одиночная кавычка



                                           22

Страницы