function StringToGUID(const S: string): TGUID;
TGUID StringToGUID(const AnsiString S);
ComObj
This is function ComObj.StringToGUID.