| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка при открытии файла. [D5]
Jimmy © (2006-08-03 13:36:00)Когда создаю новое Application, помещаю на Form1 Button1, и пишу
procedure TForm1.Button1Click(Sender: TObject);
var FName:String;
f:TextFile;
begin
FName:='C:\1.txt';
AssignFile(f,FName);
{$I-}
Reset(f);
if ioresult<>0 then ShowMessage('Cann`t open file!');
CloseFile(f);
{$I+}
end.
файл FName открывается и с первого раза и с любого. (И это понятно!) А когда тот же код я вставляю в свой графический редактор, файл FName при первой попытке открытия не открывается (выдает ошибку I/O 103 на строке Reset если
убрать {$I-}), а со второго раза открывается. Причем к этому файлу я нигде в редакторе больше не обращаюсь. В чем может быть дело? Заранее спасибо.
Desdechado (2006-08-03 14:02:00) [1]Может, файла нет?
Германн (2006-08-03 13:47:00) [2]103 - File not open
Что-то не то. Имхо, не может эта ошибка возникать на строке Reset.
| |
