Messages

1

Support Questions / C# - EthernetIPforCLXComm.BeginWrite Cycles

« on: May 29, 2018, 09:30:18 PM »

How does Write vs BeginWrite compare in regards to performance (Write cycles to plc) when writing to a PLC internally? Or does BeginWrite just use Write as well?

The reason I ask is because I want to consolidate a bunch of Write commands into a single PLC cycle.

2

Support Questions / Re: Handle onChange of button state

« on: June 29, 2017, 11:29:34 PM »

Sorry for the confusion, I haven't used vb in a while.

The update should update another application interfacing with the HMI to request new information for display. The PLC can update the state of the button (highlight) and so can the user. I can easily handle the button .click from the user but not when it is updated by the PLC.

The button is a AdvancedHMIControls.BasicButton and several of them are used.

I want to update only when the highlight changes for the button (ie button on and off).

There isn't other way I can think off other than just handling the changing state.

3

Support Questions / Re: Handle onChange of button state

« on: June 28, 2017, 11:46:02 PM »

It should only monitor the changing state of several buttons on a single form.

Would handle .EnabledChanged work to achieve this? Then I could remove all mentions of .click and rely on the other handle instead.

Being able to monitor this is important as I want to update the form based on this button changing. But do not want to have to resort to a timer.

4

Support Questions / Handle onChange of button state

« on: June 28, 2017, 07:31:06 PM »

How can I generate an event for the AdvancedHMIControls when the state of the button changes? Not when the button is clicked but when it changes on the PLC side and updates. Without it triggering twice when the btn.Click handle is also used.

5

Support Questions / Re: Hide number field from keypad

« on: March 30, 2017, 09:48:55 PM »

I went ahead and made my own new keypad for pins since I couldn't fix that issue.

frmKeypad.vb

Code: [Select]

Public Class frmKeypad
    Private ValueTxt As String
    Public Value As Integer
    Public PasswordChar As Boolean
    Public MinValue As Integer
    Public MaxValue As Integer
    Public MaxDigits As Integer

    Private Sub frmKeypad_Load(sender As Object, e As EventArgs) Handles Me.Load
        Me.ValueTxt = ""
    End Sub

    ' Check if the value is within the range
    Private Sub validateValue()
        Dim Parse As Boolean = Integer.TryParse(Me.ValueTxt, Me.Value)
        If Parse = False Then
            Me.ValueTxt = ""
            Me.Value = 0
        End If
        If (MaxValue And Me.Value > MaxValue) Or (MaxDigits And Me.ValueTxt.Length > MaxDigits) Then
            If Me.ValueTxt.Length > 0 Then
                Me.ValueTxt = Me.ValueTxt.Trim().Remove(Me.ValueTxt.Length - 1)
            End If
        End If
        If MinValue And Me.Value < MinValue Then
            Me.ValueTxt = ""
            Me.Value = 0
        End If
    End Sub

    Private Sub redrawDisplay()
        If Me.PasswordChar Then
            Me.display.Text = ""
            If Me.ValueTxt.Length > 0 Then
                For i = 0 To Me.ValueTxt.Length - 1
                    Me.display.Text += "*"
                Next
            End If
        Else
            Me.display.Text = Me.ValueTxt
        End If
    End Sub

    Private Sub buttonClear_Click(sender As Object, e As EventArgs) Handles buttonClear.Click
        Me.ValueTxt = ""
        Me.redrawDisplay()
    End Sub

    Private Sub buttonQuit_Click(sender As Object, e As EventArgs) Handles buttonQuit.Click
        Me.DialogResult = DialogResult.Cancel
        Me.Close()
    End Sub

    Private Sub buttonEnter_Click(sender As Object, e As EventArgs) Handles buttonEnter.Click
        Me.DialogResult = DialogResult.OK
        Dim Parse As Boolean = Integer.TryParse(Me.ValueTxt, Me.Value)
        If Parse = False Then
            Me.Value = 0
        End If
        Me.Close()
    End Sub

    Private Sub buttonBackspace_Click(sender As Object, e As EventArgs) Handles buttonBackspace.Click
        If Me.ValueTxt.Length > 0 Then
            Me.ValueTxt = Me.ValueTxt.Trim().Remove(Me.ValueTxt.Length - 1)
        End If
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num1_Click(sender As Object, e As EventArgs) Handles num1.Click
        Me.ValueTxt += "1"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num2_Click(sender As Object, e As EventArgs) Handles num2.Click
        Me.ValueTxt += "2"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num3_Click(sender As Object, e As EventArgs) Handles num3.Click
        Me.ValueTxt += "3"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num4_Click(sender As Object, e As EventArgs) Handles num4.Click
        Me.ValueTxt += "4"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num5_Click(sender As Object, e As EventArgs) Handles num5.Click
        Me.ValueTxt += "5"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num6_Click(sender As Object, e As EventArgs) Handles num6.Click
        Me.ValueTxt += "6"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num7_Click(sender As Object, e As EventArgs) Handles num7.Click
        Me.ValueTxt += "7"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num8_Click(sender As Object, e As EventArgs) Handles num8.Click
        Me.ValueTxt += "8"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num9_Click(sender As Object, e As EventArgs) Handles num9.Click
        Me.ValueTxt += "9"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub

    Private Sub num0_Click(sender As Object, e As EventArgs) Handles num0.Click
        Me.ValueTxt += "0"
        Me.validateValue()
        Me.redrawDisplay()
    End Sub
