Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.11;
Скачать: CL | DM;

Вниз

найти пустые ячейки в третьем столбце ListView по всем строкам   Найти похожие ветки 

 
Garacio ©   (2007-01-16 20:30) [0]

Мне необходимо найти пустые ячейки в третьем столбце ListView по всем строкам и заполнить их "Не найдено!". Пытаюсь так:
for i:=0 to ListView1.Items.Count-1 do
 begin
 if (ListView1.Items[i].SubItems.Count > 1)
   and (ListView1.Items[i].SubItems[2].Text = "") then
   ListView1.Items[i].SubItems.add("Не найдено!");
 end;

Но пустые ячейки продолжают оставаться пустыми!
Помогите исправить!


 
Аноним   (2007-01-16 20:43) [1]

then
  ListView1.Items[i].SubItems[2]:="Не найдено!";
end;


 
AFKer   (2007-01-16 20:46) [2]

for i:=0 to ListView1.Items.Count - 1 do
begin
  if (ListView1.Items[i].SubItems[2] > "") then
    ListView1.Items[i].SubItems[2]:="Не найдено!";
end;
может так..


 
AFKer   (2007-01-16 20:49) [3]

только Subitems[0..N] должен быть уже создан..


 
Garacio ©   (2007-01-16 21:46) [4]


> ListView1.Items[i].SubItems[2]:="Не найдено!";

Нет, не помогает! К тому-же возьмите ListView и попробуйте таким способои заполнить его :-)


 
AFKer   (2007-01-16 23:12) [5]

да без проблем!


 
Garacio ©   (2007-01-17 08:03) [6]

Нет, ну серьёзно:
При любых подобных попытках, будь то:
ListView1.Items[i].SubItems[2] := "Нет файлов!"; или
ListView1.Items[i].SubItems[1] := "Нет файлов!"; или
if ListView1.Items[i].SubItems[2] = "" then
при компиляции ругается
...
begin
 Application.Initialize;
 Application.CreateForm(TFormMain, FormMain);
 Application.Run;
end. //<- вот тут

Delphi при этом ничего не пишет в отчёте. А вот в самом приложении выскакивает: "List index out of bounds(2)"


 
MBo ©   (2007-01-17 09:14) [7]

SubItems[2] - это третий элемент в списке, так что проверка SubItems.Count > 1 слишком слабая


 
Garacio ©   (2007-01-17 09:49) [8]

Тогда, может кто-нибудь поможет организовать проверку:
Если в какой-то ячейке 2-го столбца в ListView (состоящего из 3-х столбцов) нет значения (пустая ячейка), то заполнить её "Нет файлов!"
P.S.</b 1-й столбец ListView весь заполнен, 3-й полностью пустой, 2-й заполнены только некоторые ячейки


 
Сергей М. ©   (2007-01-17 11:11) [9]


> 2-го столбца

ListView.Items[i].SubItems[0]



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

Текущий архив: 2007.03.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.061 c
6-1159806707
vedm
2006-10-02 20:31
2007.03.11
TIdMultiPartFormDataStream и большие файлы.


15-1171347018
Леприкон
2007-02-13 09:10
2007.03.11
Компонент для панели поиска


2-1171922373
Allexandr
2007-02-20 00:59
2007.03.11
application.MessageBox


1-1169040865
Strate
2007-01-17 16:34
2007.03.11
Потоки


15-1171625976
DVM
2007-02-16 14:39
2007.03.11
Алгоритм Хоуга (Hough transform)