On Monday 21 December 2015 17:30:49 Fred van Stappen wrote: > > Please use sender.getassistivehint() instead. The interface > > iassistiveclient ("sender") should provide all you need. > > => if (Sender is ttoolbar) then > Result := 'tool bar, ' + Sender.getassistivehint() > > => error => sak_mse.pas(535,39) Error: identifier idents no member > "getassistivehint" _____________________________________________ > That works in assistivemonitor: " procedure tmainfo.showvalues(const sender: iassistiveclient); var dataintf: iifidatalink; valueprop: ppropinfo; flags: assistiveflagsty; rea1: real; begin flags:= sender.getassistiveflags(); assistivename.value:= sender.getassistivename(); assistivecaption.value:= sender.getassistivecaption(); assistivetext.value:= sender.getassistivetext(); assistivehint.value:= sender.getassistivehint(); assistivecaretindex.value:= sender.getassistivecaretindex(); ... procedure tassistivemonitor.doitementer(const sender: iassistiveclient; const items: shapeinfoarty; const aindex: integer); begin mainfo.showvalues(sender); track('<doitementer shape>',sender,inttostrmse(aindex)); end; " Please show more code.
Martin ------------------------------------------------------------------------------ _______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk