Вниз
Скачать: 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.043 c
2-1268752361
Lionelles
2010-03-16 18:12
2010.08.27
Вычисления в БД на Delphi


15-1270289462
Урсулапов_
2010-04-03 14:11
2010.08.27
Symantec и Mail.ru агент


2-1270554874
kyn66
2010-04-06 15:54
2010.08.27
TprogresssBar с отображением процентов


2-1267226371
Дима
2010-02-27 02:19
2010.08.27
Загрузка текст.файла по индексу ListBox.


2-1270922444
Evgeney
2010-04-10 22:00
2010.08.27
Процедура для открытия Child форм




   Наверх