Hello Med. Yes, my ball shows it.
Like said in previous post, I have to learn that RTTI stuffs more. But, what about to use something like this: procedure infotiersfo.onsetValue(const sender: TObject; var avalue: Integer; var accept: Boolean); begin if sender is tdbintegeredit then showMessage(tdbintegeredit(sender).datalink.datasource.dataset.name) else if ...; -- Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/ _______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk