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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 05.11.2010, 01:42   #1
igabenu
Пользователь
 
Регистрация: 05.11.2010
Сообщений: 27
По умолчанию Удаление части строк в memo

Здравствуйте, подскажите пожалуйста, как правильно организовать в memo1 удаление каждой части строки после 6 символа и последующую запись в memo2?
igabenu вне форума Ответить с цитированием
Старый 05.11.2010, 02:06   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

непонятно, что Вам нужно получить.
то ли в Memo1 получить обрезанный текст, то ли в Memo1 текст должен остаться без изменений, а в Memo2 - обрезанный скопировать..
если первое, то
Код:
  // обрезать строки в Memo1
  for i:=0 to Memo1.Lines.Count-1 do
     Memo1.Lines[i] := Copy(Memo1.Lines[i],1,6);

  // переписать полностью Memo1 в Memo2
  Memo2.Lines.Text := Memo1.Lines.Text;
если - второе, то
Код:
  // скопировать обрезанные строки из Memo1 в Meмo2
  Memo2.Lines.Clear;
  for i:=0 to Memo1.Lines.Count-1 do
     Memo2.Lines.Append(Copy(Memo1.Lines[i],1,6));
Serge_Bliznykov вне форума Ответить с цитированием
Старый 17.10.2012, 12:16   #3
m-d-k
Пользователь
 
Регистрация: 01.05.2012
Сообщений: 32
По умолчанию

Пожалуйста, подскажите, как это же сделать в билдере!

Такой вариант не работает:

Код:
Memo1->Lines->Strings[i]=Copy(Memo1->Lines->Strings[i],1,77)
m-d-k вне форума Ответить с цитированием
Старый 17.10.2012, 17:47   #4
m-d-k
Пользователь
 
Регистрация: 01.05.2012
Сообщений: 32
По умолчанию

Разобрался:
Memo1->Lines->Strings=Memo1->Lines->Strings.SubString(1,7);
m-d-k вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление части данных из ячейки John34 Microsoft Office Excel 7 17.11.2014 14:34
Удаление из ячейки StringGrid части текста SPD Общие вопросы Delphi 3 21.08.2010 12:24
перенос строк удаление ненужных строк HelperAwM Microsoft Office Excel 5 26.06.2010 18:42
Удаление строк в Memo Marsel737 Общие вопросы Delphi 8 03.01.2010 10:42
Удаление строк из Memo Leksda Общие вопросы Delphi 6 20.03.2009 15:31