Как открыть первую ветвь TreeView?

Delphi , Компоненты и Классы , TTreeView

Как программным путем открыть первую ветвь и в ней выделить первый элемент?

Code:

procedure TForm1.Button1Click(Sender:  TObject);
begin
TreeView1.Items[0].Expand(False);
TreeView1.Items[0].Selected:=true;
TreeView1.SetFocus;
end;

Автор: Vit (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)
Взято с Vingrad.ru http://forum.vingrad.ru

Процедура открытия первой ветви TreeView и выделения первого элемента в ней выполняется с помощью вызова методов Expand и Selected, а также установки фокуса на TreeView.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: TTreeView ::

Время компиляции файла: 2024-12-22 20:14:06
2025-06-16 16:41:37/0.0042178630828857/1