uses
.., Registry;
procedure SetRegistry;
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
//윈도우가 64비트일 경우 WOW6432Node로 저장되는 것을 원하지 않을 때 사용합니다.
//Reg := TRegistry.Create(KEY_ALL_ACCESS or KEY_WOW64_64KEY);
try
//Root를 선택합니다.
Reg.RootKey := HKEY_LOCAL_MACHINE;
//Key가 없을 경우 생성
if Reg.OpenKey('\Software\Test', True) then begin
//Key에 저장할 타입과 값을 입력합니다.
Reg.WriteString( 'str', '테스트 입니다.');
Reg.WriteInteger('int', 1234);
Reg.CloseKey;
end;
finally
Reg.Free;
end;
end;
2019/07/30 - [ - Delphi/따라하기 시리즈] - Registry에 키, 값 가져오기 - 2
반응형