[Yensis22]

tengo este codigo pero no me hace nada y probe como me digiste pero haci me lo deja en blanco todo el dbgril

procedure Tconombreyapellidos.Button2Click(Sender: TObject);
begin
close;
end;
procedure Tconombreyapellidos.Button1Click(Sender: TObject);
begin
adoquery1.active:=false;
adoquery1.sql.clear;
AdoQuery1.sql.text:= 'Select nom_cliente from clientes';
adoquery1.sql.add ('SELECT clientes');
adoquery1.active:=true;
end;
end.