Delphi-Quellcode:
function ClassIDExists(const classID:WideString):Boolean;
var
tmp : TGUID;
begin
Result := Succeeded(CLSIDFromProgID(PWideString(classID), tmp));
end;
Weil der Übergabeparameter den Datentyp WideString hat.
WideString und PWideString sind kompatibel; der Compiler weiss wie er die Typumwandlung vornehmen muss.
String, genauer gesagt AnsiString und PWideString sind nicht kompatibel.
Untehalb D2009 gilt: String=AnsiString
Ab D2009 gilt: String=WideString (das ist der Grund weshalb PWideString('irgendein Text') erlaubt ist)
Bei den älteren Delphi Versionen nimmt der Compiler die Konvertierung zwischen String und WideString
beim Aufruf einer Funktion oder Procedure automatisch vor.
Nimm einfach obige Funktion und es funktioniert für alle Delphi Versionen.