[igamerpc]

Código Delphi [-]
procedure TForm1.Insertar_Registro_Tabla_1(NTabla:String; cod1:cardinal; nom:string; Sender: TObject); 
begin 
  If MOD.Conexion.Connected = False Then 
    MOD.Conexion.Connected:=True; 
  MOD.Tabla1.TableName := NTabla; 
  MOD.Tabla1.Active := True; 
  MOD.MyCommand1.SQL.Clear; 
  MOD.MyCommand1.sql.Add('INSERT INTO ' + NTabla+ '(CODIGO,NOMBRE) VALUES(:Codigo,:Nombre)'); 
  MOD.MyCommand1.ParamByName('CODIGO').Value := cod1; 
  MOD.MyCommand1.ParamByName('NOMBRE').Value := nom; 
  try // Intentar la operación 
    MOD.MyCommand1.Execute; 
    // Insertar 
    Inc(FCount); // Incrementar el número de registros insertados 
    MOD.Tabla1.Refresh; // Actualizar 
  except 
    on E: Exception do // ¿ Hubo algún error ? 
      Application.ShowException(E); // Mostrarlo 
  end; 
end;

Mismo eso lo quiero es desactivar el primary key para que pueda duplicar en ejecutar delphi 7. Hago en opciones con o sin primary key.
Trabajo delphi 7 con phpmyadmin en localhost.