Hola de nuevo.
Se me pasó por alto que quizá estés trabajando con TQuery.
En ese caso sería:
Código Delphi
[-]
const
MASTDET_OFF = 'SELECT * FROM DETALLE';
MASTDET_ON = 'SELECT * FROM DETALLE WHERE "DETALLE"."MASTER_FIELD" = :"MASTER_FIELD"';
procedure TForm.FormCreate(Sender: TObject);
begin
with QryMaestro do
begin
SQL.Text:= 'SELECT * FROM MAESTRO';
Open;
SQL.Text:= MASTDET_OFF;
Open;
end;
end;
procedure TForm.DBLookupComboBoxCloseUp(Sender: TObject);
begin
with QryDetalle do
begin
SQL.Text:= MASTDET_OFF;
Open;
end;
end;
procedure TForm.DBLookupComboBoxDropDown(Sender: TObject);
begin
with QryDetalle do
begin
SQL.Text:= MASTDET_ON;
Open;
end;
end;
Nota:
.- Relacioná la propiedad: QryDetalle.DataSource con el TDataSource asociado al QryMaestro. (QryDetalle.DataSource -> dsMaestro)
.-
MASTER_FIELD sería el nombre del campo por el que estableces la relación.
Saludos.