Hallo Zusammen,
Ich habe mich heute hier mal angemeldet weil ich mit meinem Latein etwas am Ende bin.
Ich habe mir in VB.net eine Anwendung geschrieben mit der ich mein Rigol Oszilloskop steuern kann.
In den Einstellungen habe ich die Möglichkeit geschaffen das Programm per TopMost immer im Vordergrund zu halten. Hier komme ich jetzt schon zu meinem Problem.
Innerhalb des Steuerprogramms sind 3 Buttons vorhanden die durch bloßen Focus augelöst werden können (Cursor). Der erste der drei Buttons wird ausgelöst sobald ich das TopMost aktiviere.
hier mal die betroffenen Codeschnipsel ..
Hier noch der Code zu A3-A5 Click
die Konfiguration des A3-A5 Buttons sieht so aus :
Kann mir von euch einer erzählen warum nur A3 ausgelöst wird sobald TopMost aktiviert wird ??!
Oder hat jemand ne Idee wie ich es umgehen kann das es beim Start aktiviert wird ?
Ich bin da aktuell echt ratlos.
Danke schonmal vorweg ..
Ich habe mich heute hier mal angemeldet weil ich mit meinem Latein etwas am Ende bin.
Ich habe mir in VB.net eine Anwendung geschrieben mit der ich mein Rigol Oszilloskop steuern kann.
In den Einstellungen habe ich die Möglichkeit geschaffen das Programm per TopMost immer im Vordergrund zu halten. Hier komme ich jetzt schon zu meinem Problem.
Innerhalb des Steuerprogramms sind 3 Buttons vorhanden die durch bloßen Focus augelöst werden können (Cursor). Der erste der drei Buttons wird ausgelöst sobald ich das TopMost aktiviere.
hier mal die betroffenen Codeschnipsel ..
Hier noch der Code zu A3-A5 Click
VB.NET-Quellcode
- Private Sub A3_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles A3.Click, A3.Enter '30hz
- Dim b As Button = eventSender
- AutoTime.Checked = False
- SendData(":TIMebase:SCALe 1E-02;:timebase:offset 0")
- End Sub
- Private Sub A4_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles A4.Click, A4.Enter '1khz
- AutoTime.Checked = False
- SendData(":TIMebase:SCALe 1E-04;:timebase:offset 0")
- End Sub
- Private Sub A5_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles A5.Click, A5.Enter '30kHz
- AutoTime.Checked = False
- SendData(":TIMebase:SCALe 1E-05;:timebase:offset 0")
- End Sub
die Konfiguration des A3-A5 Buttons sieht so aus :
VB.NET-Quellcode
- '
- 'A3
- '
- Me.A3.BackColor = System.Drawing.SystemColors.Control
- Me.A3.Cursor = System.Windows.Forms.Cursors.Default
- Me.A3.ForeColor = System.Drawing.SystemColors.ControlText
- Me.A3.Location = New System.Drawing.Point(25, 17)
- Me.A3.Name = "A3"
- Me.A3.RightToLeft = System.Windows.Forms.RightToLeft.No
- Me.A3.Size = New System.Drawing.Size(55, 25)
- Me.A3.TabIndex = 301
- Me.A3.Text = "30Hz"
- Me.A3.UseVisualStyleBackColor = False
- '
- 'A4
- '
- Me.A4.BackColor = System.Drawing.SystemColors.Control
- Me.A4.Cursor = System.Windows.Forms.Cursors.Default
- Me.A4.ForeColor = System.Drawing.SystemColors.ControlText
- Me.A4.Location = New System.Drawing.Point(85, 17)
- Me.A4.Name = "A4"
- Me.A4.RightToLeft = System.Windows.Forms.RightToLeft.No
- Me.A4.Size = New System.Drawing.Size(55, 25)
- Me.A4.TabIndex = 302
- Me.A4.Text = "1 kHz"
- Me.A4.UseVisualStyleBackColor = False
- '
- 'A5
- '
- Me.A5.BackColor = System.Drawing.SystemColors.Control
- Me.A5.Cursor = System.Windows.Forms.Cursors.Default
- Me.A5.ForeColor = System.Drawing.SystemColors.ControlText
- Me.A5.Location = New System.Drawing.Point(145, 17)
- Me.A5.Name = "A5"
- Me.A5.RightToLeft = System.Windows.Forms.RightToLeft.No
- Me.A5.Size = New System.Drawing.Size(55, 25)
- Me.A5.TabIndex = 303
- Me.A5.Text = "40 kHz"
- Me.A5.UseVisualStyleBackColor = False
Kann mir von euch einer erzählen warum nur A3 ausgelöst wird sobald TopMost aktiviert wird ??!
Oder hat jemand ne Idee wie ich es umgehen kann das es beim Start aktiviert wird ?
Ich bin da aktuell echt ratlos.
Danke schonmal vorweg ..
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Zerstreuter“ ()