Caracteres de 16 bits en vez de 8 bit, funcion send

[cesarsoftware]

Hola compis.

La solucion al problema es definir la varible cadena como "ansistring".

Código Delphi [-]
var
  cadena: ansistring;
begin
  Send(nSocket, Pointer(cadena)^, size, 0);
end;