[grafmoto]

PHP код:

procedure TForm1.FormCreate(Sender: TObject);

type

  TestRec = record

    id: Integer;

    text: String[32];

  end;

var

  h: THandle;

  dummy: Cardinal;

  buf: TestRec;

begin

  buf.id:=1;

  buf.text:='hello';

  h:=CreateFile('c:\Downloads\test.txt', GENERIC_WRITE, 0, nil, CREATE_ALWAYS, 0, 0);

  WriteFile(h, buf, SizeOf(TestRec), dummy, nil); 

  CloseHandle(h);

end; 

[pva]

файл может быть с любым расширением. Но желательно чтобы не совпадал с "зарегистрированными программами". Обычно используют dat или bin чтобы показать что файл двочиный. Для записи в файл пойдёт всё, что может писать двоичные файлы: AssignFile+Write, CreateFile+WriteFile, object TDiskFile и т.д., на любой вкус есть. Если требуется записать в виде текста, надо перебирать члены record и поочерёдно писать в текстовый файл