VPF::Сравнение строк в Listview - Форум программистов

DYUMON

Дата 18.1.2010, 11:32 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 321
Регистрация: 17.6.2006
Где: Новосибирск

Репутация: нет
Всего: 3

Доброго всем времени суток.
есть такой вопрос.
имеется два listview. я делаю сравнение строк иэ первого листвьюва со вторым если у них заголовки совпадают то делаю проверку для подстрок. не могу понять как сделать если значение подтверждается то переходить к следующему .значению
код примерно такой

Код


for i:=0  to listview1.Items.Count-1  do begin
  for j:=0  to listview2.Items.Count-1  do
  begin
   if listview1.Items[i].Caption=listview2.Items[j].Caption then
    begin
      if listview1.Items[i].SubItems.Strings[0]<>listview2.Items[j].SubItems.Strings[0] then
      begin
      KillProcik(listview1.Items[i].Caption);
      end;

       end;
   //KillProcik(listview1.Items[i].Caption);
   end;
  KillProcik(listview1.Items[i].Caption);
   end;

--------------------

Всех программистов надо посадить на целероны, что бы впредь головой думали что пишут.

Демо

Дата 18.1.2010, 12:23 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 7
Всего: 50

В циклах для этой цели есть оператор Break.

--------------------

DYUMON

Дата 19.1.2010, 10:05 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 321
Регистрация: 17.6.2006
Где: Новосибирск

Репутация: нет
Всего: 3

делаю так срабатывает через раз

Код


begin
 for i:=0  to listview1.Items.Count-1  do
  for j:=0  to listview2.Items.Count-1  do
  if listview1.Items[i].Caption=listview2.Items[j].Caption then
      begin
      next;
      end
      else
      begin
      application.MessageBox('åñòü òàêîé','666666');
      end;



     end;

--------------------

Всех программистов надо посадить на целероны, что бы впредь головой думали что пишут.

eyelesss

Дата 19.1.2010, 10:34 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 19.5.2009
Где: Казахстан, Алматы

Репутация: нет
Всего: нет

попробуй вместо "next;" написать "break;"

amsoft

Дата 20.1.2010, 21:07 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 201
Регистрация: 17.10.2009
Где: KZ, Astana

Репутация: 1
Всего: 4

оператор Continue

--------------------

"Кто бы ты ни был - не думай о себе слишком"Дельфин

artsb

Дата 21.1.2010, 10:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 1
Всего: 64

DYUMON, next или continue (не знаю как в делфи) - прерывает текущую итерацию цикла и переходит к следующей. break - прерывает весь цикл, внутри которого сработал этот оператор.

Это сообщение отредактировал(а) artsb - 21.1.2010, 10:40

--------------------

Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »