在线免费观看成年人视频-在线免费观看国产-在线免费观看国产精品-在线免费观看黄网站-在线免费观看精品

    1． 開發.NET控件的示例程序

    WinCC V7.0支持的自定義.NET控件，需要使用Visual Studio 2005編寫。下面以C#編程語言為例，開發一個簡單的.NET控件，這個控件僅提供一個方法Add, 實現兩數相加的功能。

    在VS2005中新建一個工程CalculateControl，工程類型為 Visual C# 中的Windows Control Library，在 Solution Explorer 窗口中，將UserControl1.cs重命名為 Calculate.cs，彈出的對話框詢問是否改變所有與UserControl1相關的代碼，點擊[Yes]確認。在Calculate.cs 文件的Calculate類中添加Add函數，用于計算兩數之和，如下所示：

public double Add(double dblA, double dblB)

{

return ( dblA + dblB );

}

在 Calculate.cs 文件的Calculate類之前插入如下代碼：

// CalculateControl.Calculate 是該控件的PROGID.

[ProgId("CalculateControl.Calculate")]

// 缺省的是ClassInterfaceType.AutoDispatch，該方式下只生成dispatch接口，

// 只能被使用script、VB等late bingding方式的COM客戶使用。

[ClassInterface(ClassInterfaceType.AutoDual)]

然后在 Calculate.cs 文件的上部插入如下代碼：

using System.Runtime.InteropServices;

    將工具欄中的 Solution Configurations 下拉列表設為 Release，在工程屬性的 Application 頁中，點擊 [Assembly Information…] 按鈕，選中 Make assembly COM-Visible，并點擊 [OK] 按鈕確認。在 Build 頁中，選中 Register for COM interop 后，保存設置，并編譯程序，這樣編譯后同時會生成CalculateControl.tlb文件，并且自動將其注冊（命令行命令regasm有同樣的效果），注意到CalculateControl.dll生成到 binRelease 文件夾中。

    2．開發.NET控件的安裝程序

    如果該控件需要在另一臺計算機上使用，需要為該控件設計安裝程序。新建一個VS2005工程SetupCalculateControl，工程類型為Setup and Deployment  Setup Project。在Solution Explorer窗口中的工程名（SetupCalculateControl）節點上右鍵單擊，在彈出的快捷菜單中選擇AddAssembly…項，在Browse頁中，找到剛才編譯的CalculateControl.dll，將其加入到安裝程序中，注意到CalculateControl.tlb 也一并被加入進來。選中CalculateControl.dll節點，將其屬性中的Register從vsdraDoNotRegister改為vsdraCOM，用于在安裝過程中自動注冊控件。將工具欄中的 Solution Configurations 下拉列表設為 Release，編譯該安裝工程，在Release 文件夾中可以找到生成的安裝文件（包括setup.exe和SetupCalculatorControl.msi）。

    3． 測試.NET控件

    使用ActiveX Control Test Container測試該控件的功能，雙擊tstcon32.exe（位于$Program FilesMicrosoft Visual Studio 8Common7Tools），在Edit菜單中選擇 [Insert New Control…] ，在彈出的 Insert Control 對話框中，點擊 [Implemented Categories…] 按鈕，選中 .NET Category 復選框，點擊 [OK] 按鈕確認。在列表框中選擇 CalculateControl.Calculate，如圖1所示：

圖 1：在ActiveX Control Test Container中插入控件

    點擊 [OK] 按鈕確認，這時該.NET控件被加入到測試容器中。選中該控件，在Control菜單中選擇[Invoke Methods…]項，在Method Name中選擇Add(Method)，分別設定兩個加數的值，點擊 [Invoke] 按鈕，在 Return Value 文本框中可以看到兩數相加的結果。

    4． 在WinCC V7.0中加載和使用該控件的步驟

    1．雙擊該控件的安裝文件Setup.exe，安裝并注冊CalculateControl.dll控件，用戶可以修改安裝目錄，并按照正常的步驟安裝（如果想卸載該控件，可以在控制面板的添加/刪除程序中移除該控件）。

    2．新建一個WinCC V7.0工程，并新建一個畫面。按照如下步驟加載和使用該控件：

    在Object Palette（對象面板）的Controls頁中的.NET Control上右鍵單擊，選擇 [Add/Remove…] 快捷菜單項。

    在彈出的對話框中點擊[Add…]按鈕，在打開的對話框中找到安裝路徑下的CalculateControl.dll控件（例如：C:Program FilesDefault Company NameSetupCalculateControl CalculateControl.dll），雙擊該控件或者選中它并按[Open]按鈕。

圖 2：在selec .NET Object對話框中插入自定義.NET控件

    如圖2所示，在Available Controls列表中高亮顯示Calculate項，選中它前面的Check Box，點擊最下面的[OK]按鈕，即可將控件加入到WinCC V7.0中。

    將.NET Control節點展開，找到” CalculateControl.Calculate”并將其拖拽到窗體上的合適的位置。

    在窗體上加入一個靜態文本控件，將其對象名稱改為 CalculateResult。

    在窗體上加入一個按鈕，將其文本改為Add，在按鈕的鼠標左鍵單擊（ButtonMousePress left）事件中加入VBS腳本，創建.NET控件并調用它的Add方法，源程序如下所示：

Dim objCalculateControl

Dim objCalculateResult

Set objCalculateControl = CreateObject("CalculateControl.Calculate")

Set objCalculateResult = ScreenItems("CalculateResult")

objCalculateResult.Text = objCalculateControl.Add ( 6, 12 )

    注意，WinCC V6.2使用ScreenItems(”控件對象名”)引用加入窗體的ActiveX控件。但WinCC V7.0不能使用這種方法，建議使用CreateObject(“.NET控件的PROGID”) 來創建和引用加入的.NET控件。

    保存并運行該程序，點擊[Add]按鈕，靜態文本中將顯示結果18。

    注意：本文提供了 WinCC V7.0 支持.NET控件的基本編程方法和測試程序，所有的源程序及測試過程僅供參考。