Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сровнение Мемо [D7, WinXP]


lordalexander ©   (2013-01-16 18:56:00) 

Здравствуйте
У меня возникла проблема, как сравнить строки из Мемо2 с Мемо1
И если есть одинаковые  удалить из Мемо1
В Мемо не известно количество строк.  
Не как могу придумать как это воплотить.
Заранее спасибо


clickmaker   (2013-01-17 15:01:00) [1]

да и самих мемо уже три, а не два


Anatoly Podgoretsky   (2013-01-17 12:05:00) [2]

Да где же правильно?
Добавлять никто не просил, а только удалять из memo1


lordalexander   (2013-01-16 22:00:00) [3]

Так вроде правильно  
var
i:integer;
begin
for i:=0 to memo1.Lines.Count-1   do
begin
 if memo2.Lines.IndexOf(memo1.Lines[i])=-1 then  
    memo3.Lines.Add(memo1.Lines[i]);
end;
end;


lordalexander   (2013-01-16 21:56:00) [4]

имел веду что количество строк всегда разное  в зависимости какую информацию туда ввел
Memo12.Lines.Count всегда скажет  сколько там строк


Сергей М.   (2013-01-16 21:15:00) [5]


> не известно


> Не как


За Державу не обидно ?


Сергей М.   (2013-01-16 21:14:00) [6]


> В Мемо не известно количество строк


У тебя неправильный Мемо.
В правильном Мемо количество строк известно и равно значению св-ва Lines.Count


Anatoly Podgoretsky   (2013-01-16 21:06:00) [7]

> lordalexander  (16.01.2013 18:56:00)  [0]

IndexOf на обеих Мемо


Наверх

Титульная страница Поиск, карта сайта Написать письмо