как сделать сохранение программы?

[dumper]

Прошу помоч с одной проблемой..мне нужно сделать сохранение программы .. т е запускаю прогу...делаю нужные действия..закрываю...потом опять запускаю и все что было отмечено автоматом загружается, кто сможет помоч ..отзовитесь я кину исходник программы...очень буду благодарен

[dumper]

я сам пробовал делать вроде ошибок нет..а не сохраняет нифига

[dumper]

procedure TForm1.FormCreate(Sender: TObject);
var
i, j, k, x, y: integer;
begin
GetDir (0, CurDir);
If FileExists (CurDir+'\Base.dat') then
begin
AssignFile (BaseArh, CurDir+'\Base.dat');
Reset (BaseArh);
Repeat
RC:=RC+1;
SetLength (Base, RC);
Read (BaseArh, Base[RC-1]);
Until EOF (BaseArh);
CloseFile (BaseArh);
end;


............

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
I : word;
begin
If RC>0 then
begin
AssignFile (BaseArh, CurDir+'\Base.dat');
ReWrite (BaseArh);
For I:=0 to RC-1 do
Write (BaseArh, Base[i]);
CloseFile (BaseArh);
end;
end;


то есть вот так произвожу операцию с файлами вроде по идее должно быть так а не сохраняет , где RC - это кол-во отмеченных мест

[XATAB]

Попробуй с помощью ini фаилов.

[itisiam]

У меня похожий вопрос - там тож кое что сохранять надо(настройки программы) , так вот что лучше использовать - ini или типизированный файл или может еще что, не подскажете?

[pu4koff]

по моему если сохраняешь произвольную инфу, то лучше ini, а если только однотипные (integer,record,string[]), то уже типизированным файлом. Вроде все логично

[Shuraken]

Работайте с реестром.

uses Registry;

type
TForm1 = class(TForm)

private
FRegistry: TRegistry;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
FRegistry := TRegistry.Create;
FRegistry.RootKey := HKEY_CURRENT_USER;
FRegistry.OpenKey('\xxx\Config', true);
end;

И дальше используем функции ReadBoolean(Name: string; DefValue: boolean = false) WriteBoolean(Name: string; Value: boolean); ReadString, WriteString; ReadCurrency, WriteCurrency и т.д.

[pu4koff]

лично я не люблю проги, которые что-то прописывают в реестре, т.к. они за собой это не убирают потом. Лучше по моему юзать ini файлы, а в реестр записывать что-то только при сильной необходимости

[Shuraken]

С реестром работать немного проще, чем с ini-файлами и надежней. Файл затереть достаточно просто, а в реестр еще залезть надо. И при этом данный класс умеет также за собой и чистить реестр, это несложно посмотреть и реализовать.

[pu4koff]

Сообщение от Shuraken

С реестром работать немного проще, чем с ini-файлами и надежней. Файл затереть достаточно просто, а в реестр еще залезть надо. И при этом данный класс умеет также за собой и чистить реестр, это несложно посмотреть и реализовать.

Обычно в Ini файлах/реестре пишут не особо важную инфу, а что-то вроде размеров форм и т.п., потеря которых не несет никаких трудностей (не зря же сделали такой параметр, как значение по умолчанию) Ну у реестра один плюс - постоянное местоположение записей, т.е. если ini файл хранится обычно в папке с прогой, то ключи в реестре всегда на одной полке лежат. это конечно удобнее для организации установки обновлений для прог ну и много в чем еще может помочь... например, засунул куда-нить подальше ключик с датой первого запуска проги, вот и инфа для триал версии