Doppelte Datensätze verhindern

[Sharky]

Zitat von fkerber:

....Wie kann ich denn die einzelnen Zeilen durchgehen?...

Mache das einfach mit einem Query.

Delphi-Quellcode:

procedure TForm1.Neues_BuchClick(Sender: TObject);  // Neues Buch
begin
  if (Trim(ISBN.Text) <> '') then
  begin
    ABSQuery1.SQL.Text := 'SELECT ISBN FROM buecher WHERE ISBN = :isbn';
    ABSQuery1.ParamCheck := True;
    ABSQuery1.ParamByName('isbn').AsString := ISBN.Text;
    ABSQuery1.Open;
    if (ABSQuery1.RecordCount > 0) then
    begin
      ShowMessage ('Diese ISBN ist schon eingetragen');
    end
    else
    begin
      Trage_das_Buch_ein;
    end;
  end
  else
  begin
    Mache_das_selbe_mit_dem Titel;
  end;
end;

[Edit]Die lösung mit einem Index wie von Jelly vorgeschlagen ist aber besser[/edit]