End Class
frmKeypad.Designer.vb

Code: [Select]

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmKeypad
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer. 
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKeypad))
        Me.num1 = New System.Windows.Forms.Button()
        Me.num2 = New System.Windows.Forms.Button()
        Me.num3 = New System.Windows.Forms.Button()
        Me.num4 = New System.Windows.Forms.Button()
        Me.num5 = New System.Windows.Forms.Button()
        Me.num6 = New System.Windows.Forms.Button()
        Me.num7 = New System.Windows.Forms.Button()
        Me.num8 = New System.Windows.Forms.Button()
        Me.num9 = New System.Windows.Forms.Button()
        Me.num0 = New System.Windows.Forms.Button()
        Me.buttonClear = New System.Windows.Forms.Button()
        Me.buttonQuit = New System.Windows.Forms.Button()
        Me.buttonEnter = New System.Windows.Forms.Button()
        Me.display = New System.Windows.Forms.Label()
        Me.Title = New System.Windows.Forms.Label()
        Me.buttonBackspace = New System.Windows.Forms.Button()
        Me.Panel1 = New System.Windows.Forms.Panel()
        Me.SuspendLayout()
        '
        'num1
        '
        Me.num1.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num1.Location = New System.Drawing.Point(11, 83)
        Me.num1.Name = "num1"
        Me.num1.Size = New System.Drawing.Size(40, 40)
        Me.num1.TabIndex = 0
        Me.num1.Text = "1"
        Me.num1.UseVisualStyleBackColor = True
        '
        'num2
        '
        Me.num2.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num2.Location = New System.Drawing.Point(57, 83)
        Me.num2.Name = "num2"
        Me.num2.Size = New System.Drawing.Size(40, 40)
        Me.num2.TabIndex = 1
        Me.num2.Text = "2"
        Me.num2.UseVisualStyleBackColor = True
        '
        'num3
        '
        Me.num3.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num3.Location = New System.Drawing.Point(103, 83)
        Me.num3.Name = "num3"
        Me.num3.Size = New System.Drawing.Size(40, 40)
        Me.num3.TabIndex = 2
        Me.num3.Text = "3"
        Me.num3.UseVisualStyleBackColor = True
        '
        'num4
        '
        Me.num4.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num4.Location = New System.Drawing.Point(11, 129)
        Me.num4.Name = "num4"
        Me.num4.Size = New System.Drawing.Size(40, 40)
        Me.num4.TabIndex = 3
        Me.num4.Text = "4"
        Me.num4.UseVisualStyleBackColor = True
        '
        'num5
        '
        Me.num5.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num5.Location = New System.Drawing.Point(57, 129)
        Me.num5.Name = "num5"
        Me.num5.Size = New System.Drawing.Size(40, 40)
        Me.num5.TabIndex = 4
        Me.num5.Text = "5"
        Me.num5.UseVisualStyleBackColor = True
        '
        'num6
        '
        Me.num6.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num6.Location = New System.Drawing.Point(103, 129)
        Me.num6.Name = "num6"
        Me.num6.Size = New System.Drawing.Size(40, 40)
        Me.num6.TabIndex = 5
        Me.num6.Text = "6"
        Me.num6.UseVisualStyleBackColor = True
        '
        'num7
        '
        Me.num7.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num7.Location = New System.Drawing.Point(11, 175)
        Me.num7.Name = "num7"
        Me.num7.Size = New System.Drawing.Size(40, 40)
        Me.num7.TabIndex = 6
        Me.num7.Text = "7"
        Me.num7.UseVisualStyleBackColor = True
        '
        'num8
        '
        Me.num8.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num8.Location = New System.Drawing.Point(57, 175)
        Me.num8.Name = "num8"
        Me.num8.Size = New System.Drawing.Size(40, 40)
        Me.num8.TabIndex = 7
        Me.num8.Text = "8"
        Me.num8.UseVisualStyleBackColor = True
        '
        'num9
        '
        Me.num9.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num9.Location = New System.Drawing.Point(103, 175)
        Me.num9.Name = "num9"
        Me.num9.Size = New System.Drawing.Size(40, 40)
        Me.num9.TabIndex = 8
        Me.num9.Text = "9"
        Me.num9.UseVisualStyleBackColor = True
        '
        'num0
        '
        Me.num0.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.num0.Location = New System.Drawing.Point(57, 221)
        Me.num0.Name = "num0"
        Me.num0.Size = New System.Drawing.Size(40, 40)
        Me.num0.TabIndex = 9
        Me.num0.Text = "0"
        Me.num0.UseVisualStyleBackColor = True
        '
        'buttonClear
        '
        Me.buttonClear.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.buttonClear.Location = New System.Drawing.Point(166, 83)
        Me.buttonClear.Name = "buttonClear"
        Me.buttonClear.Size = New System.Drawing.Size(84, 40)
        Me.buttonClear.TabIndex = 10
        Me.buttonClear.Text = "Clear"
        Me.buttonClear.UseVisualStyleBackColor = True
        '
        'buttonQuit
        '
        Me.buttonQuit.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.buttonQuit.Location = New System.Drawing.Point(166, 129)
        Me.buttonQuit.Name = "buttonQuit"
        Me.buttonQuit.Size = New System.Drawing.Size(84, 40)
        Me.buttonQuit.TabIndex = 11
        Me.buttonQuit.Text = "Quit"
        Me.buttonQuit.UseVisualStyleBackColor = True
        '
        'buttonEnter
        '
        Me.buttonEnter.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.buttonEnter.Location = New System.Drawing.Point(166, 221)
        Me.buttonEnter.Name = "buttonEnter"
        Me.buttonEnter.Size = New System.Drawing.Size(84, 40)
        Me.buttonEnter.TabIndex = 12
        Me.buttonEnter.Text = "Enter"
        Me.buttonEnter.UseVisualStyleBackColor = True
        '
        'display
        '
        Me.display.BackColor = System.Drawing.SystemColors.Info
        Me.display.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.display.Font = New System.Drawing.Font("Consolas", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.display.Location = New System.Drawing.Point(12, 41)
        Me.display.Name = "display"
        Me.display.Size = New System.Drawing.Size(238, 27)
        Me.display.TabIndex = 13
        Me.display.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Title
        '
        Me.Title.BackColor = System.Drawing.SystemColors.ControlDark
        Me.Title.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Title.Location = New System.Drawing.Point(12, 9)
        Me.Title.Name = "Title"
        Me.Title.Size = New System.Drawing.Size(238, 23)
        Me.Title.TabIndex = 14
        Me.Title.Text = "Password"
        Me.Title.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'buttonBackspace
        '
        Me.buttonBackspace.Font = New System.Drawing.Font("Arial", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.buttonBackspace.Location = New System.Drawing.Point(103, 221)
        Me.buttonBackspace.Name = "buttonBackspace"
        Me.buttonBackspace.Size = New System.Drawing.Size(40, 40)
        Me.buttonBackspace.TabIndex = 15
        Me.buttonBackspace.Text = "C"
        Me.buttonBackspace.UseVisualStyleBackColor = True
        '
        'Panel1
        '
        Me.Panel1.BackColor = System.Drawing.SystemColors.ControlDark
        Me.Panel1.Location = New System.Drawing.Point(6, 7)
        Me.Panel1.Name = "Panel1"
        Me.Panel1.Size = New System.Drawing.Size(250, 260)
        Me.Panel1.TabIndex = 16
        '
        'frmKeypad
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.SystemColors.ControlDarkDark
        Me.ClientSize = New System.Drawing.Size(263, 273)
        Me.Controls.Add(Me.buttonBackspace)
        Me.Controls.Add(Me.Title)
        Me.Controls.Add(Me.display)
        Me.Controls.Add(Me.buttonEnter)
        Me.Controls.Add(Me.buttonQuit)
        Me.Controls.Add(Me.buttonClear)
        Me.Controls.Add(Me.num0)
        Me.Controls.Add(Me.num9)
        Me.Controls.Add(Me.num8)
        Me.Controls.Add(Me.num7)
        Me.Controls.Add(Me.num6)
        Me.Controls.Add(Me.num5)
        Me.Controls.Add(Me.num4)
        Me.Controls.Add(Me.num3)
        Me.Controls.Add(Me.num2)
        Me.Controls.Add(Me.num1)
        Me.Controls.Add(Me.Panel1)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "frmKeypad"
        Me.ShowInTaskbar = False
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Keypad"
        Me.ResumeLayout(False)

    End Sub

    Friend WithEvents num1 As Button
    Friend WithEvents num2 As Button
    Friend WithEvents num3 As Button
    Friend WithEvents num4 As Button
    Friend WithEvents num5 As Button
    Friend WithEvents num6 As Button
    Friend WithEvents num7 As Button
    Friend WithEvents num8 As Button
    Friend WithEvents num9 As Button
    Friend WithEvents num0 As Button
    Friend WithEvents buttonClear As Button
    Friend WithEvents buttonQuit As Button
    Friend WithEvents buttonEnter As Button
    Friend WithEvents display As Label
    Friend WithEvents Title As Label
    Friend WithEvents buttonBackspace As Button
    Friend WithEvents Panel1 As Panel
End Class


6

Support Questions / Re: Hide number field from keypad

« on: March 30, 2017, 06:38:58 PM »

Here is your requested log. There is no line number since it is running the compiled version. This error does not happen when running in VS.

Code: [Select]

See the end of this message for details on invoking
just-in-time (JIT) debugging instead of this dialog box.

************** Exception Text **************
System.InvalidCastException: Conversion from string "" to type 'Double' is not valid. ---> System.FormatException: Input string was not in a correct format.
   at Microsoft.VisualBasic.CompilerServices.Conversions.ParseDouble(String Value, NumberFormatInfo NumberFormat)
   at Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value, NumberFormatInfo NumberFormat)
   --- End of inner exception stack trace ---
   at Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value, NumberFormatInfo NumberFormat)
   at Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value)
   at MfgControl.AdvancedHMI.Controls.Keypad.OnMouseDown(MouseEventArgs e)
   at System.Windows.Forms.Control.WmMouseDown(Message& m, MouseButtons button, Int32 clicks)
   at System.Windows.Forms.Control.WndProc(Message& m)
   at System.Windows.Forms.ScrollableControl.WndProc(Message& m)
   at System.Windows.Forms.Form.WndProc(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
   at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
   at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)


