/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/Graphics/Controls/cc16_Countries.pas
19 строк
764 B
Mikhalkovich Stanislav
Controls - примеры
01 авг 2020, 00:13
01 авг 2020, 00:13
a4804f3
Код
Авторство
О чём код?
// Модуль Controls - визуализация запросов к базе данных uses GraphWPF,Controls,ABCDatabases; begin Window.Title := 'Модуль Controls - визуализация запросов к базе данных'; LeftPanel(150,Colors.Orange); var l := SetMainControl.AsListView; var страны := ЗаполнитьМассивСтран; l.Fill(страны); Button('Все').Click := procedure -> l.Fill(страны); Button('Азия').Click := procedure -> l.Fill(страны.Where(страна -> страна.Континент='Азия')); Button('Сорт по населению').Click := procedure -> l.Fill(страны.OrderByDescending(s -> s.Население)); end.