Código Delphi [-]DBGrid.Visible := (Dataset.RecordCount > 0)
DBGrid.Visible := (Dataset.RecordCount > 0)