Ver Mensaje Individual
  #11  
Antiguo 26-03-2008
gdlrinfo gdlrinfo is offline
Miembro
 
Registrado: may 2007
Posts: 131
Reputación: 20
gdlrinfo Va por buen camino
Smile Hola amigo

Como estas te cuento el problema es otro ahora agrege el dateutils te pongo el codigo mas abajo el tema es asi cuando uso el combo box no me muestra nada en el dbgrid nose que estoy haciendo mal pero se queda en blanco.
Código Delphi [-]
procedure TLegajo.ComboBox1Change(Sender: TObject);
var
   FechaIni, FechaFin: TDate;
   nmes, nayo : Word;
begin
   nMes := combobox1.itemindex + 1;
   nayo:=2008;
   FechaIni := EncodeDate(nAyo, nMes, 1);
   FechaIni := EncodeDate(nAyo, nMes, DaysInMonth(nMes));
   Table1.Filtered := False;
   Table1.Filter := '(Fecha >= ' + DatetoStr(FechaIni) + ') and (Fecha <= ' + DatetoStr(FechaIni) + ')';
   Table1.Filtered := True;
end;
end.

POr otro lado una duda que no tiene nada que ver yo cuando hacia que el programa corriera paso a paso antiguamente ponia el cursor del mouse sobre la variable y me mostraba el valor que contenia ahora no lo miuestra alguna idea de esto tambien cabe destacar que uso el delphi 10 lite gracias y espero su respuesta!! saludos!!

Última edición por gdlrinfo fecha: 26-03-2008 a las 01:54:22.
Responder Con Cita