02.07.2007, 12:31
|
|
Модератор
|
|
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,906
Версия Delphi: Delphi XE
Репутация: выкл
|
|
Код:
var
s:string //это твоя добавляемая строка
begin
{Some code}
if pos(s,ComboBox.Items.Text)>0 then
ShowMessage('Попытались записать строку повторно!')
else
ComboBox.Items.Append(s);
{Some code}
end;
|