Hi, > I don't think perl/tk uses Tix for megawidgets. It uses its > own perl delegation mechanism to achieve mega-widgets.
In the perl/Tk source distribution there is a file \Tk-804.027\pTk\mTk\tixGeneric\tixWidget.c which contains /* * tixWidget.c -- * * Constructs Tix-based compound widgets * moreover in ...\Tk-804.027\Compound\Compound.xs we read ... #include "pTk/tixPort.h" #include "pTk/tixInt.h" #include "tkGlue.h" #include "tkGlue.m" #include "pTk/tkVMacro.h" DECLARE_VTABLES; DECLARE_TIX; extern Tk_ImageType tixCompoundImageType; ... and megawidget constructing methods resemble those in pure Tix - if you'll read the Tix manual, you'll see all the "ConstructXXXX" methods there... I am not expert in perl/Tk pure-perl widgets: I created one megawidget only once, became allergic and never returned to it, so I could miss the details. Actually about 2 years ago I tried to mimic perl/Tk megawidgets with Tcl::Tk+Tix, and some pure-perl megawidgets started to work, but then I quickly lost interest in this, because I was distracted by ordinary Tcl::Tk programming. > I have implemented pure-perl mega widgets using the same > mechanism that perl/tk uses, primarily for compatibility with > existing perl/tk megawidgets. If you achieved this w/out tix - well, that's a win! :) > I will tar up the pacakge with the changed files, make up a > README file and send it out. That's wonderful! Thank you a lot for your efforts! Best regards, Vadim.