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.
pedrofdez@ono.com
pfsoftware@ono.com