Показать сообщение отдельно
  #1  
Старый 14.06.2011, 05:56
Gribok Gribok вне форума
Новичок
 
Регистрация: 25.09.2009
Сообщения: 53
Репутация: 4
По умолчанию удалить все Nые строки из memo

Доброго времени суток товарищи программисты.
Помогите пожалуйста решить следующею проблему.
Суть вопроса в следующем!
Имеется мемо со следующими данными
1
2
3
4
5
вот данные записаны в строку.
Код:
var
i:integer;
begin
Memo2.Clear;
for i:=1 to StrToInt(Edit1.Text)  do
Memo2.Lines.Add(IntToStr(i));
Здесь мы создаем наш список.

теперь следующие!
необхадимо удалить скажем каждую 3 строку из мемо
в итоге получим
1
2
3
4
5
создали наш список
далее
1
2
пусто т к удалил 3стоку
4
5
далее
пусто т к удали 1 строку
2
4
5
далее
2
4
пусто т к удалил 5 строку
далее
пусто т к удалил 2 строку
4 осталось
значит если взять список из 5 строк и удалять каждую 3 строку то останется 3
как добиться такова результата??
Ответить с цитированием