работа с файлами - Помощь студентам

vakyla · 01.11.2009, 15:38

привет!
Кто может подсказать как работать с файлами?
Мне нужно с текстового файла прочитать информацию и записать ее в окно Label.
Возможно?если да то подскажите пожалуйста!

k1r1ch · 01.11.2009, 16:12

Работает с файлами .txt:

Код:

var 
  InputText: Text; //Спец. тип для работы с текстовыми файлами
  S: string;

begin
  AssignFile(InputText, 'C:\Text.txt'); 
  Reset(InputText); //Открываем для чтения
  Readln(InputText, S); //Читаем первую строчку и устанавливаем курсор в начале слудующей
  CloseFile(InputText); //Закрываем файл
  Label1.Caption := S; //Тут понятно)
end;

vakyla · 01.11.2009, 17:26

пишет что ошибка что нет такого text нет такого типа переменных

k1r1ch · 01.11.2009, 17:50

Напишите в глобальные переменные, в локальных действительно ошибка

Вавел из ГМТУ · 01.11.2009, 17:54

InputText : TextFile;

vakyla · 01.11.2009, 20:13

программа запускается только при нажатии на кнопку вылазиет ошибка и курсор зависает в начале этой строки:
Reset(InputText); //Открываем для чтения

Цитата:

Сообщение от Вавел из ГМТУ

InputText : TextFile;

прога тоже запускается но при нажатие на кнопку вылазиет ошибка в начале вот этой строки:
AssignFile(InputText, 'C:\Text.txt');

Вавел из ГМТУ · 01.11.2009, 20:29

А какой текст ошибка? Может быть имя IntputText юзается Delphi....
Поменяй на это имя.. может в этом дело.

vakyla · 01.11.2009, 20:37

он выдает ошибку и курсор стоит в начале вот этой строки;
AssignFile(InputText, 'C:\Text.txt');
может есть еще одно мнение может не находит этот файл сохраненый!
где он должен поправилам находится?

Вавел из ГМТУ · 01.11.2009, 21:00

Дык компилятор должен внизу написать текст ошибки.

Всё рабтает. Нужно только создать фаил в C:\Text.txt

vakyla · 01.11.2009, 21:34

спасибо все работает!

01.11.2009, 15:38	#1
vakyla Пользователь Регистрация: 24.03.2009 Сообщений: 40	работа с файлами привет! Кто может подсказать как работать с файлами? Мне нужно с текстового файла прочитать информацию и записать ее в окно Label. Возможно?если да то подскажите пожалуйста! Последний раз редактировалось vakyla; 01.11.2009 в 15:49.

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Работа с файлами в С++	ai\ekcah^p	Помощь студентам	2	21.06.2009 16:16
Работа с файлами	basss	Помощь студентам	2	22.12.2008 01:07
Работа с файлами	DM_bite	Помощь студентам	4	20.09.2008 16:52
Работа с файлами	Stiker	Общие вопросы C/C++	1	10.04.2008 22:47
Работа с файлами	ShVad	Общие вопросы Delphi	4	03.02.2007 10:43

01.11.2009, 17:26	#3
vakyla Пользователь Регистрация: 24.03.2009 Сообщений: 40	пишет что ошибка что нет такого text нет такого типа переменных

01.11.2009, 17:50	#4
k1r1ch ACM! Форумчанин Регистрация: 19.06.2009 Сообщений: 382	Напишите в глобальные переменные, в локальных действительно ошибка

01.11.2009, 17:54	#5
Вавел из ГМТУ Форумчанин Регистрация: 19.06.2009 Сообщений: 896	InputText : TextFile;

01.11.2009, 20:29	#7
Вавел из ГМТУ Форумчанин Регистрация: 19.06.2009 Сообщений: 896	А какой текст ошибка? Может быть имя IntputText юзается Delphi.... Поменяй на это имя.. может в этом дело.

01.11.2009, 20:37	#8
vakyla Пользователь Регистрация: 24.03.2009 Сообщений: 40	он выдает ошибку и курсор стоит в начале вот этой строки; AssignFile(InputText, 'C:\Text.txt'); может есть еще одно мнение может не находит этот файл сохраненый! где он должен поправилам находится?

01.11.2009, 21:00	#9
Вавел из ГМТУ Форумчанин Регистрация: 19.06.2009 Сообщений: 896	Дык компилятор должен внизу написать текст ошибки. Всё рабтает. Нужно только создать фаил в C:\Text.txt

01.11.2009, 21:34	#10
vakyla Пользователь Регистрация: 24.03.2009 Сообщений: 40	спасибо все работает!