Задача: Есть переменная типа 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;
Админ: Пользуемся тегами! При рецедиве последуют санкции!
Разумеется код кривой, и строки добавляются по нескольку раз в стринглист. В первый раз добавляется нормально. Во второй раз, если попробовать добавить туже переменную, она опять добавляется. Помогите
