frmserverbrowser.cs

OPC CLIENT开发包

internal partial class frmServerBrowser : System.Windows.Forms.Form
{
	public string ServerName;
	public string ServerClassID;

	public int Version;
	public int gServerID;
    YFOPCSDK.AddLandHostIPProxy pAddhostip = new YFOPCSDK.AddLandHostIPProxy(Module1.AddLandHostIP);
    YFOPCSDK.AddOPCnameProxy myAddOPCname = new YFOPCSDK.AddOPCnameProxy(Module1.AddOPCname);
	private void CancelButton_Renamed_Click(object eventSender, System.EventArgs eventArgs)
	{
		this.Close();
	}

	private void cbHost_SelectedIndexChanged(object eventSender, System.EventArgs eventArgs)
	{
		cmdFind_Click(cmdFind, new System.EventArgs());
	}

    private void GetOPCServer(string host)
    {
        object prgID = new object[0];
        object clsID = new object[0];

        YFOPCSDK.OPC_GetServers(host, ckVer1.Checked ? 1 : (ckVer2.Checked ? 2 : 3), ref prgID, ref clsID);
        object[] ss = (object[])prgID;
        object[] cs = (object[])clsID;
        listServer.Items.Clear();
        gServerID = 0;
        if (null == ss)
            return;
        for (int i = 0; i < ss.Length ; i++)
        {
            listServer.Items.Add(ss[i].ToString());
            Module1.ServerItems[gServerID].ServerName = ss[i].ToString();
            Module1.ServerItems[gServerID].ServerClassID = cs[i].ToString();
            gServerID ++;
        }
    }

    private void cmdFind_Click(object eventSender, System.EventArgs eventArgs)
	{
        //bool B;
        //listServer.Items.Clear();
        //ComputerName = cbHost.Text;
        //txtServerName.Text = "";
        //txtServerClassID.Text = "";
        //gServerID = 0;
        //B = YFOPCSDK.EnumOPCNameA(cbHost.Text, ckVer1.Checked?1:(ckVer2.Checked?2:3), myAddOPCname);
        GetOPCServer(cbHost.Text);
	}

	private void frmServerBrowser_Load(object eventSender, System.EventArgs eventArgs)
	{
		Version = 2;
		txtComputer.Text = "";
		txtServerName.Text = "";
		txtServerClassID.Text = "";
        YFOPCSDK.EnumLanHostIPA(pAddhostip);
	}

	private void listServer_SelectedIndexChanged(object eventSender, System.EventArgs eventArgs)
	{
		if (listServer.SelectedIndex == -1) return; // TODO: might not be correct. Was : Exit Sub

        txtServerName.Text = Module1.ServerItems[listServer.SelectedIndex].ServerName;
        txtServerClassID.Text = Module1.ServerItems[listServer.SelectedIndex].ServerClassID;
		ServerName = txtServerName.Text;
		ServerClassID = txtServerClassID.Text;
	}

	private void OKButton_Click(object eventSender, System.EventArgs eventArgs)
	{
        this.DialogResult = System.Windows.Forms.DialogResult.OK ;
		this.Close();
	}

    [System.Diagnostics.DebuggerNonUserCode()]
    public frmServerBrowser()
        : base()
    {
        InitializeComponent();
    }
}