************** Loaded Assemblies **************
mscorlib
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1637.0 built by: NETFXREL3STAGE
    CodeBase: file:///C:/Windows/Microsoft.NET/Framework/v4.0.30319/mscorlib.dll
----------------------------------------
VRS01
    Assembly Version: 1.1.0.0
    Win32 Version: 1.1
    CodeBase: file:///C:/Projects/VRSAdvancedHMI/AdvancedHMI/bin/Release/VRS01.exe
----------------------------------------
Microsoft.VisualBasic
    Assembly Version: 10.0.0.0
    Win32 Version: 14.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic/v4.0_10.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll
----------------------------------------
System
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1637.0 built by: NETFXREL3STAGE
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System/v4.0_4.0.0.0__b77a5c561934e089/System.dll
----------------------------------------
System.Core
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1638.0 built by: NETFXREL3STAGE
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Core/v4.0_4.0.0.0__b77a5c561934e089/System.Core.dll
----------------------------------------
System.Windows.Forms
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms/v4.0_4.0.0.0__b77a5c561934e089/System.Windows.Forms.dll
----------------------------------------
System.Drawing
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Drawing/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll
----------------------------------------
System.Runtime.Remoting
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Remoting/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll
----------------------------------------
System.Configuration
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Configuration/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Configuration.dll
----------------------------------------
System.Xml
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Xml/v4.0_4.0.0.0__b77a5c561934e089/System.Xml.dll
----------------------------------------
MfgControl.AdvancedHMI.Controls
    Assembly Version: 1.0.0.0
    Win32 Version: 1.0.0.0
    CodeBase: file:///C:/Projects/VRSAdvancedHMI/AdvancedHMI/bin/Release/MfgControl.AdvancedHMI.Controls.DLL
