Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi ComboBox OnChange (https://www.delphipraxis.net/61422-combobox-onchange.html)

delphien 21. Jan 2006 10:21


ComboBox OnChange
 
Hallo, eine einfache Frage an alle Profis.
Kann man im Onchange Handler den ComboBox.Text ändern ?
Bei mir klappt es nicht. Der Text wird immer wieder auf den
ursprünglichen Text zurückgesetzt.

Nils_13 21. Jan 2006 10:23

Re: ComboBox OnChange
 
Meinst du so etwas ?
Delphi-Quellcode:
procedure TForm1.ComboBox1Change(Sender: TObject);
var Text: String;
begin
  Text          := 'Foo!';
  ComboBox1.Text := Text;
end;
Bei mir läuft das.

delphien 21. Jan 2006 10:30

Re: ComboBox OnChange
 
ja, bei mir läuft's nicht. :wall:

PierreB 21. Jan 2006 10:32

Re: ComboBox OnChange
 
Du hast nicht zufällig die Eigenschaft Style der ComboBox auf csOwnerDrawVariable oder ähnliches gestellt ?
Falls doch stell mal auf csDropDown zurück und versuchs erneut.

marabu 21. Jan 2006 10:38

Re: ComboBox OnChange
 
Sollte der Style den Standardwert csDropDown aufweisen, dann ist vielleicht dieser thread für dich von Interesse: klick

Grüße vom marabu

delphien 21. Jan 2006 11:33

Re: ComboBox OnChange
 
So funktioniert es:

ComboBox.itemindex := X

X steht für den Index der Items, also

0 Text1
1 Text2
.....

DANKE

marabu 21. Jan 2006 11:53

Re: ComboBox OnChange
 
Deine Vorgehensweise deutet darauf hin, dass du den Style csDropDownList verwendet hast. Es können dann nur noch Werte aus der Items-Liste der ComboBox verwendet werden - oder gar kein Wert (ItemIndex -1). Das Ereignis OnChange() kann also nur durch eine bewusste Entscheidung des Benutzers ausgelöst werden. Diese Entscheidung wird dann ohne dein weiteres Zutun korrekt umgesetzt. Dein Eingriff im event handler macht nur dann Sinn, wenn du den Benutzer entmündigen willst...

Nachdenkliche Grüße vom marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:06 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz