КАК СДЕЛАТЬ СПРАВОЧНИК В ДЕЛФИ
Справочник является важным компонентом многих приложений, поэтому в Delphi есть достаточно простой и удобный способ создания справочника с помощью компонента TListView.
Прежде всего добавьте на форму компонент TListView (стандартный компонент Delphi).
ListView1 = TListView.Create(Self);ListView1.Parent := Self;ListView1.Align := alClient;ListView1.ViewStyle := vsReport;ListView1.Columns.Add.Caption := 'Column1';ListView1.Columns.Add.Caption := 'Column2';
Затем можно заполнить список с помощью добавления элементов в таблицу ListView. Например, добавим 3 строки:
with ListView1.Items.Add do begin Caption := 'Row1'; SubItems.Add('Value1'); SubItems.Add('Value2');end;with ListView1.Items.Add do begin Caption := 'Row2'; SubItems.Add('Value3'); SubItems.Add('Value4');end;with ListView1.Items.Add do begin Caption := 'Row3'; SubItems.Add('Value5'); SubItems.Add('Value6');end;
Для поиска элемента в ListView есть несколько способов: можно искать по индексу или по значению. Например, найдем строку с именем 'Row2':
var i: Integer; Item: TListItem;begin for i:=0 to ListView1.Items.Count-1 do begin Item := ListView1.Items[i]; if Item.Caption = 'Row2' then begin // элемент найден // можно изменить значения столбцов: Item.SubItems[0] := 'NewValue1'; Item.SubItems[1] := 'NewValue2'; break; end; end;end;
Также можно использовать методы TListView, например, FindCaption или FindData:
var Item: TListItem;begin // поиск по Caption Item := ListView1.Items.FindCaption(0, 'Row2', False, True, False); if Assigned(Item) then begin // элемент найден // можно изменить значения столбцов: Item.SubItems[0] := 'NewValue1'; Item.SubItems[1] := 'NewValue2'; end; // поиск по Data Item := ListView1.Items.FindData(nil, 0, 'Data2', True, False); if Assigned(Item) then begin // элемент найден // можно изменить значения столбцов: Item.SubItems[0] := 'NewValue1'; Item.SubItems[1] := 'NewValue2'; end;end;
Создание теста на Delphi кратко и по теме
Программирование в Delphi / Урок 1. Знакомство со средой разработки. Приложение \
DELPHI Урок 3 Создание БД, добавление, удаление, изменение записей
Как Красиво Оформлять КОНСПЕКТЫ ✨ 100 идей (быстро и просто) МОИ КОНСПЕКТЫ
Как Приручить Панду в Майнкрафте? Панды в Minecraft
Где брать схемы на авто. Ниже под описание ссылка на схемы.
Программирование на Delphi. Телефонный справочник часть 1
Программирование на Delphi. Телефонный справочник часть 2