It's Ok, But sometime ago I opened a thread about hotzone in db widget, for example we could not activate grids when we click on caption or scrollbars . You solved that. Now I notice that your solution does not work when the container is a subform?
Med.
Ps: See Attn example.
________________________________
De : Martin Schreiber <mse00...@gmail.com>
Envoyé : samedi 20 octobre 2018 16:18
À : mseide-msegui-talk@lists.sourceforge.net
Objet : Re: [MSEide-MSEgui-talk] Variable scoping;
On Saturday 20 October 2018 17:54:36 mohamed hamza wrote:
> But I am in EditPageNform (baseEditPageForm) ?
> Do I have to include baseeditForm in uses of baseEditPageForm?
>
Yes, not necessarily in baseeditpageform but in the form where the code
"
tbaseeditfo(window.owner).dataso.dataset:=
tdb*grid(sender).datalink.datasource.dataset;
"
is located.
Or use the method with tbaseeditfo.onfocusedwidgetchanged, probably the
simplest. Will TDBgroup be focused? If so use
"
procedure tbaseeditfo.focusedwidgetchangedev(const oldwidget: twidget;
const newwidget: twidget);
var
intf1: idbeditfieldlink;
intf2: igriddatalink;
daso1: tdatasource;
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
else begin
if newwidget is tdbgroupbox then begin
daso1:= tdbgroupbox(newwidget).datasource;
if daso1 <> nil then begin
dataso.dataset:= daso1.dataset;
end;
end;
end;
end;
end;
end;
"
(not tested!).
Martin
_______________________________________________
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
newn.tar.gz
Description: newn.tar.gz
_______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
