Problema de Invalidkey en consulta SQL

[Fenix_Dark]

Hola, buenas noches, tengo el siguiente problema:

al realizar una consulta mediante un Query en delphi7 me aparece un mensaje de error

Project Project1.exe raised exception classs EDBEnginerError with message 'Key Violation.'. Process
stopped. Use Step or Run to continue

aquí les paso el codigo

Query1.Close;

Query1.SQL.Clear;

Query1.SQL.Add('Insert Into MATERIAS(Clave_Materia, Nombre, Creditos, Cupo, Clave_C, Semestre)');

Query1.SQL.Add('Values('''+Edit7.Text +''','''+Edit8.Text +''','''+Edit9.Text +''','''+Edit10.Text +''','''+Edit11.Text +''','''+Edit12.Text +''')');

Query1.ExecSQL;

Query1.Open;


cabe mencionar que los registros sí se insertan, pero despues marca ese error, además la clave no esta repetida.

De ante mano gracias.