Ver Mensaje Individual
  #1  
Antiguo 06-06-2007
mgaytan mgaytan is offline
Miembro
 
Registrado: jun 2007
Posts: 18
Reputación: 0
mgaytan Va por buen camino
Miguel Gaytan

Buenas chavos ....
estoy empezando a conocer este foro y me parece muy bueno.
Tengo muchas dudas acerca de Delphi.
Una de ellas es que tengo una tabla en paradox, quiero hacer un reporte donde el usuario ingrese fecha inicial y fecha final desde in DataTimePicker.
y desplace los recors que esten entre esas fechas.
begin
Table1.Edit;
dx:=Table1.Recordcount;
Table1.First;
r:=StrToInt(Edit3.Text);
for dz:=1 to dx do
begin
if ((DateTimePicker1.Date<=Table1.Fieldbyname('FECHA').asstring)and (DateTimePicker2.Text>=Table1.Fieldbynam('FECHA').asstring) Then
begin
Table2.Insert;
Table2.Fieldbyname('FECHA').asstring:=Table1.Fieldbyname('FECHA').asstring;

esto funciona pero solamente compara los promeros digitos de la fecha 00/00/0000 el resto lo omite.

espero sus sugerencias gracias

Última edición por mgaytan fecha: 06-06-2007 a las 00:33:01.