Delphi 7 не работает программа

Здраствуйте, написал программу типа тестирования, я хочу сделать так, чтобы при нажатии на RadioButton переменная A=1, суммировалась с тем что было в текстовом файле, и записывала сумму обратно в файл. Например ответил правильно на 3 вопроса, в файле число 3. Написал программу выдает ошибку, не знаю что делать. Может проблема в описании переменных?
Кусок программы:

procedure TForm1.RadioButton4Click(Sender: TObject);
var h:text; a,b,c:integer;
begin
a:=1;
assign(h,'d:\n23vidia\1.txt');
reset(h);
read(h,b);
close(h);
b:=b+a;
rewrite(h);
writeln(h,b);
close(h);
end;

Примечание:
Текст ошибок
http://cs322917.vk.me/v322917960/15d/Wz1v8zr-D1I.jpg

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.