FDQuery.SQL.Add() da error

[tomasgarcia]

He comprobado que ambas sentencias funcionan del mismo modo, cargan en el grid
la tabla entera.

Código Delphi [-]
procedure TConsClients.FormShow(Sender: TObject);
    begin
   editbuscar.SetFocus;
   FDQuery1.Active:=False;
   //FDQuery1.SQL.Text := 'SELECT * FROM clients;';
   FDQuery1.SQL.Add('SELECT * FROM  clients ; '  )  ;
   FDQuery1.Active:=True;
   combobox1.Clear;
   FDQuery1.Fields.GetFieldNames(Combobox1.Items)   ;
   combobox1.ItemIndex:=1;
  end;

Sin embargo, si en cualquiera de ella intento seleccionar uno o varios campos de la tabla,
deja de funcionar.

Código Delphi [-]
procedure TConsClients.FormShow(Sender: TObject);

    begin
   editbuscar.SetFocus;
   FDQuery1.Active:=False;
   //FDQuery1.SQL.Text := 'SELECT * FROM clients;';
   FDQuery1.SQL.Add('SELECT IDClient FROM  clients ; '  )  ;
   FDQuery1.Active:=True;
   combobox1.Clear;
   FDQuery1.Fields.GetFieldNames(Combobox1.Items)   ;
   combobox1.ItemIndex:=1;
  end

;