아래와 같은 에러가 납니다..

테이블 컴포넌트를 사용하여 데이터들을 에디트박스에 가가 뿌려주는부분이거든요..

Cannot perform this operation on a closed dataset.



소스는 아래와 같습니다..

with EVENT_Table do

begin

If findkey([Query2.FieldByName('LAYER_ITEM').AsString]) = true Then

close;

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

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

Form2.eTEL.Text := FieldByName('item_tel').AsString ;

Form2.eAddr.Text := FieldByName('item_address').AsString ;

Form2.eTour.Text := FieldByName('item_tour').AsString ;

Form2.epark.Text := FieldByName('item_parking').AsString ;

Form2.eopen_mssg1.Text := FieldByName('item_open_mssg_1').AsString ;

Form2.eopen_mssg2.Text := FieldByName('item_open_mssg_2').AsString ;

Form2.eopen_mssg3.Text := FieldByName('item_open_mssg_3').AsString ;

Form2.eopen_mssg4.Text := FieldByName('item_open_mssg_4').AsString ;

Form2.eremark1.Text := FieldByName('item_remark_1').AsString ;

Form2.eremark2.Text := FieldByName('item_remark_2').AsString ;

Form2.eremark3.Text := FieldByName('item_remark_3').AsString ;

Form2.eremark4.Text := FieldByName('item_remark_4').AsString ;

Form2.eURL.Text := FieldByName('item_URL').AsString ;

open;

End;