der Event Onchange von ComboBox aufgerufen

[thomas2009]

Hi
was muss ich tun, damit der Event Onchange von ComboBox aufgerufen wird ?

wenn ich den Index von der ComboBox ändere, dann passiert nichts !
Ich ändere den Index nicht direkt über Comobox sondern über den Button-Klick

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.ItemIndex:=2;
end;

Delphi-Quellcode:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
Caption :='ComboBox1 Index wurde geändert';;
end;

[Bernhard Geyer]

Wie wäre es damit:

Delphi-Quellcode:

ComboBox1Change(ComboBox1);

[Deep-Sea]

Oder vlt. ist - allgemein - diese Form besser geeignet:

Delphi-Quellcode:

procedure TForm1.AktualisiereEtwas;
begin
  Caption := 'ComboBox1 Index wurde geändert';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ComboBox1.ItemIndex := 2;
  AktualisiereEtwas;
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  AktualisiereEtwas;
end;

[mkinzler]

Vielleicht solltest du dich endlich einmal mit den Grundlagen beschaftigen, sonst wird das nie etwas!

[Jumpy]

OT und mal wieder nur aus Neugier gefragt:

Das Change Ereignis wird nicht ausgelöst, wenn die Änderung im Code erfolgt?
Frage deshalb, weil ich parallel zu Delphi für die Firma, C# für die Schule lerne und da hab ich erst vorgestern in einem Buch zu der entsprechenden ComboBox Komponente gelesen, dass das entsprechende Event (war es IndexChanged?) sowohl durch den User als auch durch anderen Code ausgelöst wird.

[stahli]

@Jumpi
Die VCL verhält sich an vielen Stellen nicht ganz erwartungsgemäß.
Man kann zwar dann immer irgendwelche Workaraounds implementieren, aber eine Generalüberholung der VCL täte m.E. schon Not (selbst wenn alte Projekte dann nicht mehr fortgeführt werden könnten).

[DeddyH]

TComboBox.OnChange

Zitat:

Note: OnChange only occurs in response to user actions. Changing the Text property programmatically does not trigger an OnChange event.

[Bernhard Geyer]

Zitat:

Zitat von stahli (Beitrag 1093902)

@Jumpi
Die VCL verhält sich an vielen Stellen nicht ganz erwartungsgemäß.

Erwartungsgemäßes verhalten ist aus der Sicht des Users. Ich finde es besser/schöner/logischer das man über Programmtechnische Änderungen nicht zusätzlich Informiert wird.

In dem Fall das bei programmtechnische Änderungen man immer Events bekommt ist Aufwändiger zu behandeln da man dann oft noch eine Flag braucht um im Event zu unterscheiden ob man gerade Programmtechnisch etwas macht oder die Änderung wirklich vom User kommt.

Und ein "Generalüberholung" der VCL um das Verhalten zu ändern ist mit sehr viel Testaufwand/Anpassungen verbunden und würde m.E. noch viel größere Aufschreie verursachen als mit der Unicode-Umstellung.

[uligerhardt]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1093909)

In dem Fall das bei programmtechnische Änderungen man immer Events bekommt ist Aufwändiger zu behandeln da man dann oft noch eine Flag braucht um im Event zu unterscheiden ob man gerade Programmtechnisch etwas macht oder die Änderung wirklich vom User kommt.

Genau.

Was auch nervt, ist die Inkonsistenz: Das OnChange bei ComboBoxen wird bei programmatischen Änderungen nicht aufgerufen. Bei CheckBoxen gibt's kein OnChange, also muss man OnClick nehmen - und das wird bei programmatischen Änderungen aufgerufen.

[thomas2009]

Zitat:

Zitat von Bernhard Geyer (Beitrag 1093895)

Wie wäre es damit:

Delphi-Quellcode:

ComboBox1Change(ComboBox1);

Es hat geklappt :thumb:

Zitat:

Zitat von Deep-Sea (Beitrag 1093897)

Oder vlt. ist - allgemein - diese Form besser geeignet:

Delphi-Quellcode:

...
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  AktualisiereEtwas;
end;

Das funktioniert auch. ich möchte Aber den Event Onchange komplett aufrufen
Mit deinem Vorschlag muss ich in die Funktion AktualisiereEtwas alles
hinschreiben, was in Combobox1Change steht. Sonst ist OK

[himitsu]

Zitat:

Zitat von thomas2009 (Beitrag 1094034)

Mit deinem Vorschlag muss ich in die Funktion AktualisiereEtwas alles
hinschreiben, was in Combobox1Change steht.

Dann hast du im Beispiel von Deep-Sea etwas übersehn oder nicht verstanden.

Delphi-Quellcode:

// die verknüpfte Methode aufrufen
// die Methoden können aber sonstwie heißen
ComboBox1Change(ComboBox1);
Button1Click(Button1);

// das Ereignis aufrufen (ist nix verknüpft, dann knallts)
ComboBox1.OnChange(ComboBox1);
Button1.OnClick(Button1);

// manche Komponenten haben sogar extra Methoden um das ereignis auszulösen
// und ist hier kein Ereignis verknüpft, dann knallt's nicht
Button1.Click;

// Das übergeben der Objekte (ComboBox1 und Button1) ist für Codes, welche den Sender prüfen.
// Wird nix geprüft, dann kann man auch nil nehmen.
// Wobei man nil auch nehmen kann, um den Sender geziehlt zu prüfen und so zu unterscheiden, ob in der GUI oder im Code das ereignis aufgerufen wurde.