Создание файла через метод класса

[Yami_Yami]

Вобщем,я новичок в опп

Значит нужно, чтобы создавался типизированный файл при помощи метода класса

Тип записей файла

TElement=record
key:char;
x,y:real;
end;

Тип файла
TRealFile=file of TElement;

Сам класс

TFile=class(TObject)
Memo1: TMemo;
Fname:string;
public
F:TRealFile;
FSz:integer;
procedure CreateFile;
end;

При создании файла пользователь вводит имя файла(Fname) и его размер(FSz) (в новом окне)
Содержание файла генерируется рандомно

описание метода:

procedure TFile.CreateFile;
var i:integer;
el:TElement;
begin
AssignFile(F,Fname);
Rewrite(F);
for i:=0 to FSz-1 do
begin
randomize;
el.key:='a';
el.x:=random(101);
el.y:=random(101);
write(F,el);
end;
CloseFile(F);
end;

Все компилируется, но при запуске(создании файла) выдает ошибку "EAccessViolation at adress..."

Никак не пойму что не так(

[GunSmoker]

Начать надо с мат-части.

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

Посмотрите, например, TFileStream в модуле Classes.pas.

[Yami_Yami]

т.е. добавить конструктор/деструктор?

[GunSmoker]

Нет, это не обязательно.