Community technical support mailing list was retired 2010 and replaced with a professional technical support team. For assistance please contact: Pre-sales Technical support via email to sales@march-hare.com.
On Sat, 11 Sep 2004 10:42:22 +0200, Olaf Groeger <Olaf.Groeger at gmx.de>
wrote:
>Sorry for being offtopic.
>
>Bo, i downloaded the current viewcvs setup (1.0j) from your page and it
>doesn't install. It complains about that the win32 extensions would be
>missing. I have the release 202 of them installed. How do you check for the
>existance of the extensions?
>
>Yours
>Olaf
PythonExists := RegKeyExists(HKLM, 'Software\Python');
PythonWin32Exists := RegKeyExists(HKLM, 'Software\Python\Pythonwin');
Then:
RegQueryStringValue(HKLM,'Software\Python\PythonCore\2.3\InstallPath\','',sPythonExe);
if sPythonExe = '' then
RegQueryStringValue(HKLM,'Software\Python\PythonCore\2.2\InstallPath\','',sPythonExe);
if sPythonExe = '' then
RegQueryStringValue(HKLM,'Software\Python\PythonCore\2.1\InstallPath\','',sPythonExe);
if sPythonExe = '' then {Python 2.1 was not detected, give up}
begin
PythonExists := false;
PythonWin32Exists := false;
end;
Note that ViewCvs requires an administrative install of Python and
PythonWin32, so all keys must be in HKLM.
/Bo
(Bo Berglund, developer in Sweden)