Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Текстовой файл

Автор: InfectedM 4.12.2007, 19:30

файл 123.RTTасодержит 5 строк

11
22
333
444
5555

нужно прочитать первую строку файла

ВОт:

Код


var
opn:file of integer;
b:integer;
begin
assign(opn,'F:\123.RTT);
reset(opn);
read(opn,b);
write(b);  write(chr(10));write(chr(13));
close(opn);
end.

пытаюсь так ничего не выходит,выводит на экран
число 12593 хотя там такого вообще нету

Автор: MetalFan 4.12.2007, 19:41

а почему b: integer?
как это в целое число ты собрался читать строку?

Автор: InfectedM 4.12.2007, 19:55

Пишу String
выдает ошибку Disk read error
(ошибка чтения диска генерируеться процедурой read в типизированных файлах в случае если вы пытаетесь считывание из полностью прочитыного файла)

мне надо прочитать 5 строку для этого есть оператр seek(opn,4) Но он походу работает только с типизированными файлами...
тоесть f:text нельзя написать можно только F:file of string;
кароче я запутался совсем пойду книдку почитаю:((

Автор: InfectedM 4.12.2007, 20:16

Вообще можно из типизированных файлов считы вать текст?
или надо opn:text; писать? то как когда seek юзать? он тока для типизированных
или что?

Автор: InfectedM 4.12.2007, 21:10

Код


var
opn:file of integer;
b:string;
begin
assign(opn,'F:\123.RTT);
reset(opn);
read(opn,b);
write(b);  write(chr(10));write(chr(13));
close(opn);
end.

ошибка

Disk read error
(ошибка чтения диска генерируеться процедурой read в типизированных файлах в случае если вы пытаетесь считывание из полностью прочитыного файла)

почему так?

Автор: dinok21 5.12.2007, 10:53

Привет всем!Тут сессия на носу и надо написать программу на Delphi.....Помогите пожалуйста.Есть текст программы,осталось только вписать его куда надо чтоб он заработал...а я не знаю как это делается...HELP!!!!!!!!!!

Автор: Alexeis 5.12.2007, 11:28

dinok21, это в центр помощи нужно обращаться
http://forum.vingrad.ru/index.php?show_type=forum&showforum=142