김동국 wrote:

> 그동안 이 싸이트에서 많은 조언들을 참고로 회원관리

> 프로그램을 습작하고 있습니다.

> 잘 되면 제가 운영하는 골프연습장에서 사용해 볼려구요.

>

> 그런데 다중테이블 조인에서 진척이 되질 않네요.

> 제가 프로그램 하는중

>

> form1에서 dbedit, combobox를 이용한 회원입력 그룹과

> 검색된 회원의 회비납부내역을 Dbgrid에 보이게 조인하려고

> 하는데...

>

> 문제1. form1(회원등록 또는 조회)에서 form2(회비등록)를 불러

> 회원이름 등록일등을 가져오는것까지는 되는데

> click하면 가져온 데이터가 지워지는 문제.

>

> 문제2. form1에서 회원이름을 검색하면 DbGrid에서 해당회원의

> 월별 회비납부내역을 보이게하는 join문제.

>

> 이런 문제들을 풀지 못하고 있습니다.

>

> 간단한 샘플이 있으면 좋겠네요.

>

> 참 db엔진은 파라독스입니다.

>

> 고수님들의 많은 조언 부탁 드립니다.

>



울트라 캡 왕 초보 어피리입니다.

매일 질문만 하다가 용기를 내서 답변 한번 할려구여. ^^



간단히 회원과 회비 납입 내용만 볼께여



회원 DB :



회원 코드 Code

회원 이름 Name

회원 등록일 Dates

회원 주소 Addr





회비 DB:



회비 코드 Code

회원 코드 MemberCode

납부 일자 Dates

금액 Cost



이런식으로 DB를 구성하구여.



회비 납부 내역 등록에서는



begin

With tbCost do

begin

Append;

FieldByName('MemberCode').AsInteger := tbMember.FieldByName('Code').AsInteger;

FieldByName('Date').AsDateTime := dtpDate.Date;

FieldByName('Cost').AsFloat := ceCost.Value;

end;

end;



그리고 이름으로 검색해서 납부 내역을 보여 줄때는



begin

if (edSearchMemberName.Text > '')

And (tbCost.FindKey([edSearchMemberName.Text])) then

begin

tbCost.Filter := 'MemberCode =' + ''''

+tbMember.FieldByName('Code').AsInteger+ '''';

end else ShowMessage("회원명을 입력하지 않았거나 찾는 회원명이 없읍니다.");

end;



이렇게 하면 회비 납부 그리드에는 조회한 회원의 납부내역이 뿌려 지겠져.

물론 필터를 쓸 경우에는 TTable의 Filterd 프로퍼티가 True로 돼야 겟져.



답변이 넘 허술하네여.. 메일 주세여 ^^