Announcement

Collapse
No announcement yet.

Event zuweisen

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Event zuweisen

    Hallo
    ich habe mehrere TextBoxen auf meiner WinForm
    den Boxen möchte nun allen ein event zuweisen, wenn jemand draufclickt
    Die Textboxen sind vorhanden und werden nicht zur laufzeit erzeugt

    So etwa
    procedure myClick()
    begin
    MessageBox.Show('Hallo');
    end;

    textBox1.Click := MyClick

    wie kann ich es jetzt aber mit delphi.net lösen?

    include? aber wie?

    Raimund

  • #2
    Hallo,
    ich würde zuerst <i>Include(textBox1.Click , self.MyClick);</i> ausprobieren

    Comment


    • #3
      hallo Herr Kosch

      danke für die schnelle antwort

      Procedure MyClick(sender: System.Object; e: System.EventArgs);
      begin
      MessageBox.Show('Hallo')
      end;

      Procedure SetzeClick();
      begin
      Include(g_hf.TextBox1.Click, MyClick);
      Include(g_hf.TextBox2.Click, MyClick);
      Include(g_hf.TextBox3.Click, MyClick);
      end;

      und der Aufruf dann in WinForm
      SetzeClick

      Funktioniert super
      mein Fehler war die Parameter in MyClick

      Procedure MyClick();
      ich hatte da nix drin

      Raimun

      Comment

      Working...
      X