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

[D!zel]

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

[Баламут]

Примерно так. Дальше уж сам

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Registry;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    Reg: TRegistry;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_LOCAL_MACHINE;
  if Reg.OpenKey('\Software\MyProga', true) then begin
    Reg.WriteInteger('Top', Form1.Top);
    Reg.WriteInteger('Left', Form1.Left);
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  Top, Left: integer;
begin
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_LOCAL_MACHINE;
  if Reg.OpenKey('\Software\MyProga', false) then
  begin
    Top := Reg.ReadInteger('Top');
    Left := Reg.ReadInteger('Left');
    Form1.Left := Left;
    Form1.Top := Top;
  end;
  Reg.Free;
end;

end.

[D!zel]

Баламут, спасибо, но я знаю как организовать чтение/запись положение окна программы и добавить ее в автозагрузку, но понятия не имею как работать с компонентами или опциями программы такие как выбор шрифта, выбор размера шрифта или даже кодировку...

[KORN]

сохраняй Font.size font.Color и т.д.
юзай поиск там точно это есть

[Квэнди]

это уже никакого отноения к реестру явно не имеет.
один вопрос- одна тема
закрыто.