H� um m�s que estou com esta d�vida

Question

Por favor como fa�o para tratar este erro:
Couldn�t perform the edit because another user changed the record

Estou usando Delphi 5 e Mysql e a tabela sempre � aberta e colocada em modo EDIT.

Jonny_x · Answer

procedure TForm1.FormCreate(Sender: TObject);
begin
if table1.State = (dsEdit) then
begin
table1.close;
end;
end;

end.

isso s�o os tipos qu a tabela pode estar
type TDataSetState = (dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead, dsInternalCalc, dsOpening);

Anonymous · Answer

Cara eu tentei algo parecido e n�o deu certo, mas mesmo assim muito obrigado. Vou usar esta rotina agora. Se vc precisar de algo, pode mandar para hacson@bol.com.br.   Valeu mano!!!!!!...

Anonymous · Answer

pelo amor de deus...

Anonymous · Answer

alguem me ajude pelo amor de deus...

Ildefonso · Answer

Ol�, Hacson.N�o sei se h� algo de especial no MySQL, principalmente usando IBX (se for o caso), mas quando uso o ADO, este erro aparece algumas vezes, principalmente quando:[list=1:e37a4ab0a7][*:e37a4ab0a7]Acrescento um registro e o salvo ou edito um registro e o salvo... um novo Edit ou Append n�o funciona;[*:e37a4ab0a7]Envio uma SQL que altera os dados de uma das tabelas da consulta;[/list:o:e37a4ab0a7]Nestes casos, verifico se .State � algo como dsEdit ou dsInsert... Em um desses, simplesmente envio um .Cancel e em seguida um .Refresh . Em seguida o DataSet j� est� pronto para nova edi��o.Se der certo, coloque uma resposta aqui para sabermos que est� � uma solu��o que funciona em outros casos, tamb�m.Bom trabalho.  8)...

Anonymous · Answer

Ainda n�o deu resultado. Olha a sequ�ncia de grava��o que eu utilizo:

1� Verifico o estado da tabela:
if (TItem.State = dsInactive) then
TItem.Open;

2� Coloco em modo de edi��o:
if (TItem.State <> dsEdit) then
TItem.Edit;

3� Efetuo a grava��o e fecho a tabela:
if TItem.State = dsEdit then
TItem.Post;
TItem.Close;

4� No evento onclose, abro e dou um refresh:
TItem.Filtered := False;
TItem.Open;
TItem.Refresh;

S� o que consegui foi atrasar o erro. Agora o usu�rio pode passar pelo form duas vezes.
Existe alguma outra solu��o?

Valeu pelas dicas.

Anonymous · Answer

Hacson Alexandre1� Verifico o estado da tabela:  if (TItem.State = dsInactive) then       TItem.Open;2� Coloco em modo de edi��o:  if (TItem.State <> dsEdit) then        TItem.Edit;3� Efetuo a grava��o e fecho a tabela:  if TItem.State = dsEdit then      TItem.Post;3.1� Coloque um       TItem.ApplyUpdate(0);       TItem.Refresh;      TItem.Close;O que pode tambem estar acontecendo � a vers�o do Delphi que voc� estiver utilizando. Eu consegui efetuar as atualiza��es, utilizando o TSimpleDataSet do Delphi 6....