Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.11.2012, 08:38   #11
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

AHBAR, код, хоть и рабочий, но очень некрасивый.
Решения уже выше были даны!

Если количество элементов в списке изменяется (в данном случае, уменьшается). Лучше удалять с конца списка.

сравните с таким кодом:
Код:
var i : integer;
begin
  for  i:=memo1.lines.Count-1 downto 0 do
      if memo1.Lines.Strings[i] = ''
          then Memo1.Lines.Delete(i);
end;
это просто/кратко и эффективно...



p.s. и не надо заниматься некропостерством, когда отвечаете в тему, смотрите на дату последнего сообщения...
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Аналог функции Trim-удаление лишних пробелов в начале и в конце передаваемой строки GULINA Помощь студентам 6 23.05.2009 15:07
Массив символов и Memo (*_*) Общие вопросы Delphi 4 09.05.2009 10:39
Удаление лишних пробелов. Ввод/вывод в файл. Иван 883 Помощь студентам 13 31.03.2009 19:39
удаление лишних данных в ячейке mistx Microsoft Office Excel 2 24.02.2009 18:32
Удаление символов MURAD Общие вопросы C/C++ 3 19.08.2007 01:25