----------------------------------------
AdvancedHMIControls
    Assembly Version: 3.9.9.17
    Win32 Version: 3.9.9.17
    CodeBase: file:///C:/Projects/VRSAdvancedHMI/AdvancedHMI/bin/Release/AdvancedHMIControls.DLL
----------------------------------------
AdvancedHMIDrivers
    Assembly Version: 3.9.9.17
    Win32 Version: 3.9.9.17
    CodeBase: file:///C:/Projects/VRSAdvancedHMI/AdvancedHMI/bin/Release/AdvancedHMIDrivers.DLL
----------------------------------------
MfgControl.AdvancedHMI.Drivers
    Assembly Version: 1.0.0.0
    Win32 Version: 1.0.0.0
    CodeBase: file:///C:/Projects/VRSAdvancedHMI/AdvancedHMI/bin/Release/MfgControl.AdvancedHMI.Drivers.DLL
----------------------------------------
System.Windows.Forms.DataVisualization
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms.DataVisualization/v4.0_4.0.0.0__31bf3856ad364e35/System.Windows.Forms.DataVisualization.dll
----------------------------------------
Accessibility
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1586.0 built by: NETFXREL2
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_MSIL/Accessibility/v4.0_4.0.0.0__b03f5f7f11d50a3a/Accessibility.dll
----------------------------------------
System.Data
    Assembly Version: 4.0.0.0
    Win32 Version: 4.6.1636.0 built by: NETFXREL3STAGE
    CodeBase: file:///C:/WINDOWS/Microsoft.Net/assembly/GAC_32/System.Data/v4.0_4.0.0.0__b77a5c561934e089/System.Data.dll
