Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

Помогите разобраться с компонентом 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, проблема исчезает?
Проверь

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.185 c