Hola
No veo ningun error de sintaxis, puede ser que que campo no sea como lo planteas.
Prueba asi:
Código Delphi
[-]
FormGrupos.ADOQuery1.SQL.Text:= 'Select Cod_G TGrupos From TGrupos Where Cod_G = :Cod';
FormGrupos.ADOQuery1.Parameters.Parambyname('Cod').Value:= Edit2.Text;
Saludos