Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.28;
Скачать: CL | DM;

Вниз

Не могу разобраться с TextFile   Найти похожие ветки 

 
expirez   (2006-04-30 23:54) [0]

Здравствуйте. Delphi ругается на код. Не могу понять почему?
program Project1;

uses
 SysUtils;

var
 TaskFile: TextFile;

function ReadWord(F: TextFile): String;

В функции я объявляю "на входе" тип TextFile и возникает сообщение что "file type not allowed here".

Второе. Для чтения использую Read(MyTextFile). Как переместить каретку на нужный символ? Не могу найти этой функции. Seek не подходит.


 
Gero ©   (2006-05-01 00:08) [1]

> Не могу понять почему

Потому что file type not allowed here. Хелп поможет.

> Как переместить каретку на нужный символ?

Прочитать все символы до нужного.


 
Alx2 ©   (2006-05-01 01:05) [2]

function ReadWord(Var F: TextFile): String;


 
expirez   (2006-05-01 09:33) [3]

Alx2 спасибо.


> > Как переместить каретку на нужный символ?
>
> Прочитать все символы до нужного.


А если каретку надо назад переместить?


 
LexxX ©   (2006-05-01 09:38) [4]

expirez   (01.05.06 9:33) [3]
А Seek уже не работает?


 
Anatoly Podgoretsky ©   (2006-05-01 13:13) [5]

expirez   (01.05.06 09:33) [3]
Начинай считывать с начала


 
Gero ©   (2006-05-01 14:35) [6]

> [3] expirez   (01.05.06 09:33)

Вот смотри сколько ты времени потратил, а ведь достаточно было нажать F1.


 
Kerk ©   (2006-05-01 14:37) [7]

LexxX ©   (01.05.06 9:38) [4]
А Seek уже не работает?


Для TextFile никогда не работало.



Страницы: 1 вся ветка

Текущий архив: 2006.05.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.064 c
15-1146772297
Том Сойер
2006-05-04 23:51
2006.05.28
Чтот в последнее время мой мозг стал деревенеть... :(


8-1135761924
race1
2005-12-28 12:25
2006.05.28
DirectX sound


15-1146332510
Festor:)
2006-04-29 21:41
2006.05.28
Разгон Amd Athlon 64 3000+


3-1144132931
Дмитрий_А
2006-04-04 10:42
2006.05.28
Правильно положить большой файл в БД


2-1147372407
ribbon
2006-05-11 22:33
2006.05.28
Проект, наподобие IBExpert