[wendstor]

простой способ это сохранять массив в файл при помощи tfilestream
пример с сохронением и загрузкой одного массива.

Код:

//// запись
type
 Tusers = record;
 Name : string[20];
 Ball    : integer;
end;

/// вставляем в private
private
procedure CreateUser

....
var
users : Tusers;

....

/// процедура создания записи user'a
procedure Form1.CreateUser;
begin
 users.name := 'Vasya Pupkin';
 users.ball := 2;
end;

// процедура сохранения массива в файл
procedure SaveData;
var
fs: TFileStream;
begin
fs:=TFileSteam.Create('c:\data.dbs',fmCreate);
fs.write(users, SizeOf(users));
fs.free;
end;

/// чтение данных из массива
procedure LoadData;
var
fs: TFileStream;
begin
fs:=TFileSteam.Create('c:\data.dbs',fmOpenRead);
fs.read(users, SizeOf(users));
fs.free;
Form1.Memo1.Lines.Add('Имя:'+users.name+' балл: '+IntToStr(users.Ball));
end;

в общем код написан на скорую руку не проверял, но должен работать