Fórum Erro ao inserir usando a query? #283306

Ola amigos, estou com uma duvida quanto ao query

Eh o seguinte: Quero incluir um novo segurado no db, mais nao esta incluindo, aparece uma mensagem assi: QUERY1: CANNOT MODIFY A READ-ONLY DATASET. Me parece ser uma tabela somente de leitura, mais no botao coloquei como Append, para incluir em branco.

Na propriedade do query1/request live coloquei como true para inserir e na propriedade do query1/cachedupdade deixei como false para nao indexar arquivos, mais nao esta inserrindo aparece o erre acima citado.

na SQL da query1 coloquei somente esse comando SELECT * FROM DECLARA

Nao inclui mais nada nem o ORDER BY, para nao afetar na inclusao de um novo segurado, tambem minha tabela nao possui chave primaria no KEY.

Uso DELPHI 5 E TABELA PARADOX.

O comando que criei eh esse:
procedure Tfcadseg.suiButton5Click(Sender: TObject);
var
proxnum: integer;
begin
if application.messagebox(´Deseja incluir um novo cadastro?´,´Aviso´,36)=idYes
then
begin
query1.Last;
ProxNum:= query1.fieldbyName(´codigo´).AsInteger +1;
query1.Append;
query1.FieldByName(´codigo´).AsInteger :=ProxNum;
fcadseg2.DBEDIT1.SETFOCUS;
fcadseg2.TabSheet1.Show;
end else
query1.close;
end;

Alguem pode me dar uma dica pq nao esta funcionando?

Obrigado a todos e,
Agradeço a Atençao!