Программный Файл: ...\Samples\Solution\Forms\Datalook.scx
Рассматриваемый пример демонстрирует, как пользователь может определять источники данных для Списков типа ListBox или ComboBox, задавать значения элементов "на-прямую", из Таблицы или из Запроса к Таблицам. Значения пользовательского выбора сохраняются в текущей Таблице.
Списки - это наиболее используемый Контрол, с помощью которого обеспечивается надежный Ввод данных. Для активации требуемой функциональности рассматриваемых Списков необходимо определить несколько их Свойств - и Контрол готов к работе. Например, для используемого в данном примере списка с именем cboEmp_id, который создан на Закладке Using Combo Box (Использование Списка), требуется определить всего лишь следующие Свйства :
Свойство | Установка (Значение) |
---|---|
BoundColumn |
2 |
ColumnCount |
2 |
ControlSource |
orders.emp_id |
RowSource |
SELECT DISTINCT ALLTRIM( employee.first_name) + " " + ALLTRIM( employee.last_name) , EMP_ID FROM employee INTO CURSOR cEmpCombo ORDER BY first_name |
RowSourceType |
3 – SQL Statement (Запрос SQL) |
В целях обеспечения однозначного выбора Служащего (его идентификатора, табельного номера) в список включается Комбинация Фамилии и Имени Служащего (1-ый столбец), и Идентификатор (ID) - (2-ой столбец); детально смотрите конструкцию оператора SELECT SQL.
Поскольку оператор SELECT создает временный Курсор, то его требуется Закрыть при завершении работы, в коде События Destroy:
( Вариант от Переводчика: USE IN SELECT("cEmpCombo") )
![]() |
|
---|---|
IF USED("cEmpCombo") THEN |