반응형
procedure Tfrm_Main.proSetInstallInfo;
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
try
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Uninstall\hPop', True);
Reg.WriteString('Displayname', 'hPop');
Reg.WriteString('UninstallString', '"' + ExtractFileDir(hPopExe) + '\hPopUnInstall.exe' + '"');
except
//
end;
finally
FreeAndNil(Reg);
end;
end;
자세한 설명은 아래의 출처를 확인해보길 바란다.
이런 것들을 알아갈 때마다 프로그래밍의 세계는 넓고도 아직 모르는 것이 많구나 하는 생각이 든다.
사실 그렇기도 하고 ㅋㅋㅋ
출처 : http://www.borlandforum.com/impboard/impboard.dll?action=read&db=bcb_qna&no=29250
반응형
'Programming > Delphi' 카테고리의 다른 글
| 델파이 디버깅시 시스템 다운이 될 때 (0) | 2011.07.04 |
|---|---|
| 퀵리포트 사용 백서 (0) | 2011.06.28 |
| 윈도우7 에서 부팅시 자동으로 프로그램 실행하기 (1) | 2011.06.20 |
| 퀵레포트 미리보기를 HTML, EXCEL, CSV, RTF 등으로 변환하는 방법 (0) | 2011.05.27 |
| 폼이 서서히 나타나고 서서히 사라지기 (플래쉬효과) (0) | 2011.04.07 |