Как добавить сведенья о програме в реестр

[SeRhy]

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

[SunKnight]

uses registry;
procedure TForm1.SpeedButton1Click(Sender: TObject);
var reg:TRegistry;
begin
        reg:=Tregistry.Create;
        reg.RootKey:=HKEY_CLASSES_ROOT;
        reg.CreateKey('My_proga');
        reg.OpenKey('My_proga',true);
        reg.WriteString('My project','fffffffff');
end;

[SunKnight]

Ой!! это не то!

[SunKnight]

Вот уже обсуждалось

[FaTaL]

var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
RootKey := HKEY_LOCAL_MACHINE;
OpenKey('Software\Microsoft\Windows \CurrentVersion\Run', True);
WriteString('Имя ключа', Application.ExeName);
CloseKey;
Free;
end;
end;

И не забудь в Uses дописать Registry;