CreateFile, Delphi.

[edmynt]

Мне нужно создать обычный типизированный файл

создал тип и пытаюсь создать..но ошибку находит.

type
  TFileBD = record
    slovo:string[20];
    indexSlovo:string[6];
  end;



CreateFile(slovar+BlockFile,GENERIC_WRITE,0,0,FILE_FLAG_WRITE_THROUGH);

Можно канешн создать через AssignFile, но у меня будет 30 файлов, через креат файл проще кажеться.

Какие параметры указать?