Gracias por responder.
Cita:
Empezado por mamcx
Un NULL es *infeccioso*. NULL con lo que sea da NULL (que es lo que creo que pasa en vl_per[0]+vl_per[1]).
Pero el *caracter* null es un *encoding*. Al igual que "enter" y "tab" (que se identifican por un #). Por lo tanto, debes es guardar el # o el *char* que representa el null, no el valor null (null <> char o # que representa null).
|
ya intente (creo) hacerlo, tengo el procedimiento
Código Delphi
[-]function TForm1.codificar(n2 :Integer): string;
var L,H :Integer;
begin
L:= n2 mod 256;
H:= (n2-L) div 256;
result:=CHR(H)+CHR(L);
end;
Que es la copia del procedimiento del programador fox (traducida claro)
Como se puede ver la salida es un string el cual por ejemplo me devuelve en el debug #0'-'
si intento hacer un
Código Delphi
[-]FieldByName('pl_per').AsVariant:= vl_per;
no me inserta en ese campo nada (aparentemente) pero creo que me inserta el null (#0) y el resto de la cadena no lo cual lògicamente al hacer el desencriptado me devuelve valores incorrectos.
En el ejemplo #0'-' deberia devolverme al desencriptar 175 y me devuelve 8565.
probe con otros valores y solo tengo ese problema cuando el encriptador me retorna el #0 primero.
La verdad no se como hacer lo que indicas, si es que me puedes dar un ejemplo por favor te lo agradeceria.