Konovalov, Vadim (Vadim)** CTR ** wrote:
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.
Hmmm, I haven't run across this before. From tracing thru the code, I
don't think that is the way perl/tk creates megawidgets. Maybe this is
an alternate way of creating megawidgets that isn't documented.
-John