Hola, no sé si te he entendido bien, pero creo que lo que quieres hacer es crear una consulta según algunos valores.
Si es esto, es bastanta fácil (esto lo puedes poner en la pulsación de un botón):
Código SQL
[-]
Query1.Close;
WITH Query1.SQL do
begin
Clear;
Add('SELECT *');
Add('FROM DIARIOS');
Add('WHERE CentroCosto=:CentroCosto);
Add('AND Cuenta=:Cuenta');
Add('AND Fecha>=:Fecha');
end;
Query1.ParamByName('CentroCosto').AsString := dbLookComboBox1.KeyValue;
Query1.ParamByName('Cuenta').AsString := dbLookComboBox2.KeyValue;
Query1.ParamByName('Fecha').AsDate := StrToDate(Edit1.Text);
Query1.Open;
Esto te funcionará igual que una consulta construida en tiempo de diseño, pero con los valores que el usuario elija.
Espero haberte ayudado.
Saludos.