procedure form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
if form1.Edit1.Text = SQLExecute ('SELECT поле FROM таблица WHERE поле = '''+form1.Edit1.Text+'''') then
showmessage('Такое значение уже существует') else
begin
SQLExecute('INSERT INTO таблица (поле) VALUES ('''+form1.Edit1.Text+''')');
end;
UpdateDatabase('таблица');
end;
Если значение вносится с помощью действия "Сохранить запись" то можно на кнопку сохранения повесить событие OnClick, где выбрать все записи и пристрелить последнюю.
procedure form1_btAddRecord_OnClick (Sender: string; var Cancel: boolean);
begin
SQLExecute('DELETE FROM таблица WHERE таблица.поле = ''' + form1.Edit1.Text + ''' AND таблица.id > (SELECT MIN(id) FROM таблица)') ;
end;
Но первый метод, ИМХО, более правильный