Форум: "Начинающим";
Текущий архив: 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.062 c