hola, al menos en teoria lo que debes hacer es antes de introducir el elemento chequeando que no este y si es asi introducirlo....
yo haria una function llamada buscar en combo
Código SQL
[-]function TFrmCancelRetiroLotes.Buscar_en_combo(Elemento: string): boolean;
var
i:integer;
encontrado:boolean;
begin
encontrado:=false;
for i:=0 to combo.Items.Count-1 do
begin
if Elemento = combo.Items.Item[i].Caption then
begin
encontrado:=true;
break;
end;
end;
Result:=encontrado;
end;
luego antes de introducir el elemento
haria algo asi
Código SQL
[-]Encontrado:=buscar_en_Combo(TEdit.text);
if not Encontrado then
begin
//aca el codigo para introducir el elemento eso ya lo tienes ......
end;
Espero que te sirva....
Saludos....