ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #13  
Старый 05.06.2010, 09:18
Аватар для AquaKlaster
AquaKlaster
Участник форума
Регистрация: 09.03.2009
Сообщений: 178
Провел на форуме:
1605524

Репутация: 523
Отправить сообщение для AquaKlaster с помощью ICQ
По умолчанию

Код:
var
  I: Integer;
begin
  for I := 0 to Memo1.Lines.Count - 1 do
  begin
    if (Memo1.Lines[I] <> '') and (Trim(Memo1.Lines[I]) <> '') then
      Memo2.Lines.Add(Memo1.Lines[I]);
  end;

end;
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
обзор программ удаляющиx дубликаты строк Vanterlog ICQ 14 22.05.2010 12:13
Удаление строк из файла le-mon Болталка 7 14.06.2009 16:40
Ограничение на кол-во строк recfrf Уязвимости 1 09.02.2009 23:21
Закон Sinay Авторские статьи 15 01.02.2009 22:55



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