Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - authorleon

Pages: 1 [2]
16
Tips & Tricks / Re: Add keystroke (shortcut) to basic button
« on: May 30, 2017, 09:45:16 AM »
After a bit of testing, it seems the form does not respond to any key presses.

Sorry, have I missed something.

17
Tips & Tricks / Re: Add keystroke (shortcut) to basic button
« on: May 30, 2017, 08:09:59 AM »
Hello, I fixed the errors but the bode does not work. I have tried.

Please let me know when you can.

Also, I do not need a person to press ALT+W... Just W directly when focused on the window.


Thank you

18
Tips & Tricks / Re: Add keystroke (shortcut) to basic button
« on: May 30, 2017, 07:59:17 AM »
Hello,
I did what you said but i get this error.

Please have a look at the image attached. Also, I am using a serial connection.

Thank you


19
Tips & Tricks / Re: Add keystroke (shortcut) to basic button
« on: May 22, 2017, 05:03:14 PM »
Hello,
Thank you for the info, but it did not work:

Code: [Select]
Public Class MainForm

    Private Sub MainForm_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp
        If e.Alt AndAlso e.KeyCode = Keys.W Then
            BasicButton1.PerformClick()
        End If
    End Sub
    '*******************************************************************************
    '* Stop polling when the form is not visible in order to reduce communications
    '* Copy this section of code to every new form created
    '*******************************************************************************
    Private Sub Form_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
        AdvancedHMIDrivers.Utilities.StopComsOnHidden(components, Me)
    End Sub

    '**************************************
    '* Filling the form with a gradient
    '**************************************
    'Private Sub MainForm_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
    'Dim rect As New System.Drawing.Rectangle(0, 0, e.ClipRectangle.Width, e.ClipRectangle.Height)
    'Dim gradientBrush As New Drawing.Drawing2D.LinearGradientBrush(New Point(0, 0), New Point(0, Height), System.Drawing.Color.FromArgb(180, 100, 200), System.Drawing.Color.FromArgb(110, 200, 255))
    'e.Graphics.FillRectangle(gradientBrush, rect)
    'End Sub

    Private Sub BasicButton1_Click(sender As Object, e As EventArgs) Handles BasicButton1.Click
     
    End Sub

    Private Sub BasicButton7_Click(sender As Object, e As EventArgs) Handles BasicButton7.Click

    End Sub

    Private Sub BasicButton2_Click(sender As Object, e As EventArgs) Handles BasicButton2.Click

    End Sub

I have posted all the code I have at present.

Thank you very much.

If there is a better way. I would like to know. I am energizing: O:9/3.

When I press the button it energizes: O:9/3. When I let go, it stop.

Thank you

20
Tips & Tricks / Add keystroke (shortcut) to basic button
« on: May 22, 2017, 10:50:05 AM »
Hello,

I am trying to make a simple application and I have some buttons that work with the AB SLC500. Great.

I would like to add on the button a key shortcut so the user can press the button or press a key.

Code: [Select]
  Private Sub BasicButton1_Click(sender As Object, e As EventArgs) Handles BasicButton1.Click

    End Sub

I have been trying for about 6 hours but no joy. The code above is what I have as the standard code.

Thank you very much.

21
Open Discussion / Re: My first post
« on: August 06, 2014, 01:50:01 PM »
Thank you for trying AdvancedHMI. Hope you find it useful and easy to use.

Let us know if you find any problems or have any suggestions. This software is in continuous development to make it better.

Of course! THANK YOU!!!!!

22
Open Discussion / My first post
« on: August 06, 2014, 01:24:14 PM »
Thank you for having me and thank you to the AdvancedHMI team.

This is GREAT!

THANK YOU


Pages: 1 [2]