----------------------------------------

************** JIT Debugging **************
To enable just-in-time (JIT) debugging, the .config file for this
application or computer (machine.config) must have the
jitDebugging value set in the system.windows.forms section.
The application must also be compiled with debugging
enabled.

For example:

<configuration>
    <system.windows.forms jitDebugging="true" />
</configuration>

When JIT debugging is enabled, any unhandled exception
will be sent to the JIT debugger registered on the computer
rather than be handled by this dialog box.

7

Support Questions / Re: Hide number field from keypad

« on: March 29, 2017, 09:41:38 PM »

It doesn't provide much data other than that it is failing on the conversion from string to double.

I'm not sure as to exactly why it is not being caught when run as an exe rather than the vhost.exe.

8

Support Questions / Re: Hide number field from keypad

« on: March 29, 2017, 02:07:56 AM »

It is crashing on k.showDialog() though so that solution will not work.

9

Support Questions / Re: Hide number field from keypad

« on: March 28, 2017, 10:07:41 PM »

I'm getting a strange uncatchable error when ever the enter button is pushed on the keypad when there is no input.

I can catch it fine in Visual studio but when I run it outside I will continue to get this error.

How can I fix this issue?

Code: [Select]

        Dim Result As DialogResult = DialogResult.None
        Try
            Result = k.ShowDialog()
        Catch io As InvalidCastException
            Return
        End Try

