АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция

Использование элемента ListBox

Читайте также:
  1. B) рациональное использование физических возможностей
  2. B. Использование номограммы
  3. Oхрана, рациональное использование медоносных пчёл и энтомофильных культур
  4. RASH Использование отражений для остановки ВД
  5. Активы организации, их назначение и использование.
  6. Анализ результатов деятельности с использованием гибкого бюджета
  7. Анализ сбытовой деятельности как элемента подсистемы хозяйственного обследования ООО «Камэнергостройпром»
  8. Безопасное использование технологического оборудования и производственного инвентаря
  9. БИЛЕТ 29. ОСНАЩЕННОСТЬ С/Х ПРЕДПРИЯТИЙ ОСНОВНЫМИ СРЕДСТВАМИ ПРОИЗВОДСТВА И ИХ ИСПОЛЬЗОВАНИЕ
  10. Биосинтез и использование кетоновых тел в качестве источников энергии.
  11. Виды профессиональной информационной деятельности человека с использованием технических средств и информационных ресурсов
  12. Внутреннее финансирование – это использование средств из прибыли самого предприятия.

ListBox (список)- это элемент управления, содержащий набор пунктов, которые может выбрать пользователь. В VPI есть несколько предикатов для работы со списками:

· lbox_Add (Window, Index, Str) добавляет новую строку Str в список в позицию с индексом Index. Если Index равен -1, то строка добавляется в конец списка. Нумерация элементов списка начинается с 0, т.е. первый элемент списка имеет индекс 0, второй -1 и т.д.

· lbox_Clear (Window) удаляет все элементы списка

· lbox_Delete (Window, Index) удаляет элемент с указанным индексом

· lbox_GetItem (Window, Index) возвращает элемент списка с указанным индексом

· Integer=lbox_GetSelIndex(Window) возвращает индекс выбранного элемента. Предикат завершится неуспешно, если никакой элемент в списке не выбран

· lbox_IsSel(Window, Index) завершается успешно или неспешно в зависимости от того, является ли текущим заданный элемент в списке

 

Пример. Проект, позволяющий формировать и редактировать списки данных.

Создать проект, содержащий элементы ListBox (список), Edit Control (поле ввода) для ввода новых данных, Push Button (кнопки) для добавления нового элемента в список и удаления выделенного элемента.

Решение

1. Создайте новый проект.

2. Добавьте в главное меню новый пункт Spisok.

3. Создайте новое окно. Для этого в окне проекта нажмите кнопку Window на левой панели инструментов, а затем – кнопку New справа. Откроется окно Window Attributes. Введите имя создаваемого окна Spisok и нажмите ОК.

4. Разместите на макете появившегося нового окна следующие компоненты: Edit Control, Push Button, ListBox (рис.26).

Push Button
ListBox
Edit Control

рис.26. Созданное окно Spisok


Задайте имена-константы для размещенных элементов, например для Edit Control - idc_edit, для ListBox - id_list_box, для кнопки ADD - idc_add, для кнопки DELETE - idc_delete

5. Сгенерируйте стандартный код Visual Prolog для нового окна. Для этого в окне проекта нажмите кнопку Code Expert, когда выбрано окно Spisok. Откроется окно Dialog and Window Expert. Выберите исходный модуль spisok.pro и нажмите кнопку Default Code.

6. Запрограммируйте выбор пункта меню Spisok для вызова окна Spisok. Для этогов списке окон выберите Task Window, пункт Menu в списке Event Type и выделите строку id_spisok (имя пункта меню) в списке Event or Item. Нажмите кнопку Add Clause, чтобы сгенерировать Пролог-предложение для события. Название кнопки изменится на Edit Clause, когда код для события будет создан. Нажмите кнопку Edit Clause. Откроется окно редактора для файла Spisok.pro, в который добавлено предложение:

%BEGIN Task Window, id_spisok

task_win_eh(_Win,e_Menu(id_spisok,_ShiftCtlAlt),0):-!,

!.

%END Task Window, id_spisok

Допишите команду для открытия окна Spisok: win_spisok_Create(_Win). В результате должно получиться:

%BEGIN Task Window, id_spisok

task_win_eh(_Win,e_Menu(id_spisok,_ShiftCtlAlt),0):-!,


1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 |

Поиск по сайту:

Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.003 сек.)