Archief - [PROG][VB.NET] probleem met knoppen

NeoCC · 2 nov 2007

hoi mensen, ik ben hier weer met een vraagje
even voor de duidelijkheid zal ik effe een screenshot posten .
klikkie
hoe werkt het :
ik kies uit mijn dropdown menu een categorie , die deelnemers komen in een listboxt terecht ... bij add komen ze in een textvakje . allemaal goed en dat werkt.
ik klik op de "pair" knop
en achter die pair knop zit het volgende
- hij opent die 2de form die je ziet op de screenshot
- hij voegt knoppen toe op een bepaalde manier.

nu is het probleem als ik op een van die knoppen druk zou er iets moeten gebeuren.
hoe kan ik dit doen
mvg
Neo

Duffman- · 2 nov 2007

Het is wel belangrijk te weten hoe je de knoppen aanmaakt. Ik gok dat ze gegenereerd zijn in runtime?
Ik heb ongeveer hetzelfde probleem gehad een tijd geleden. Toen heb ik het opgelost door aan elke knop die ik genereerde een soort code te geven en deze mee te geven in de tag-property van de knop. Wanneer er dan op één van de knoppen geklikt werd, kon ik aan die tag zien welke knop het was en dan de juiste instructies meegeven aan de knop.
Maar ik weet nu niet of dat het detecteren van welke knop je aanklikt een probleem is bij u. Bij mij wel want ik had mijnenveger geprogrammeerd met een variabele veldgrootte. ^^

Grtz,
Duffman-

NeoCC · 2 nov 2007

code voor knoppen toe te voegen is volgende

Code:

          hulp2 = (hulp2 - 8) * 2


            For i = 1 To hulp2 
                Dim tbpair As New Button
                j = i * 40
                tbpair.Name = "pair" & i
                tbpair.Location = New Point(x, y + j)
                
                tbpair.Size = New Size(150, 20)
                tbpair.BackColor = Color.Crimson
                pairtb.Add(tbpair)
                frmpair.Controls.Add(tbpair)

            Next

            hulp2 = 8
            x = 200
            While hulp2 > 0
                For z = 1 To hulp2
                    Dim tbpair As New Button
                    j = z * 40
                    tbpair.Name = "pair" & i
                    tbpair.Location = New Point(x, y + j)
                  
                    tbpair.Size = New Size(150, 20)
                    tbpair.BackColor = Color.Crimson
                    pairtb.Add(tbpair)
                    frmpair.Controls.Add(tbpair)
                Next
                hulp2 = hulp2 / 2
                x += 180
                y += 20

            End While

met deze code maak ik dus knoppen aan in een 'tournooigrid' tot 16 deelnemers.

Duffman- · 3 nov 2007

hier alvast de code HOE ik mijn knoppen aanmaakte (don't mind the teller. mijnenveger zijn veeeel knopjes

) en hoe ik er een handler aan toevoegde (handler zorgt ervoor dat je kan klikken op de knop.

Code:

        For intTeller = 1 To intVeldgrootte
            intX = intX + 20
            intY = -20
            For intTeller1 = 1 To intVeldgrootte
                intY = intY + 20
                btnKnop(intTeller, intTeller1) = New Button
                btnKnop(intTeller, intTeller1).Location = New Point(intX, intY)
                btnKnop(intTeller, intTeller1).Size = New Size(20, 20)
                btnKnop(intTeller, intTeller1).Tag = intTeller & "," & intTeller1
                Controls.Add(btnKnop(intTeller, intTeller1))
                AddHandler btnKnop(intTeller, intTeller1).MouseUp, AddressOf btnKnop_ClickHandler
            Next
        Next

Daarna, kon ik met deze event:

Code:

    Public Sub btnKnop_ClickHandler(ByVal sender As System.Object, ByVal e As System.windows.Forms.MouseEventArgs)

de knop aanspreken.

Archief - [PROG][VB.NET] probleem met knoppen

NeoCC

Legacy Member

Duffman-

Legacy Member

NeoCC

Legacy Member

Duffman-

Legacy Member