![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() |
petro_fm |
![]()
Сообщение
#1
|
Гость ![]() |
нужно открыть уже открытый файл,для чтения, пишу вот так :
AssignFile(f,fn.Text); FileMode:=fmShareDenyNone ; {$I-} reset(f); {$I-} err:=IOREsult; if err<>0 then begin ShowMessage('Error open file # '+IntToStr(err)); exit; End; возвращает ошибку №32 FileMode пробовал разные, все равно не открывает , но команды type, copy както этот файл открывают ???? а как ???? |
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Ты что, именно этот код пытаешься запускать? Чего ты сюда постишь-то бред этот? Ты КОПИРУЙ а не впечатывай, ты ж ошибки вносишь!!! Как ты, например, создаешь TextFile через конструктор TFileStream?
В общем, я смотрю, по-хорошему не понимаем... Либо ты даешь код (не куски, а КОД, напиши маленькую программу, которая ТОЛЬКО пытается читать открытый файл, и запость ее сюда ПОЛНОСТЬЮ), который компилируется и запускается на выполнение, либо я закрываю тему... Балагана на форуме и без тебя хватает! |
![]() ![]() |
![]() |
Текстовая версия | 11.07.2025 17:47 |