1 files changed, 25 insertions, 1 deletions
diff --git a/qtinterface/tqobject.cpp b/qtinterface/tqobject.cpp
index 657cfd0..8fb45d9 100644
--- a/qtinterface/tqobject.cpp
+++ b/qtinterface/tqobject.cpp
@@ -20,4 +20,28 @@ Boston, MA 02110-1301, USA.
 */
 
 #include <tqt.h>
-#include <tqobject.h>
-\ No newline at end of file
+#include <tqobject.h>
+
+#ifdef USE_QT4
+
+static const QObjectList *objectTrees() {
+	QWidgetList widgetlist;
+	QObjectList *objectlist = new QObjectList;
+	widgetlist = QApplication::allWidgets();
+	//widgetlist = QApplication::topLevelWidgets();
+
+	objectlist->clear();
+	foreach (QWidget *curwidget, widgetlist) {
+		objectlist->append((QObject*)curwidget);
+	}
+
+	return objectlist;
+}
+
+const QObjectList *QObject::ptrchildren() const {
+	QObjectList ql;
+	ql = this->children();
+	return &ql;
+}
+
+#endif
+\ No newline at end of file