Slet post i database.

Da jeg laver en adressebog i Delphi, vil jeg have at der skal være en funktion, som skal slette personer, hvis man ikke vil have dem i adressebogen mere. Adressebogen ligger som en database, så jeg skal altså kunne slette personerne i databasen via mit program. Problemet er bare, at posterne i databasen jo ikke er unikke, så jeg bliver nødt til at identifisere personerne via en autonøgle. Dette nummer kan jo også skifte, så man kan ikke regne med at post nummer 1 i min tabel (som viser adressebogen i programmet) har nøglenummer 1 i databasen. Hvordan løser jeg dette problem? Jeg har prøvet følgende:

private
    { Private declarations }
  public
    { Public declarations }
    adrid: array of integer;
  end;

var
  Form1: TForm1;
  celle: integer;

procedure TForm1.FormCreate(Sender: TObject);
var
t: integer;
begin
ADOConnection1.Open;
try
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM adressebog');
ADOQuery1.Open;
t:=0;
while not ADOQuery1.EOF do
begin
adrid[t]:= ADOQuery1.Fieldbyname('adressebogid').AsInteger;
ADOQuery1.Next;
inc(t);
end;
finally
ADOQuery1.Close;
end;
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
celle:=ARow;
end;

procedure TForm1.ButtonsletClick(Sender: TObject);
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('DELETE * FROM adressebog WHERE '+inttostr(adrid[celle]));
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
ADOConnection1.Close;
end;

end.

Det giver dog en "Access Violation at address 00498A7C in module 'Project1.exe' og den markerer sætningen adrid[t]:= ADOQuery1.Fieldbyname('adressebogid').AsInteger; Det bliver jeg jo ikke meget klogere af! Nogen ideer?