[es] - VB.NET Dogadjaj na nivou forme

mcsd
Beograd

Član broj: 34831
Poruke: 1
*.18.eunet.yu

Profil

^{18.09.2004. u 11:54 - pre 238 meseci}

Kako da napravim dogadjaj u VB.Net-u na nivou cele forme, tj. da odredjeni dogadjaj(npr. "Click") vazi za sve kontrola na formi, a da nije kao u sledecem primeru, tj da ne moram da nabrajam sve kontrola na formi.

>>>> Private Sub GlobalniDogadjaj_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Click, btnSnimi.Click, btnZatvori.Click, btnTest.Click, txtIme.Click, txtPrezime.Click <<<<

Unapred hvala. Bojan

slipknot

Odgovor na temu

Deep|Blue
Srce Srbije

Član broj: 631
Poruke: 1431
*.dialup.sezampro.yu.

ICQ: 101830817

+314 Profil

Re: VB.NET Dogadjaj na nivou forme

^{23.09.2004. u 21:38 - pre 238 meseci}

Pazi, za pocetak ne mozes da napravis globalni event iz razloga sto sve kontrole nemaju isti poziv eventa _onclick.

ono sto mozes da probas jeste da napravis tipske onclick eventove za razlicite kontrole koji ce vrsiti iste akcije (ili pozivati istu proceduru)
zatim u form_load eventu "prosetas" formom i pokupis sve kontrole i svakoj prikacis tvoj onclick event.
ovisno o broju kontrola to moze da potraje par sec, ali uglavnom se dosta brzo izvrsava.

"Hmmm", rekao je, "...suprostavlja se nadrealizmu prikrivene metafore..." Razmišljao je tome na trenutak, a onda je zatvorio beležnicu s mrkim osmehom.
"I smrt je za njih suviše dobra"

Odgovor na temu

havramm
Miroslav Havram
Software Developer / Engineer
Beograd

Član broj: 4603
Poruke: 255
212.62.55.*

Profil

Re: VB.NET Dogadjaj na nivou forme

^{24.09.2004. u 00:00 - pre 238 meseci}

Nešto ovako (doduše u c#-u, ali nadam se da će pomoći...)?

Code:

public class MyBubbleForm: Form
{
    private Button button;
    private Label label;
    private TextBox textBox;

    public event EventHandler GlobalClick;

    public MyBubbleForm()
    {
        InitializeComponent();
        BindEventHandlers();
    }

    private void InitializeComponent()
    {
        ...
    }

    private void BindEventHandlers()
    {
        this.button.Click += new EventHandler(this.OnGlobalClick);
        this.label.Click += new EventHandler(this.OnGlobalClick);
        this.textBox.Click += new EventHandler(this.OnGlobalClick);
    }

    private void OnGlobalClick(object sender, EventArgs e)
    {
        if (this.GlobalClick != null)
        {
            this.GlobalClick(this, e);
        }
    }
}

If it's a girl then they're gonna call it Sigourney, after an actress. If it's a boy, then they're gonna call it Rodney, after Dave!

Odgovor na temu

dusans
Stojanov Dušan
Pančevo

Član broj: 9551
Poruke: 1343
194.106.171.*

+311 Profil

Re: VB.NET Dogadjaj na nivou forme

^{24.09.2004. u 09:13 - pre 238 meseci}

Code:

Private Sub Form_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
  Me.CascadeSetGlobalClick(Me)
End Sub

Private Sub CascadeSetGlobalClick(ByVal C As System.Windows.Forms.Control)
  Dim Ctrl As System.Windows.Forms.Control
  AddHandler C.Click, AddressOf Me.HandleClick
  For Each Ctrl In C.Controls
    CascadeSetGlobalClick(Ctrl)
  Next
End Sub

Private Sub HandleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
  ' Some code...
End Sub

Pozdrav :)

Odgovor na temu