Combobox Items Stringgrid Zelle übertragen.

[spartakus]

Hallo!
ich möchte Markierten Eintrag in Combobox nach dem ich gewählt habe ,
zusätzlich was rein schreiben und aus der ComboBox in die betreffende
Stringgrid Zelle übertragen.

Code:

procedure TForm1.ComboBox1Change(Sender: TObject);
  begin
              case  ComboBox1.ItemIndex  of
           0:   StringGrid1.cells[0,1]:=ComboBox1.Text;
           1:   StringGrid1.cells[0,2]:=ComboBox1.Text;
           2:   StringGrid1.cells[0,3]:=ComboBox1.Text;
           3:   StringGrid1.cells[0,4]:=ComboBox1.Text;
           4:   StringGrid1.cells[0,5]:=ComboBox1.Text;
       end;
       end;

hier mit kann ich die Items in die Stringgrid Zelle schreiben.
aber wenn ich in Combobox was ändere und dann versuche
in Zelle zu schreiben, Es funktioniert aber nicht!
-------
Es funktioniert dann wenn ich nur so mache:
 StringGrid1.cells[0,1] := Combobox1.Text; Danke!

[himitsu]

Wenn du etwas reinschreibst, auf was möge dann ItemIndex stehn?

Womöglich -1 ?

Nicht alles was als Text reingeschrieben wird, wird gleich automatisch in einen selektierten Eintrag übertragen.
PS: Items kennt auch eine Methode zum Suchen.

[spartakus]

danke!

auch -1 habe ich versucht.

zb.
Combobox Inhalt:
abfel
birne
melone
dann aber schreibe ich statt abfel ---> tomate rein.
dann sollte Combobox items in Grid Zelle gleich übertragen werden.

tut er nur dann wenn ich ohne "ComboBox1.ItemIndex" mache!

Code:

  StringGrid1.cells[0,1] := Combobox1.Text;

oder gehts es überhaupt nicht ?

[himitsu]

Zitat von spartakus:

auch -1 habe ich versucht.

Und wie/was hast du genau versucht?

Tomate ist nicht in den Items, also kann ItemIndex nur den Wert -1 haben.

[Furtbichler]

Verstehe ich das richtig? Du hast 5 Einträge und wenn Du den n.ten Eintrag auswählst, dann soll dieser Text als Überschrift in der n.ten Spalte des Stringgrids erscheinen?

Und wenn Du keinen Eintrag auswählst, sondern etwas anderes in die Combobox schreibst... soll was passieren?

[spartakus]

du hast recht !

Zitat von himitsu:

Nicht alles was als Text reingeschrieben wird, wird gleich automatisch in einen selektierten Eintrag übertragen.

Ich muss anders machen!

[Popov]

Nur mal als Hinweis (ungeprüft). Wenn du das eingibst:

x := ComboBox.Items.Add(Combobox.Text); dann enthält x den Item in das der Text abgelegt wurde. Vielleicht kann es dir nützlich sein.