Форум: "Начинающим";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];
Вниз
Вставка текста в 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 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.062 c
