Código Delphi [-]ShowMessage(TDBGrid(FindComponent('DBGrid1')).Owner.Name);
ShowMessage(TDBGrid(FindComponent('DBGrid1')).Owner.Name);