Convertir PSafeArray a String

[LoPiTaL]

SetLength(s, SizeOf(a));
Move(a, s[1], SizeOf(a));

Hola, roman. ¿Realmente funcionaría este código? Si alguno de los campos en a tiene como valor $00 (caracter final de string), entonces no podrías recuperar lo que vaya después, perdiendo parte de la estructura...

Yo usaría las funciones que proporciona Delphi, creo que eran BinToHex y HexToBin, que convierte un buffer en un string con caracteres hexadecimales y viceversa.

Un saludo,
LoPiTaL