Проблема с кодом(

[DM_bite]

Есть такая процедура:

procedure TForm1.FormCreate(Sender: TObject);
var RegIni:TRegIniFile;
begin
RegIni:=TRegIniFile.Create('Software')
RegIni.RootKey:= HKEY_LOCAL_MACHINE;
RegIni.OpenKey('Software', true);
RegIni.OpenKey('Microsoft', true);
RegIni.OpenKey('Windows', true);
RegIni.OpenKey('CurrentVersion'
RegIni.WriteString('RunServices', ''qr12.exe',//qr12.exe-название                  //исполняемого файла
Application.ExeName);
RegIni.Free;
ServerSocketl.Active:=true;
end;

Требуеться, чтобы программа прописала себя в автозагрузку, но дельфа все время ругаеться на RegIni:=TRegIniFile.Create('Softwar e')

[Карась]

И что пишет компилятор?
Сходу могу сказать то там нет ; в конце... Но наверное не этом ошибка....

[Tayfun]

Так, во первых
RegIni:=TRegIniFile.Create('Softwar e')
Забыл точку с запятой
+ Я неуверен, был-ли подключен модуль Registry ?

Попробуй вот так:

uses Registry;

procedure TForm1.Button1Click(Sender: TObject);
var
  reg: TRegistry;
begin
  Reg := nil;
  try
    reg := TRegistry.Create;
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.LazyWrite := false;
    reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',
      false);
    reg.WriteString('My App', Application.ExeName);
    reg.CloseKey;
    reg.free;
  except
    if Assigned(Reg) then Reg.Free;
  end;
end;

[DM_bite]

+ Я неуверен, был-ли подключен модуль Registry ?

Подключен в uses