Функция GetEnumString |
Функция возвращает текущее значение поля с атрибутом list (см. "Атрибуты поля. ").
GetEnumString (screenId : longInt, fieldNum : longInt): string;
screenId - номер области ввода.
fieldNum - номер поля в логической таблице.
Строка, содержащая текущее значение в поле типа "список выбора".
interface ListBoxTest; show at (00,00,80,35); create view var i : longInt; as select x$files.* from x$files ; screen scrListBox; fields i : [list 10 'Item 1.1', 20 'Item 1.2']; buttons cmGetString,,,'GetString'; << `i:`.@@@@@@@@@@@@@@@@@@@@@@@ <.GetString.> >> end; handleEvent cmGetString: { var s: string; s := GetEnumString (scrListBox, #i); Message('list item=' + s); } end; end.