Ошибка с переменной

[anGeee]

Ну я пока сам не очень знаю, что пытаюсь сделать. Я уже писал в первом сообщении, что от нечего делать засел. Так сказть, посмотреть, что я умею )
А структура tRecord только пока состоит из двух полей, возможно там будет еще что-нибдуь, так что пусть будет )
Насчет FileHandle я прочитал в книжке, что-то там связанное с дескрипторами.. И в процедуру FileClose как раз и передается число.. И все нормально работает.
Ну вроде все косяки исправил, на сегодня хватит, спасибо всем, кто помогал ))

[Пепел Феникса]

FileClose - API функция...в нее передается Хендл открытого файла
в принципе можно таким образом делать...

а покажите предыдущую версию процедуры FileCreate(или как она у вас ттам)

[anGeee]

а покажите предыдущую версию процедуры FileCreate(или как она у вас ттам)

Не очень понял о чем вы.. Ну файл изначально создавался просто вот так

procedure TForm1.FormCreate(Sender: TObject);
begin
 if not FileExists('Data.pkb') then
  FileCreate('Data.pkb');
end;

И еще один вопрос возник. Я начал работать с этим хендлом, ссылающийся на файл. В принципе процедуры все как и при работе с логичискими файлами, но вот есть ли функция, которая определяет по хендлу достигнут конец файла или нет, то есть аналог EOF(file) ? Или мне все это самому проверять, сравнивая размер считанных данных с размером файла ?