Ok. I use a dbgroup object ( I uploaded some time ago : https://gitlab.com/mseide-msegui/mseuniverse/tree/master/samples/db/dbgroup )
Is it compatible with the procedure :focusedwidgetchangedev? Med Ps: tdoublegridpagefo.enterev is not usefull for me.BbaseEditfo is not aware of that change. ________________________________ De : Martin Schreiber <mse00...@gmail.com> Envoyé : samedi 20 octobre 2018 13:35 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] Variable scoping; On Saturday 20 October 2018 11:34:36 mohamed hamza wrote: > If you have many different "two grid pages" make a common > ancestor which inherits from tbaseeditpagefo. > > It's Ok but the dbnav in baseform will not be aware of the change? > The common ancestor with the two grids has the code " procedure tdoublegridpagefo.enterev(const sender: TObject); begin editfo.dataso.dataset:= tdbwidgetgrid(sender).datalink.datasource.dataset; end; " Probably the simplest solution for your case is the already showed use of igriddatalink and idbeditfieldlink in onfocusedwidgetchanged event of tbaseeditfo: " procedure tbaseeditfo.focusedwidgetchangedev(const oldwidget: twidget; const newwidget: twidget); var intf1: idbeditfieldlink; intf2: igriddatalink; begin if (newwidget <> nil) then begin if newwidget.getinterface(idbeditfieldlink,intf1) then begin dataso.dataset:= intf1.getfieldlink().dataset; end else begin if newwidget.getinterface(igriddatalink,intf2) then begin dataso.dataset:= intf2.getdatalink().dataset; end; end; end; end; " Martin _______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
_______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk