Код
var
F: TextFile;
S: String;
begin
AssignFile(F, 'Text.txt');
Reset(F);
Read(F, S);
Label1.Caption := S;
end;
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
Текстовые Файлы |
Dead.MorozZ |
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 108 Пол: Мужской Реальное имя: Георгий Репутация: 0 |
Помогите присвоить метке значение Текстового Файла. Мой код присваивает только первую строку из файла, в чем ошибка???
Код var F: TextFile; S: String; begin AssignFile(F, 'Text.txt'); Reset(F); Read(F, S); Label1.Caption := S; end; -------------------- Минус - это уже половина плюса, а плюс порой - целых два минуса...
|
Текстовая версия | 28.09.2024 0:59 |