Separar cadena de numeros
 

Quisiera saber como separar una cadena de numeros

ej. tengo un numero entero 125763

este valor quisiera separarlo de modo que se puedan utilizar cada digito por separado para asi
convertirlos a letras en un reporte.

quisiera que el resultado sea

uno dos cinco siete seis tres

si alguien me puede ayudar lo agradeceria enormemente. Saludos!

Uso ReportBuilder y Firebird...

¡Qué cosa más rara! Pero si he entendido bien, esta función te puede servir:

Código Delphi [-]
function NumeroADigitos(N:Integer): String;
const
  Digitos: array[0..9] of String = (
    'cero', 'uno', 'dos', 'tres', 'cuatro',
    'cinco', 'seis', 'siete', 'ocho','nueve'
  );

var
  S: String;
  D, I: Integer;

begin
  S := IntToStr(N);
  for I := 1 to Length(S) do
  begin
    D := StrToInt(S[i]);
    Result := Result + Digitos[D] + ' ';
  end;

  Result := Trim(Result);
end;

// Saludos