FoxPro8


     На сайте calorizator.ru мускатный орех. |          

Добавление данных в список - часть 2


IF !EMPTY(THIS.Value)

* добавляем значен;;" в список THISFORM.lstCity.Addltem (THIS.Value)

ENDIF * очищаем поле ввода

THIS.Value = "" ENDIF

Эта процедура позволит пользователю ввести текст в поле ввода и нажатием клавиши <Enter> добавить значение в список, освободив окно для ввода следующей информации (рис. 15.27).

Рис. 15.27. Определение свойства KeyPress

Теперь при запуске формы на выполнение значения, введенные в поле ввода Поле формирования списка, при нажатии клавиши <Enter> переносятся в список городов (рис. 15.28).

Рис. 15.28. Формирование списка с помощью поля ввода в диалоговом режиме




Содержание  Назад  Вперед