ComboBox - nicht den Text ändern können

[Xnoow]

Hallo Leude,


Ich will in nem Delphi Proj. von mir es so einstellen, dass man bei ner ComboBox nur lesen kann was dasteht und net einfach rumschreiben kann, drinne.

bei nem Memo feld konnte man ja ReadOnly= True einstellen das finde bei ner ComboBox net im Objektinspektor.


kann mir jemand helfen?


Danke Gruß Xnoow

[mirage228]

Hi,

setz den Style auf csDropDownList!

mfG
mirage228

[Xnoow]

Aha genau das habe ich gesucht danke! :-D :-D

[Trouble_Maker]

Hi...

hab dazu mal ne Frage:

Wie kann ich denn jetzt einen Text in der ComboBox festlegen, der schon zum Anfang zu sehen ist ?
mit ComboBox1.Text funktioniert das bei mir nicht mehr.
Nur beim Style auf "Drop Down". Will es aber auch in so einer Liste haben!

?!? Wahrscheinlich wieder sau einfach und ich komm mal wieder nicht drauf ;-)


cu Trouble_Maker

[toms]

Zitat:

?!? Wahrscheinlich wieder sau einfach und ich komm mal wieder nicht drauf

Nein, ist nicht mal so einfach! Habe eine Lösung mal auf http://www.swissdelphicenter.ch/
gepostet.

[Trouble_Maker]

Zitat:

Zitat von toms

Nein, ist nicht mal so einfach!

Na dann bin ich ja beruhigt ^^

Zitat:

Zitat von toms

Habe eine Lösung mal auf http://www.swissdelphicenter.ch/
gepostet.

hm... hab danach gesucht. Hab aber dort auch nix gefunden! Hast du den QT vielleicht noch ?

thx


Trouble_Maker

[Markus K.]

Hi Trouble_Maker,
ich hatte das Problem auch mal gehabt hatte es dann so gelöst.

Delphi-Quellcode:

procedure TFHaupt.FormCreate(Sender: TObject);
var i:integer;
begin
     for i:=1 to CBSchriftarten.Items.Count do
     begin
          if CBSchriftarten.Items.Strings[i]='..'
          then CBSchriftarten.ItemIndex:=i;
     end; 
end;

Tschüß Markus

[BluesKid]

oder:

Delphi-Quellcode:

  aCombobox.itemindex := acombobox.items.indexof('..');

wenn in der Combobox eindeutige Einträge stehen..

[Robert_G]

Delphi-Quellcode:

With cmbIrgendWas Do
  ItemIndex := Items.IndexOf(DeinText);

Edit: :oops: hatte das Fenster zu lange auf -> wieder zu langsam :wink:

[Die Muhkuh]

Zitat:

Zitat von Trouble_Maker

Hi...

hab dazu mal ne Frage:

Wie kann ich denn jetzt einen Text in der ComboBox festlegen, der schon zum Anfang zu sehen ist ?
mit ComboBox1.Text funktioniert das bei mir nicht mehr.
Nur beim Style auf "Drop Down". Will es aber auch in so einer Liste haben!

?!? Wahrscheinlich wieder sau einfach und ich komm mal wieder nicht drauf ;-)


cu Trouble_Maker

Lass den Style auf DropDown und schreib in OnKeyPress von der Combobox:

Delphi-Quellcode:

Key := #0

So lös ich das immer.

[Trouble_Maker]

hm... sorry funktioniert bei mir nicht!

kA wieso ... also bringt auch keine Fehlermeldung! Aber die Box is am Anfang immernoch leer...


cu Trouble_Maker

[Die Muhkuh]

Vielleicht solltest du noch was in Text reinschreiben^^

[Trouble_Maker]

hiho...

hab mit dem "es funktioniert nich" Markus K. und BluesKid gemeint!

@Spider: dein Tip funktioniert! Zwar nich so edel aber auch ok ;-)

cu Trouble_Maker

[Markus K.]

Was funktioniert denn nicht? Hast du für die .. auch den String eingesetzt der angezeigt werden soll?

Tschüß Markus

[Wheelie]

Mach's wie folgt:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.ItemIndex := 0; // 0 steht für erstes Element der ComboBox
end;

Das geht aber wirklich 100%-ig!

[horst]

hallo...

das funktioniert ja supergut.

Zitat:

procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.ItemIndex := 0; // 0 steht für erstes Element der ComboBox
end;

ich habe leider immer noch ein problem damit, und zwar...
was ist wenn ich die items aus einer ini lade, und meinetwegen item[3} in der ini als sichtbares item gespeichert wurde. weiß jemand rat?
die combobox steht auf csOwnerDrawFixed

liebe grüße
horst