Помогите разобраться с компонентом TsListView

← →
NBAH1990 (2010-03-27 09:00) [0]

Программа пингует адреса и ищет на них сервера, в TsListView подключеные должны отображаться с одной картинкой а отключеные сервера красным. Получается либо чтобы картинка была либо чтобы только текст, нужно чтобы Была картинка а под ней текст. Если кто работал с этим - помогите

вот кусок кода

if TcpClient1.Connected then begin item:=TListItem.Create(lv1.Items); Item.ImageIndex:=1; Item.Caption:=Ping1.HostIP+" готов"; lv1.Items.AddItem(Item); Redt1.Lines.Add("Получено "+IntToStr(Ping1.Reply.DataSize)+ " байт от "+Ping1.HostIP+" за " + IntToStr(Ping1.Reply.RTT)+ " миллисекунд"+" и на нём запущен клиент") end else begin item:=TListItem.Create(lv1.Items); Item.ImageIndex:=0; Item.Caption:=Ping1.HostIP+" не готов"; lv1.Items.AddItem(Item); Redt1.Lines.Add("Получено "+IntToStr(Ping1.Reply.DataSize)+ " байт от "+Ping1.HostIP+" за " + IntToStr(Ping1.Reply.RTT)+ " миллисекунд"+" но на нем нет клиента"); end;

с таким кодом показывается только картинка. Хотя и текст вроде тоже присваивается

Item.Caption:=Ping1.HostIP+" не готов";

Помогите плз. Вот исходник если надо
http://www.rapidshare.ru/1426505

← →
Anatoly Podgoretsky © (2010-03-27 09:08) [1]

"Отключеные" сервера показывать не надо.

← →
Вася (2010-03-27 09:53) [2]

А если использовать обычный TListView, проблема исчезает?
Проверь

Помогите разобраться с компонентом TsListView Найти похожие ветки