buenas tardes compañeros estoy utilizando esta funcion para formar fechas que extraigo de mi bd, todo funciona bien hasta que en ocasiones llega el mes numero 11 y al parecer la comparacion truena.
el valor de las variables son:
a m d tipo word
2012 1 1
ano mes d tipo ano, mes vienen de la base de datos son varchar; d word
2011 09 1
2011 10 1
2011 11 1
Código Delphi
[-]
i3:=0;
seleccion3:=0;
seleccion3:=Qry_cuotas.RecordCount;
Qry_cuotas.First;
while i3 < seleccion3 do
begin
if encodedate(StrToInt(Qry_cuotas.fieldbyname('ano').Value), StrToInt(Qry_cuotas.fieldbyname('mes').Value), dia)<=encodedate(a, m, dia) then <---
begin
este es el error que me marca
---------------------------
Proposunidpr
---------------------------
Access violation at address 40002540 in module 'rtl70.bpl'. Write of address 000000E3.
---------------------------
Aceptar
---------------------------
alguna idea de que esl o que pueda estar pasando??, gracias pr cualquier comentario