제가 지금 하려고 하는 일은 고객table과 거래원장table에서

고객의 코드를 입력하면, 고객정보를 나타내고, 거래원장에서 그 고객에 해당되는

거래 내역만을 DBGrid에 나타내고 싶은데.. filter의 사용에서 문제가 발생합니다.

도와주세요...

다른 님들의 질문을 종합해봐도 계속 에러만 나타나고요..ㅠㅠ

소스까지 올립니다. 틀린 부분을 지적해 주세요...

아님 다른 방법이라도...

-------------------------------------------------------------------------

procedure TFrm_Dechul.DBEdit1KeyPress(Sender: TObject; var Key: Char);

var

chk_code : string; //DBEdit.text에서 고객코드를 받음.

chk_filter : string;//TB_Mast 테이블에서 사용할 필터의 구문의 받는 변수.

begin

if key = #13 then begin

key := #0;

chk_code := Trim(DBEdit1.text);

WITH DM_1.TB_cust DO BEGIN

CANCEL;

SETKEY;

FieldByName('CUST_CODE').AsString := chk_code;

Gotokey;

IF GOTOKEY THEN BEGIN

with DM_1.TB_Mast do begin

{ Cancel;

Setkey;

FieldByName('MST_CSCODE').AsString := chk_code;

GotoKey;}

Filtered := False;

chk_filter := 'MST_CSCODE=''+DBEdit1.text+''';

Filter := chk_filter;

Filtered := True;

end;

END ELSE BEGIN

showmessage('fault');

END;



end;

end;

end;