Ver Mensaje Individual
  #6  
Antiguo 04-05-2011
arrayman arrayman is offline
Miembro
 
Registrado: abr 2006
Posts: 55
Reputación: 19
arrayman Va por buen camino
otro pasito

buenas sigo dandole vueltas a la norma 19, y bueno revisando el codigo
tambien asigne 19 a la propiedad publica _norma_ ya que me da la impresion de que si no es así no va a funcionar.
como dije no instale el componente si no que uso los ficheros
asi que mi contructor luce así.
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  CVBNorma19CSB1 := TCVBNorma19CSB.Create(self);
  CVBNorma19CSB1.Euros := True;
  CVBNorma19CSB1.NomFichero := '_CSB19.TXT';
  CVBNorma19CSB1.Procedimiento := prPrimero;//prSegundo;
  CVBNorma19CSB1.Depura := True;
  CVBNorma19CSB1._NORMA_ := 19;  //<= AQUI EL CAMBIO.

  CVBNorma34CSB1 := TCVBNorma34CSB.Create(self);
end;

tambien descarge el ejemplo que casimiro dejó en este
enlace http://www.clubdelphi.com/foros/atta...5&d=1203594925

se trata de un zip que contiene un fichero de texto que imagino generó el mismo con el componente que creo que tambien aporto el propio casimiro

llama la atencion que los digitos 3y4 tienen el valor 70 en todos los registros, asi que revise el codigo y al parecer se trata de la norma 58.

si considerais que se debe y se puede corregir, igual le va bien a alguien.

un saludo.
Responder Con Cita