Código Delphi [-]function GetIdeSerialNumber : SerialNumber; //cambia por function GetIdeSerialNumber : String;
function GetIdeSerialNumber : SerialNumber; //cambia por function GetIdeSerialNumber : String;