Скачать: CL | DM;

Вставка текста в 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]


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

---

← →
Ega23 ©   (2006-08-08 09:35) [5]

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


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

---

← →
Gydvin ©   (2006-08-08 11:03) [6]

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c