Button.click simulieren?

[Taladan]

Wie kann man bei .Net einen Klick auf einen Button simulieren, also die dortige procedure ausführen, ohne sie noch mal zu schreiben?

[BrunoT]

Hi Taladan,

Lagere doch die Procedur aus und rufe sie von der OnClick- Methode und von der anderen Programmstelle auf.

mfg

BrunoT

[LoL]

oder einfach

Button.Click ?

[Taladan]

Leider wird in .Net alles mit unsinnigen argumenten aufgerufen.

Delphi-Quellcode:

sender: System.Object; e: System.EventArgs

[MathiasSimmack]

Warum unsinnig? Wenn du einen "sender" in deiner Prozedur/Funktion hast, die den Buttonklick simulieren soll, dann benutze den. Ansonsten versuchs mit null bzw. nil. Und für den zweiten Parameter gibt´s auch einen "EventArgs.Empty"-Parameter. Schau mal ins .NET Framework SDK.

[Taladan]

Ich will einen Click auf ein Menuitem (gleiches gilt für einen Button) simulieren. Mit Nullwerten will der nicht arbeiten.

Dieses Event hat nun mal diese Argumente (so langsam find ich die unsinnigen Argumente in .Net echt lästig).

Delphi-Quellcode:

procedure Hauptfenster.MenuItem3_Click(sender: System.Object; e: System.EventArgs);
begin
end;

[Luckie]

Und es gibt kein:

Delphi-Quellcode:

MenuIrtme3.Click;

wie in der normalen Win32 API VCL?

[Taladan]

Nein

[BrunoT]

Hi Taladan,

geht das nicht so:

Delphi-Quellcode:

Procedure MyClick;
Begin
  //Das will ich ausführen
  ...
end;

...

procedure Hauptfenster.MenuItem3_Click(sender: System.Object; e: System.EventArgs);
begin
  MyClick;
end;

procedure Hauptfenster.MenuItem4_Click(sender: System.Object; e: System.EventArgs);
begin
  MyClick;
end;

mfg

BrunoT

[edit=alcaeus]Delphi-Tags korrigiert. Mfg, alcaeus[/edit]

[barf00s]

Zitat:

Zitat von Taladan

Nein

komisch nur das alle anderen .NET Sprachen so'n MenuItem.Click; mitbringen .....

[Taladan]

Zitat:

Zitat von BrunoT

Hi Taladan,

geht das nicht so:

Delphi-Quellcode:

Procedure MyClick;
Begin
  //Das will ich ausführen
  ...
end;

...

procedure Hauptfenster.MenuItem3_Click(sender: System.Object; e: System.EventArgs);
begin
  MyClick;
end;

procedure Hauptfenster.MenuItem4_Click(sender: System.Object; e: System.EventArgs);
begin
  MyClick;
end;

mfg

BrunoT

[edit=alcaeus]Delphi-Tags korrigiert. Mfg, alcaeus[/edit]

Das ist eine Möglichkeit wie man das Problem umgehen kann, umgehen möchte ich aber nicht.

[barf00s]

Delphi-Quellcode:

case TMenuItem(Sender).Tag of
  0: ;
  1: ;
  2: ;
end;

...

[Robert_G]

Delphi-Quellcode:

MenuItem.Click;

Barfoos' Methode geht natürlich niht, da nur die Klasse selbst den event aufrufen darf.

@Taladan
Rate mal was PerformClick macht.... :P
Vergiss nicht: In .Net sind events multicast delegates, deshalb können mehrere Methoden daran gekoppelt sein.

Delphi-Quellcode:

method ClickHandler1(sender: Object; e: EventArgs);
method ClickHandler2(sender: Object; e: EventArgs);
method ClickHandler3(sender: Object; e: EventArgs);

Delphi-Quellcode:

begin
  menuItem1.Click += ClickHandler1;
  menuItem1.Click += ClickHandler2;
  menuItem1.Click += ClickHandler3;
end;

Wenn du nun daraif klickst (Oder PerformClick aufrufst) werden ClickHandler1 - 3 in genau dieser Reihenfolge aufgerufen.
Brunos Methode würde nur einen aufrufen.

[barf00s]

hö?

wenn dem menuitem nen clickevent zugewiesen ist, DANN wird das auch durch das .click aufgerufen...

es sei denn du meinst das case tag of dingen eben.....

[Robert_G]

Zitat:

Zitat von barf00s

hö?

Du hast schon gesehen, dass es ein .Net Thread ist?

[barf00s]

[edit]
ja und?

gnarf
verwirr micht nicht.
[/edit]

[Robert_G]

Zitat:

Zitat von barf00s

ja und?

nix und. ;) Das Feuern eines Events bleibt einzig und allein dem Besitzer vorbehalten.
Wo kämen wir denn da hin? :shock:

Wobei ich es mir in einer .Net-Sprache fast vorstellen könnte, die sowas möglich macht:

Delphi-Quellcode:

var
  s : string;
begin
  setLength(s, 5);

*ROFL* (Ist ein Insiderwitz, aber zum Kaputtlachen wenn man bedenkt, dass jemand diese Funktion tatsächlich bei vollem Bewusstsein in die RTL gebaut hat :lol: )

Zitat:

Zitat von barf00s

gnarf
verwirr micht nicht.

*fulp*
zu spät... :stupid:

[barf00s]

(*.*(@==(-.-)°

;)

[Taladan]

Es gibt die Procedure Btn.PerformClick, die jedoch nicht über die IDE/Codeverfolständiger angezeigt wird (warum auch immer).

[Elvis]

Zitat:

Zitat von Taladan

Es gibt die Procedure Btn.PerformClick, die jedoch nicht über die IDE/Codeverfolständiger angezeigt wird (warum auch immer).

Steht das nicht schon in Beitrag #13? :gruebel: