Добавить програмно Items в ComboBox

[bbk_serg]

У меня такой вопрос. Как можно сделать так чтобы если я в ComboBox не нашол нужного мне itemsa я вручную его ввожу и при нажатии кнопки он добавился в этот ComboBox.

Заранее СПАСИБО!!!

[Яр|/||< (^_^)]

var i:integer;
j:integer;
s:string;
b:boolean;
begin
 i:=combobox1.Items.Count;
 for j := 0 to i - 1 do
 begin
   if combobox1.Items[j]<>s then
   begin
    b:=false;
   end
   else
   begin
     b:=true;
     break;
   end;

 end;
 if b=false then
 begin
   //твой код с считыванием текста
   combobox1.Items.Add({text})
 end;


end;

Незабудь нажать на весы!

[evg_m]

ComboBox.Items как наследник класса TStrings имеет много различных свойств и методов. Среди них есть IndexOf

s: string; //здесь должен быть текст который ищем (добавляет)
k:=combobox1.items.indexof(s);
if k<0 then
 k:= combobox1.items.add(s);
// а если мы еще к тому хотим выбрать эту строчку
 combobox.itemIndex:=k;