|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Сравнение строк Memo
Уважаемые форумчане, помогите с решением простой задачи, которая для меня пока неразрешима- нужно сравнить два memо1 и мемо2 , и в случае если строки совпадают( - любая по счету строка)- то копировать ету строку в мемо 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; |
#2
|
||||
|
||||
Код:
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; |
Этот пользователь сказал Спасибо wladimir_object за это полезное сообщение: | ||
Dima170792 (21.02.2014)
|
#3
|
|||
|
|||
Цитата:
|