Filtrar una tabla con 2 rangos

[pfsoft]

Vayamos por partes:


"Cuando el usuario da click en el boton se carga la unidad 2 y me dice que no encuentra la variable fecha1 que es la fechainicial, lo que sè es que para que se pasen las variables de una unidad a otra se tiene que declarar la unidad en


Código Delphi [-]
implementation
uses Unit2;l"

Esto no es para que una variables de Unit1 se pueda utilizar en Unit2. Es para poder acceder a Unit2 desde Unit1, esto es, poder llamar al formulario de Unit2, poder llamar a alguna función o procedimiento de Unit2 desde Unit2.

Por otra parte el error que te da de fecha1 variable no encontrada es debido a que cuando pones ' ..... >= fecha1' la sentencia SQL interpreta está comparando la parte izquierda con una supuesta variables fecha1, cuando lo que tendrías que poner sería '.....>='+fecha1

Y para pasar el valor de fecha1 y fecha2 a Unit2, una opción es declarar fecha1 y fecha2 en el public de la interface seccion del type del Form en Unit2, NO en Unit1.

P.E.

En Unit1 pondrías

Application.CreateForm(frmForm2, TForm2);
with frmForm2 do
try
fecha1 := edFecha1.text;
fecha2 := edFecha2.text;
ShowModal;
finally;
Free;
end;

No se si me he explicado con claridad. Dame un toque si te puedo ayudar.

Atte.

Pedro J.Fdez.
[email protected]
[email protected]