Code: Select all
Index: dbc/ZDbcAdoUtils.pas
===================================================================
--- dbc/ZDbcAdoUtils.pas (revision 812)
+++ dbc/ZDbcAdoUtils.pas (working copy)
@@ -286,6 +286,7 @@
{$ENDIF}
varStrArg: Result := adWChar;
varString: Result := adVarChar;
+ varUString: Result := adVarChar;
varAny: Result := adEmpty;
else
Result := adEmpty;