|
@@ -898,6 +898,7 @@ begin
|
|
RCI := Sys_UniFreeUConvObject (TempCpRec.UConvObj);
|
|
RCI := Sys_UniFreeUConvObject (TempCpRec.UConvObj);
|
|
if RCI <> 0 then
|
|
if RCI <> 0 then
|
|
OSErrorWatch (cardinal (RCI));
|
|
OSErrorWatch (cardinal (RCI));
|
|
|
|
+ TempCpRec.UConvObj := nil;
|
|
end;
|
|
end;
|
|
if UConvObjectForCP (CP, UConvObj) = Uls_Success then
|
|
if UConvObjectForCP (CP, UConvObj) = Uls_Success then
|
|
begin
|
|
begin
|