Показать сообщение отдельно
  #2  
Старый 19.04.2010, 08:38
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Добавить, изменить или удалить запись в реестре:

Код:
Uses Registry;
Procedure RegReadWrite;
Var
 Reg: TRegistry;
begin
 Reg:= TRegIniFile.Create;
 Reg.RootKey:= HKEY_CURRENT_USER;  //Корень
 Reg.OpenKey('Key', True);                 //Путь
 Reg.WriteInteger('Parametr', 1);         //Параметр значение.
 Reg.CloseKey;
 Reg.Free;
end;

Переименовать файл:

Код:
 RenameFile('OldName','NewName'); 

Скопировать файл:

Код:
 CopyFile('Name1','Name2',True);

Заставить прогу скопировать себя куда-то:

Код:
 CopyFile(PAnsiChar(ParamStr(0)),'Путь куда копировать',True);
Ответить с цитированием