Вставка текста в TMemo из файла

← →
Nosferattu (2006-08-07 22:40) [0]

Здравствуйте! Подскажите пожалуйста, как можно в компонент TMemo или Label или в любой другой(не знаю какой подходит для этой цели) путём нажатия кнопки загрузить текст из внешнего текстового файла. Заранее огромное спасибо!

← →
Мефисто (2006-08-07 23:00) [1]

TMemo.Lines.LoadFromFile("MyFile.txt");

← →
Имя не скажу (2006-08-07 23:05) [2]

Ну так и загружай.
Если текстовый, тогда считываешь строку и например вот так

примерно вот так

procedure TForm1.Button1Click(Sender: TObject); var f:textfile; s:string; // begin If opendialog1.Execute then begin assignfile(f,Opendialog1.FileName); reset(f); while not eof(f) do begin readln(f,s); memo1.Lines.Add(s) end; end; end;

Прошц не ругать - я не мастер))))

← →
Имя не скажу (2006-08-07 23:06) [3]

> Мефисто (07.08.06 23:00) [1]
> TMemo.Lines.LoadFromFile("MyFile.txt");

не бейте меня, пожалуйста!!!! ))

← →
Loginov Dmitry © (2006-08-08 07:41) [4]

> Имя не скажу (07.08.06 23:05) [2]

А файл должен Пушкин закрывать?

> Имя не скажу (07.08.06 23:05) [2]

Нефигово было бы Memo сначала очистить...

> > Имя не скажу (07.08.06 23:05) [2]

Долго же он будет открываться :)) если файл большой

Вставка текста в TMemo из файла Найти похожие ветки