10

Support Questions / Re: Hide number field from keypad

« on: March 28, 2017, 07:10:08 PM »

Thanks Archie.

I completed what I wanted to do with the code below.

Code: [Select]

        Dim k As New MfgControl.AdvancedHMI.Controls.Keypad(300)
        k.StartPosition = StartPosition.CenterScreen
        k.Text = "Password"
        k.ForeColor = Color.WhiteSmoke
        k.Font = New Font("Arial", 18)
        k.PasswordChar = True
        k.AllowDecimal = False
        k.AllowNegative = False
        k.MinValue = 0
        k.MaxValue = 9999
        If k.ShowDialog() = DialogResult.OK Then
            Try
                EthernetIPforCLXCom1.Write(GlobalVar.PLCVarLoc & "LogOnNum", k.Value)
            Catch ex As Exception
            End Try
        End If

11

Support Questions / Re: Hide number field from keypad

« on: March 28, 2017, 12:43:49 AM »

Unfortunately I cannot use that as I require a number only keypad.

Is there any other way to change the current keypad without having to make a new one.

12

Support Questions / Hide number field from keypad

« on: March 26, 2017, 09:34:38 PM »

Hi,

How can I hide the number field from the keypad or make it display **** instead of the numbers. I have attached an image to illustrate what I want to do.

13

Support Questions / Re: VB.Net BasicButton PLCAddressClick NullReferenceException

« on: March 01, 2017, 11:56:13 PM »

Thanks! This works however ex.Errorcode has to be removed as it is not a member of Exception so I removed that too.

14

Support Questions / VB.Net BasicButton PLCAddressClick NullReferenceException

« on: March 01, 2017, 07:14:56 PM »

When the BasicButton is clicked and the PLCAddressClick is not empty, and the PLC is defined but not available. The program will crash on the BasicButton.vb line 366 with exception.

Code: [Select]

An unhandled exception of type 'System.NullReferenceException' occurred in MfgControl.AdvancedHMI.Drivers.dll

Additional information: Object reference not set to an instance of an object.
I am using AdvancedHMI version 399s and the AdvancedHMIDrivers.EthernetIPforCLXCom class.

Should I disable the button from being clicked if it cannot connect to the PLC or is there something I can add to get rid of this error.

15

Support Questions / ChartByArray Column Graph

« on: February 09, 2017, 02:09:25 AM »

Hi I'm having difficulties understanding how the PLC addresses are processed with this to populate a chart area with data for either a stacked column or column chart.

In excel I have deconstructed the data in the tag and illustrated how I would like it to look in vb.net ChartByArray.



How can I use ChartByArray with a PLC tag that looks like ...TestCase[0-3].Accum[0-24] to populate the Chart with a column graph?