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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 20.04.2009, 14:05   #1
extrimportal
Пользователь
 
Аватар для extrimportal
 
Регистрация: 07.04.2009
Сообщений: 26
Вопрос Проблема с мемо.

Нужно присвоить мемо - тексты едитов, каждый с новой строки. После сохранить этот файл в текстовый файл с последующей возможностью работать с текстовым файлом в котором как и в мемо каждая строчка с новой строки. Проблема с которой столкнулся:
Выводится в мемо только первые две строчки, если сделать мемо меньше, то выводятся все но в тектовик сохраняеться только тот текст который виден в мемо (первые буквы).
Цитата:
begin
memo1.lines[0]:=edit1.text;
memo1.lines[1]:=edit2.text;
memo1.lines[2]:=edit3.text;
memo1.lines[3]:=edit4.text;
memo1.lines[4]:=edit5.text;
memo1.lines[5]:=edit6.text;
memo1.lines[6]:=edit7.text;
memo1.lines[7]:=edit8.text;
memo1.lines[8]:=edit9.text;
memo1.lines[9]:=edit10.text;
memo1.lines.savetofile('lay.db');
end;
extrimportal вне форума Ответить с цитированием
Старый 20.04.2009, 14:11   #2
_Dmitry
Участник клуба
 
Аватар для _Dmitry
 
Регистрация: 02.09.2007
Сообщений: 1,193
По умолчанию

Memo1.Lines.Add(Edit1.Text); и т.д.
_Dmitry вне форума Ответить с цитированием
Старый 20.04.2009, 15:04   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

точно. а ещё перебирать компоненты лучше так (ну, если реально нужные все Edit'ы!)
Код:
    for _i := 0 to Self.ComponentCount-1 do
      if Components[_i] is TEdit then Memo1.Lines.Add(TEdit(Components[_i]).Text);
Serge_Bliznykov вне форума Ответить с цитированием
Старый 30.05.2009, 20:31   #4
Vito89
Пользователь
 
Аватар для Vito89
 
Регистрация: 27.05.2009
Сообщений: 29
По умолчанию

надо едити записивать в переменную типа TStringList, потом переменную етого типа SaveToFile('Путь к файлу имя и розширениє')

Последний раз редактировалось Vito89; 30.05.2009 в 20:56.
Vito89 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как скопировать текст из мемо одной формы в мемо другой CraZZy RabbIt Общие вопросы Delphi 4 27.02.2009 00:01
Проблема с Мемо boostman Общие вопросы Delphi 15 25.05.2008 17:02
ЗАмена в мемо Drain Общие вопросы Delphi 2 29.01.2008 16:22
мемо ben95 Общие вопросы Delphi 1 29.01.2008 10:10
Проблема добавления в мемо из IdHTTP Kukkk Работа с сетью в Delphi 6 11.11.2007 13:48