VPF::Memo и строки - Форум программистов

Alex

Дата 5.1.2005, 20:16 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162

Код


var
  i: Integer;
begin
  for i:= 0 to Memo1.Lines.Count-1 do
    if Trim(Memo1.Lines.Strings[i])  = '' then // Строки, содержащие только пробелы тоже удаляем
      Memo1.Lines.Delete(i);
end;

Но 1 тема 1 вопрос.

--------------------

Написать можно все - главное четко представлять, что ты хочешь получить в конце.

Pakshin A. S.

Дата 5.1.2005, 20:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61

Alex а по-моему не верно...
попробуй с таким Memo:
asd

asd

ds

s

Alex

Дата 5.1.2005, 20:25 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162

упс

Код


var
  i: Integer;
begin
  for i:= Memo1.Lines.Count-1 downto 0 do
    if Trim(Memo1.Lines.Strings[i])  = '' then // Строки, содержащие только пробелы тоже удаляем
      Memo1.Lines.Delete(i);
end;

--------------------

Написать можно все - главное четко представлять, что ты хочешь получить в конце.

Vit

Дата 5.1.2005, 21:25 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207

Извиняюсь за офтоп...

i need help you - грамматически неверно.

Надо:
или
I need to help you - мне надо Вам помочь

или
I need your help - мне нужна Ваша помощь

--------------------

With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »