Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
ВнизЗагрузка файла! Найти похожие ветки
← →
Socol (2001-12-28 15:04) [0]Здраствуйте!
Почему данный код загружает только первую строчку и как этого избежать?
var f:textfile;
s:string;
begin
o1.Filter:="Файлы конфига(*.cfg)|*.cfg";
o1.Title:="Конфиг";
o1.FilterIndex:=1;
if o1.Execute then
AssignFile(f,o1.FileName);
reset(f);
read(f,s);
Memo1.text:=s;
end;
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.006 c