"Index is read only"
 

Gente, me pone este mensaje cuando quiero insertar un registro, no puedo detectar el error... me ayudan?

Saludos.

Hola, tienes que darnos mas detalles para poder ayudarte, por lo el mesaje debes estar asignando algún valor a una propiedad de solo lectura, muestranos el codigo que utilizas para insertar, que compoentes estas usando.....

Saluditos

...
 

Código Delphi [-]
procedure TFPresentacion.BNuevoClick(Sender: TObject);

Var
 Codigo:Integer;

begin
 Codigo:=0;
 DBEApellidoyNombre.Enabled:=True;
 DBETipoDoc.Enabled:=True;
 DBEDoc.Enabled:=True;
 DBEDecreto.Enabled:=True;
 DBEDuracion.Enabled:=True;
 DBETitulo.Enabled:=True;
 DBEPromedio.Enabled:=True;
 DBEPromPrac.Enabled:=True;
 DBEPromocion.Enabled:=True;
 DBELMatriz.Enabled:=True;
 DBEFolio.Enabled:=True;
 DBEDia.Enabled:=True;
 DBEMes.Enabled:=True;
 DBEAnio.Enabled:=True;
 BInsertar.Enabled:=True;
 CBBuscarpor.Text:='Cod.';
 TBTitulo.IndexFieldNames:='Cod.'; \\Cod. es un campo e indice secundario.
 TBTitulo.First;
  If DBECod.Text='' Then
   Begin
    TBTitulo.Append;
    TBTitulo ['Cod.']:='1';
    DBEApellidoyNombre.SetFocus;
    BNuevo.Enabled:=False;
   End
  Else
   Begin
    TBTitulo.Last;
    Codigo:= strtoint(DBECod.Text);
    TBtitulo.Append;
    DBECod.Text:= inttostr (Codigo + 1);
    DBEApellidoyNombre.SetFocus;
    BNuevo.Enabled:=False;
   End;
end;

Este es el código caro. La verdad nunca me pasó esto... Y pruebo y pruebo y no pasa nada.
Estoy por hacer la tabla de nuevo para ver si el problema está ahí y si asigné alguna propiedad errada. El asunto es que cuando presiono el boton "Insertar" que contiene el código "TBTitulo.Post;" aparece ese mensaje...

Gracias caro por contestar...

Saludos.

¿Qué base de datos usas? Si es paradox quizá te sirva esto?

// Saludos

Es Paradox... Ahora me estoy fijando...

Si... Ahí está!!! Podes creer que fue eso mismo?

Claro, la hice tan apurado a esta tabla que hice los indices secundarios y no asigné los primarios!!!

Que tonto...

Gracias por la ayuda amigos...

Saludos.