try
with Reg do
begin
RootKey := HKEY_LOCAL_MACHINE;
if KeyExists('SOFTWAREESTSoftALZipa') then
begin
ShellExecute(Handle, 'open', '화일명', nil, nil, SW_SHOW);
end
else
begin
ShellExecute(Handle, 'open', '설치 화일명', nil, nil, SW_SHOW);
end;
end;
finally
Reg.Free;
end;
try
with Reg do
begin
RootKey := HKEY_LOCAL_MACHINE;
if KeyExists('SOFTWAREESTSoftALZipa') then
begin
ShellExecute(Handle, 'open', '화일명', nil, nil, SW_SHOW);
end
else
begin
ShellExecute(Handle, 'open', '설치 화일명', nil, nil, SW_SHOW);
end;
end;
finally
Reg.Free;
end;
대충짜밨는데, 이런식으로 하믄 되지 않을까여?
초간단 소스임다.
즐프 하셈.....