Задачи по Python с решениями

   
На этом шаге мы рассмотрим компонент TDualListDialog.

   
Компонент делает доступным вашему приложению диалог с двумя списками, где элементы
можно перемещать из одного списка в другой, а также менять порядок следования элементов внутри списка.
По сравнению с одноименной формой из Delphi Gallery, кроме оформления в виде компонента,
добавлены возможность Drag&Drop, задания порядка внутри списка, интерфейсные улучшения.
Задайте исходное состояние списков в свойствах List1 и List2, вызовите диалог функцией
Execute и считайте новый состав списков.

Таблица 1. Свойства компонента TDualListDialog

   
Рассмотрим пример, демонстрирующий работу компонента TDualListDialog. Поместим на форму компоненты: кнопку TButton,
которую будем использовать для вызова формы со списками, и компонент TDualListDialog.

Рис.1. Форма с размещенными компонентами

   
Свойства List1 и List2
компонента TDualListDialog заполним списками строк и напишем обработчик события OnClick кнопки TButton:

procedure TForm1.Button1Click(Sender: TObject);
begin
     Form1.DualListDialog1.Execute;
end;

   
После нажатия кнопки TButton появится форма с двумя списками, элементы которых можно переносить из одного в другой (рис. 2).

Рис.2. Работа приложения

Текст этого примера можно взять здесь.

   
Мы закончили изучение компонентов вкладки RX Tools. Надеемся, что изложенный
материал будет вам полезен.