Combobox zurücksetzen

[Gehstock]

meine combobox ist bei programmstart Leer(zeigt nix an) die Strings sind aber schon drin
nun wll ich nach benutzung einer funktion das sie wieder in den ausgangszustand geht
Hab das jetzt so

Delphi-Quellcode:

cb_ring1.items.clear;
cb_ring1.items.add('braun');
cb_ring1.items.add('rot');
cb_ring1.items.add('orange');
cb_ring1.items.add('gelb');
cb_ring1.items.add('grün');
cb_ring1.items.add('blau');
cb_ring1.items.add('violett');
cb_ring1.items.add('grau');
cb_ring1.items.add('weiss');
cb_ring2.items.clear;
cb_ring2.items.add('schwarz');
cb_ring2.items.add('braun');
cb_ring2.items.add('rot');
cb_ring2.items.add('orange');
cb_ring2.items.add('gelb');
cb_ring2.items.add('grün');
cb_ring2.items.add('blau');
cb_ring2.items.add('violett');
cb_ring2.items.add('grau');
cb_ring2.items.add('weiss');
cb_ring3.items.clear;
cb_ring3.items.add('silber');
cb_ring3.items.add('gold');
cb_ring3.items.add('schwarz');
cb_ring3.items.add('braun');
cb_ring3.items.add('rot');
cb_ring3.items.add('orange');
cb_ring3.items.add('gelb');
cb_ring3.items.add('grün');
cb_ring3.items.add('blau');
cb_ring3.items.add('violett');
cb_ring4.items.clear;
cb_ring4.items.add('silber');
cb_ring4.items.add('gold');
cb_ring4.items.add('braun');
cb_ring4.items.add('rot');
cb_ring4.items.add('grün');
cb_ring4.items.add('blau');
cb_ring4.items.add('violett');

geht das nicht einfacher
cb_ring4.text :=clear oder so

[SirThornberry]

einfach den "ItemIndex" auf -1 setzen.

[Gehstock]

Hmm und ich grübel stundenlang
Danke