Usuarios: Arreglado un fallo con cadenas SQL que contienen caracteres UTF-8.
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@120 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
a300a6bd73
commit
5d315a79c8
@ -149,8 +149,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TUCROConn.UCExecSQL(FSQL: String);
|
procedure TUCROConn.UCExecSQL(FSQL: String);
|
||||||
|
var
|
||||||
|
ASQL : String;
|
||||||
begin
|
begin
|
||||||
(FRemoteService as IsrvUsuarios).SQLExecuteCommand(FSQL);
|
ASQL := AnsiToUtf8(FSQL);
|
||||||
|
(FRemoteService as IsrvUsuarios).SQLExecuteCommand(ASQL);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TUCROConn.UCFindDataConnection: Boolean;
|
function TUCROConn.UCFindDataConnection: Boolean;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user