Hi,
wollte jetzt mal ein wenig mit dem empfohlenen Tutorial rumprobieren. Ich habe MS XML4 installiert, aber da kommen gleich Probleme auf.
Ich wollte erst einmal die Funktion ausprobieren, die prüft, ob MS XML4 installiert ist.
Delphi-Quellcode:
function DoesXMLExist: boolean;
var
reg : TRegistry;
s :
string;
begin
Result := false;
reg := TRegistry.Create(KEY_READ);
if(reg <>
nil)
then
with reg
do try
RootKey := HKEY_CLASSES_ROOT;
if(OpenKey('
CLSID\' + GuidToString(CLASS_DOMDocument40) + '
\InProcServer32',false))
then
try
s := ReadString('
');
Result := (s <> '
')
and (fileexists(s));
finally
CloseKey;
end;
finally
Free;
end;
end;
Aber er meint "
CLASS_DOMDocument40" sei ein undefinierter Bezeichner.
Was mach ich falsch.
Ich verwende
Delphi 5 Standard.
Gruß Ben