PDA

Ver la Versión Completa : mover en bloque


jars
25-02-2019, 18:13:20
Hola, tengo una estructura como la siguiente:

TGENERAL_CFG = record
extseq: array[0..20] of char;
waitdtone: array[0..2] of char;
predialseq: array[0..20] of char;
minhook: array[0..2] of char;
end;


Los datos me los pasa un servicio externo en una variable string. Como puedo hacer para poder volcar esa variable a TGeneral_cfg
Espero haberme explicado.
Gracias.

roman
25-02-2019, 18:27:50
Habría que ver cómo vienen los datos en el string. Suponiendo que vienen contiguos y en el mismo orden que TGENERAL_CFG, es posible que puedas usar el procedimiento Move (http://www.delphibasics.co.uk/RTL.asp?Name=move).

// Saludos

jars
25-02-2019, 19:14:07
Acabo de ver que el archivo es binario y el servicio me lo devuelve como string, el problema que veo es que los valores a los valores les pone comillas simples y los NULL vienen con #0. P.ej. '10'#0#0#0'6'#0#0'&,'#0#0#0#0#0#0#0#0#0
Con este formato es imposible hacer un move. Existe alguna forma de conversión?
El servicio no se puede modificar.