简单范例 (ActiveQt)

简单范例演示使用 QAxBindable::requestPropertyChange () 和 QAxBindable::propertyChanged (), and the use of the default QAxFactory 透过 QAXFACTORY_DEFAULT() 宏。

此范例中的 ActiveX 控件布置为 QWidget 采用 QSlider ， QLCDNumber 和 QLineEdit 。它提供信号/槽/特性接口以更改滑块和行编辑的值，并获得任何特性改变的通知。

此范例是 ActiveX 的 Qt 实现

class QSimpleAX : public QWidget, public QAxBindable
{
    Q_OBJECT
    Q_PROPERTY( QString text READ text WRITE setText )
    Q_PROPERTY( int value READ value WRITE setValue )
public:
    QSimpleAX(QWidget *parent = 0)
    : QWidget(parent)
    {
        QVBoxLayout *vbox = new QVBoxLayout( this );
        slider = new QSlider( Qt::Horizontal, this );
        LCD = new QLCDNumber( 3, this );
        edit = new QLineEdit( this );
        connect( slider, SIGNAL(valueChanged(int)), this, SLOT(setValue(int)) );
        connect( edit, SIGNAL(textChanged(QString)), this, SLOT(setText(QString)) );
        vbox->addWidget( slider );
        vbox->addWidget( LCD );
        vbox->addWidget( edit );
    }
    QString text() const
    {
        return edit->text();
    }
    int value() const
    {
        return slider->value();
    }
signals:
    void someSignal();
    void valueChanged(int);
    void textChanged(const QString&);
public slots:
    void setText( const QString &string )
    {
        if ( !requestPropertyChange( "text" ) )
            return;
        edit->blockSignals( true );
        edit->setText( string );
        edit->blockSignals( false );
        emit someSignal();
        emit textChanged( string );
        propertyChanged( "text" );
    }
    void about()
    {
        QMessageBox::information( this, "About QSimpleAX", "This is a Qt widget, and this slot has been\n"
                                                          "called through ActiveX/OLE automation!" );
    }
    void setValue( int i )
    {
        if ( !requestPropertyChange( "value" ) )
            return;
        slider->blockSignals( true );
        slider->setValue( i );
        slider->blockSignals( false );
        LCD->display( i );
        emit valueChanged( i );
        propertyChanged( "value" );
    }
private:
    QSlider *slider;
    QLCDNumber *LCD;
    QLineEdit *edit;
};
					

控件的导出是使用默认 QAxFactory

QAXFACTORY_DEFAULT(QSimpleAX,
           "{DF16845C-92CD-4AAB-A982-EB9840E74669}",
           "{616F620B-91C5-4410-A74E-6B81C76FFFE0}",
           "{E1816BBA-BF5D-4A31-9855-D6BA432055FF}",
           "{EC08F8FC-2754-47AB-8EFE-56A54057F34E}",
           "{A095BA0C-224F-4933-A458-2DD7F6B85D8F}")
					

要构建范例必须先构建 QAxServer 库。然后运行 qmake 和 make 工具在 examples/activeqt/simple .

The demonstration 要求 WebBrowser 支持 ActiveX 控件，并启用脚本。

简单 ActiveX 控件的嵌入是使用 <object> 标签。

<object ID="QSimpleAX" CLASSID="CLSID:DF16845C-92CD-4AAB-A982-EB9840E74669"
CODEBASE="http://qt.nokia.com/demos/simpleax.cab">
    <PARAM NAME="text" VALUE="A simple control" />
    <PARAM NAME="value" VALUE="1" />
[Object not available! Did you forget to build and register the server?]
</object>
					

简单 HTML 按钮是连接到 ActiveQt 的 about() 槽。

<FORM>
    <INPUT TYPE="BUTTON" VALUE="About..." onClick="QSimpleAX.about()" />
</FORM>
					

第 2 ActiveX 控件 - 标准日历控件 - 是实例化

<object ID="Calendar" CLASSID="CLSID:8E27C92B-1264-101C-8A2F-040224009C02">
[Standard Calendar control not available!]
    <PARAM NAME="day" VALUE="1" />
</object>
					

来自 ActiveX 控件的事件的处理是使用 Visual Basic 脚本和 JavaScript 两者。

<SCRIPT LANGUAGE="VBScript">
Sub Calendar_Click()
    MsgBox( "Calendar Clicked!" )
End Sub
Sub QSimpleAX_TextChanged( str )
    document.title = str
End Sub
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
function QSimpleAX::ValueChanged( Newvalue )
{
    Calendar.Day = Newvalue;
}
</SCRIPT>
					

文件：

• activeqt/simple/main.cpp
• activeqt/simple/simple.pro