액세스가 거부되었다면 Registry경로가 잘못되었다는 이야기일텐데요?
소스상에 명시된 레지스트리 경로가 제대로 되었는지 다시한번 확인해 보시기 바랍니다.

경로는 이상이 없거든요..
이게 XP에서는 전혀 이상이 없어여...
Window7에서만 엑서스가 거부되는데요...
동일한 PHP 소스에 동일한 ActiveX파일로 하는데도 Window7에서만 엑서스가 거부됩니다.
리턴값을 셑해서 PHP에서 읽어봐도 전혀 이상이 없는데요...뭐가 문제인지...
미치것어여...

보통 관리자 권한이 아닐때 발생되긴 하는데... 관리자 권한이 아닐리도 없을테구요
음. Windows7에 파일이나 폴더 등록정보에 보면 호환성탭이 있지 않나요?
ActiveX 프로그램이라고 하셨는데 일단 WinApplication으로 하신다음에
컴파일된 exe파일의 등록정보에 들어가셔서 WinXP로 호환성을 설정하신다음에
동작되는지 확인해보는 방법은 어떨까요?

답변주셔서 감사합니다.
일단 Activex파일을 잘 열립니다,.
openkkey()에서 오류가 나는 건데요...
다른 로직은 잘 돌아가거든요...
키값을 못 찾아서 나는 것 같은데...
도데체 모르겠어여

Windows7하고 XP와는 많이 다를것입니다.
API함수도 지원하는것도 있고, 다른 이름으로 변경된것도 있을테고요.
관련서적이나 인터넷사이트를 검색을 해보시면서 Openkey에 대응되는
API함수를 찾아야 되지 않을까 생각되네요...

procedure TForm1.Button2Click(Sender: TObject);
var
LocalReg : TRegistry;
AppRegPath : string;
begin
try
AppRegPath:='SOFTWARE\Microsoft\Windows\CurrentVersion'; //열림
//AppRegPath:='SOFTWARE\Microsoft\Windows\CurrentVersion\Audio'; //안열림-오류
//AppRegPath:='SOFTWARE\Ahnlab'; //열림
//AppRegPath:='SOFTWARE\Ahnlab\MyFirewall 4.0'; //안열림 - 오류
LocalReg := TRegistry.Create;
with LocalReg do
begin
//RootKey := HKEY_LOCAL_MACHINE;
if not OpenKey(AppRegPath, false) then
begin
showmessage('error');
exit;
end;
showmessage('aaa'+ReadString('Program Folder'));
end;
finally
LocalReg.CloseKey;
LocalReg.Free;
end;
end;

이코드를 돌려보면 열리는 게 있고 안열리는게 있는데 뭔 일인지요...
사용권한을 다 켰는데도 그러는데요....

//RootKey := HKEY_LOCAL_MACHINE;
를 풀어
RootKey := HKEY_LOCAL_MACHINE;
로 하면 하나도 안 읽혀여

찾았습니다.
OpenKeyReadOnly(AppRegPath)
이걸로 하니깐 잘 읽내요.
window7이 처미션떄메 여러가로 골머리가 아프네여.
땅콩맨님 감사.....

해결하셨다니 다행이네요.
뭐 제가 한일이 있나요? Windows7이 운영체제가 다르다보니 다른 이유가 있을거라고 추측한것뿐인데요. ㅎㅎ
OpenKeyReadOnly라... 저 역시 윤동님에게 한수배우고 갑니다.

좋은 저녁시간되세요~