Simulácia Button_click po KeyDown

Simulácia Button_click po KeyDown zodpovězená otázka

20. 10. 2009 18:52

265 610

Vedel by mi niekto poradiť, ako simulovať stlačenie prislušného buttonu po stlačení klávesu na klávesnici. To znamená, že ak kliknem trebárs na klávesnici na šipku doľava tak na formulári vidím, že príslušný button klikol.

Za všetky odpovede vopred ďakujem.

nahlásit spam

odpovědět

20. 10. 2009 19:18

Jakub Čermák

51 170

Předpokládám, že chcete toto simulovat pro okno jiné aplikace, pak použijte WinAPI funkci SendMessage nebo PostMessage a pošlete zprávu WM_KEYDOWN (nebo tak nějak podobně se jmenuje, viz dokumentace MSDN). Pokud to chcete pro okno ve vlastní aplikaci, pak je jednodušší přímo zavolat nějakou z funkcí .NET frameworku, která má na starostí handování příslušních zpráv. Nebo samozřejmě můžete použít i výše zmiňovanou Send nebo PostMessage, ty fungují obecně pro libovolná okna v dané session.

nahlásit spam

2 / 2

odpovědět

20. 10. 2009 19:28

Lubos Blader

265 610

Ďakujem za odpoveď.

Chcem to vo vlastnej aplikácii. Mohli by ste, prosím, vysvetliť to podrobnejšie. Nie som si istý, či si rozumieme. Mne nejde o to ako spustiť udalosť pod príslušným buttonom, chcel by som vidieť, aby ten button klikol.

Príjemný večer!

nahlásit spam

odpovědět

DotNETcollege: Mohlo by vás zajímat

MAUI - multiplatformní aplikace v .NETu

Úvod do XAML

Vyvíjíme univerzální aplikace pro Windows

Kontejnery, Docker a Azure Kubernetes Service (AKS)

TypeScript

Testování v prostředí .NET - unit testy a integrační testy

Kontinuální integrace pomocí TeamCity

Entity Framework pro pokročilé

Xamarin - vývoj multiplatformních mobilních aplikací

Javascript pro mírně pokročilé

21. 10. 2009 6:54

Ondřej Ondryáš

-5 242

Nerozumím.

Chcete zavolat tu proceduru Button_Click po stisknutí klávesy?

Pokud ano, tak třeba:

Private Sub Form1_KeyDown(..., e As ....) Handles MyBase.KeyDown
 Select Case e.KeyCode
  Case Keys.Left
   Button1_Click(sender, eventargs.empty)
 End Select
End Sub

Private sub Button1_Click(sender As Object, e As Eventargs)
 MsgBox("Stisknuli jste tlačítko nebo klávesu doleva!")
End Sub

Actual: Promiňte, nevšíml jsem si že nechcete vyvolat tu událost.

nahlásit spam

1 / 1

odpovědět

21. 10. 2009 7:51

Lubos Blader

265 610

Ďakujem za odpoveď. Chcem zavolať procedúru. To aj viem. Ale mne ide hlavne o animáciu kliknutia na button.

nahlásit spam

odpovědět

21. 10. 2009 10:39

Honza Dědek

222 793

Chápu to tak, že potřebuje standartně spustit procedudu která náleží k události click buttonu (tak jak jste napsal) ale zároveň potřebuje aby se provedla i animace (tzn. aby bylo vizuálně vidět že se kliká na button).

nahlásit spam

1 / 1

odpovědět

21. 10. 2009 13:20

Lubos Blader

265 610

Veľmi pekne ďakujem, že ste to tak dobre preložili. :-) Áno, je to presne tak.

nahlásit spam

odpovědět

22. 10. 2009 18:07

Lubos Blader

265 610

Zhruba tak si to predstavujem:

Imports System.Windows.Forms
Public Class Form1
    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyData
            Case Keys.Left
                btnLeft_Click(sender, EventArgs.Empty)
                btnLeft.BackColor = SystemColors.ControlDark
            Case Keys.NumPad1
                btn1_Click(sender, EventArgs.Empty)
                btn1.BackColor = SystemColors.ControlDark
        End Select
    End Sub
    Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
        Select Case e.KeyCode
            Case Keys.Left
                btnLeft.BackColor = SystemColors.ControlLight
            Case Keys.NumPad1
                btn1.BackColor = SystemColors.ControlLight
        End Select
    End Sub
    Private Sub btn1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btn1.Click
        TextBox1.Text &= 1
    End Sub
    Private Sub btnLeft_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLeft.Click
        TextBox1.Text = "Vľavo"
    End Sub
End Class

nahlásit spam

1 / 1

odpovědět

otázka připomínka kladné hodnocení záporné hodnocení

Nadpis:

Antispam:

Komu se občas házejí perly?

Příspěvek bude publikován pod identitou anonym.

Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.

Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

dotNETportal.cz