반응형
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 |