Comparar un registro de un edit con un registro de una tabla en una consulta

[Damian666]

Hola ContraVeneno te cuentro que utilize tu lógica y me sirvió de mucho y cambie algunos detalles:

If (CUENTA1.TEXT<>'')OR(CUENTA2.TEXT<>'')THEN
with FDM.QCC do
begin
If active then close;
SQL.Clear;
SQL.Add('SELECT *');
SQL.Add('FROM CCCLIENTES ');
SQL.Add('WHERE ((PERIODO=01)OR(PERIODO=02)OR(PERIODO=03)OR(PERIODO=04)OR');
SQL.Add('(PERIODO=05)OR(PERIODO=06)OR(PERIODO=07)OR (PERIODO=08)OR');
SQL.Add('(PERIODO=09)OR(PERIODO=10)OR(PERIODO=11)OR(PERIODO=12))');
SQL.Add('AND (GESTION='+(GEST.Text)+')');
SQL.Add('AND (CUENTA='+(CUENTA1.Text)+')');
Open;
NAME1.Text:=FIELDBYNAME('NOMBRE').AsString;
CLOSE;
end;exit;


with FDM.QCC do
begin
If active then close;
SQL.Clear;
SQL.Add('SELECT *');
SQL.Add('FROM CCCLIENTES ');
SQL.Add('WHERE ((PERIODO=01)OR(PERIODO=02)OR(PERIODO=03)OR(PERIODO=04)OR');
SQL.Add('(PERIODO=05)OR(PERIODO=06)OR(PERIODO=07)OR (PERIODO=08)OR');
SQL.Add('(PERIODO=09)OR(PERIODO=10)OR(PERIODO=11)OR(PERIODO=12))');
SQL.Add('AND (GESTION='+(GEST.Text)+')');
SQL.Add('AND (CUENTA='+(CUENTA2.Text)+')');
Open;
NAME2.Text:=FIELDBYNAME('NOMBRE').AsString;
CLOSE;
end;exit;

Ahora la duda que tengo es como utilizar este código si quiero hacer dos consultas en un mismo FORM, ya intente de todo pero como no domino SQL me sale error, aunque delphi compila bien