inmatning till databas(delphi)

Hej!

Jag får felmess violation of primary or unique constraint "integ_11" on table "fastighet" när jag ska mata in till databasen, nån som har ett tips?

Här är koden:

procedure TForm1.btnFastighetOkClick(Sender: TObject);
var sqlfraga : string;
begin
sqlfraga := 'insert into fastighet(fastid, adress, postnr, ort, hiss, antvan, byggar)'
+ ' values ('
+ '''' + txtFastId.Text + ''','
+ '''' + txtFastadress.Text + ''','
+ '''' + txtFastPostnr.Text + ''','
+ '''' + txtFastOrt.Text + ''','
+ '''' + cmbFastHiss.Text + ''','
+ '''' + cmbFastAntvan.Text + ''','
+ '''' + txtFastByggar.Text + ''')';

showmessage(sqlfraga);
with DM.InsertQry do
begin
close;
sql.Clear;
sql.add(sqlfraga);
ExecSQL;
close;
end;
DM.IBTransaction1.CommitRetaining;
end;

Tacksam för svar!! :)