PDA

Просмотр полной версии : Нужна помощь


Dimedrol1536
06.07.2012, 15:05
Нужна помощь.

Var
Reg:Tregistry;
begin
Reg:=TRegistry.create;
REG.RootKey:=HKEY_CURRENT_USER;
REG.OpenKey('Software\4Game\4GameManager\Games\Poi ntBlank',true);
REG.ReadString('patch');
Reg.Destroy;
end;

В параметре 'patch' лежит значение пути установки программы.
Как записать этот путь?

RenameFile('путь\1.txt','путь\Rename.txt');