Вниз
Скачать: CL | DM;

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.067 c
2-1273684920
kotyara12
2010-05-12 21:22
2010.08.27
Как корректно удалить экземпляр TThread из TList?


2-1274384328
pro_xaoc
2010-05-20 23:38
2010.08.27
Ошибка с процедурой


15-1273264199
Юрий
2010-05-08 00:29
2010.08.27
С днем рождения ! 8 мая 2010 суббота


15-1272738123
Pavia
2010-05-01 22:22
2010.08.27
утечка конфиденцальных данных


2-1270799708
berbegon
2010-04-09 11:55
2010.08.27
запись звука в Delphi




   Наверх