Project Korm02pe.exe raised exception class EDBEngineError with message

'Couldn't perform the edit because another user changed the record.'. Process stopped. Use Step or Run

to continue.

이러한 에러가 나염...

아래 소스에서 맨~~~~~~~ 끝에 end를 지날때 에러가 나거든여~ 왜이런지.. 헐~

아시는분 갈켜주세염... ㅠ.ㅠ



function TForm1.User_ToTable: Boolean;

begin

Result := True;



With PostTable Do

Begin

if FindKey([Query2.FieldByName('LAYER_CLASS').AsString,

Query2.FieldByName('LAYER_ITEM').AsString]) = false then



Else

Edit;

FieldByName('LAYER_ITEM').AsString := eITEM.Text;

FieldByName('LAYER_NAME').AsString := eNAME.Text;

FieldByName('LAYER_X').AsFloat := eLAYER_X.VALUE;

FieldByName('LAYER_Y').AsFloat := eLAYER_Y.VALUE;

FieldByName('LAYER_SYMBOL').AsString := eLAYER_SYM.Text;

FieldByName('LAYER_SYMBOL_X').AsFloat := eSYMBOL_X.VALUE;

FieldByName('LAYER_SYMBOL_Y').AsFloat := eSYMBOL_Y.VALUE;

FieldByName('LAYER_MAP_LEVEL').AsFloat := eMAP_LEVEL.VALUE;

FieldByName('LAYER_URL').AsString := eURL.Text;

FieldByName('LAYER_EVENT').AsString := eEVENT.Text;

FieldByName('LAYER_COLOR1').AsFloat := eCOLOR1.VALUE;

FieldByName('LAYER_COLOR2').AsFloat := eCOLOR2.VALUE;

FieldByName('LAYER_COLOR3').AsFloat := eCOLOR3.VALUE;

Post;

End;



PostTable.refresh;