[arach]

Задача: Есть переменная типа integer. В стринглисте находится много строк.
Нужно найти эту переменную в стринглисте. Если есть - вывести сообщение, что уже есть. Если нет - добавить в стринглист. Что я пробовал:

Код:

function CheckNumb(Numb: integer): String;
var
i: Integer;
Begin
 for i := 0 to database.Count - 1 do begin
 if Numb = StrToInt(database[i]) then
 Continue Else
 Database.Add(IntToStr(Numb)); 
 break; 
 end;
end;

Админ: Пользуемся тегами! При рецедиве последуют санкции!

Разумеется код кривой, и строки добавляются по нескольку раз в стринглист. В первый раз добавляется нормально. Во второй раз, если попробовать добавить туже переменную, она опять добавляется. Помогите