@@ -10,7 +10,7 @@ Var
LibUUIDName : String = 'libuuid.so.1';
ProcName : String = 'uuid_generate_time';
-function CCreateGUID(out Guid: TGUID): Integer;
+function CCreateGUID(out Guid: TGUID): HResult;
Implementation