Código Delphi [-] function ObtenerCadena(const Cadena: string; x:cardinal): string;
function ObtenerCadena(const Cadena: string; x:cardinal): string;