Insertar digito 9 pocision 3

[luisito2011]

mm.. si ... toncej se supone que deveria quedar ai
pero me sale error

Código Delphi [-]
 
var
  a: CNumeroNatural;
  x:integer;
begin
a:=cnumeronatural.Crear;
WriteLn('Digite Un Numero'); Readln(x);
A.AsignarValor(x);
WriteLn('Nuevo Numero ',a.InsertarDigito(3,9));
readln;

Creo que es.. la forma como llamo.. aver si me corrigen
saludos