Q&A

  • ◆◆델초보 좀 도와주세염!!! 꼭꼭!!!◆ ◆ <<질문수정했습니당>>
안녕하세여.저는 델초보 info임다...

고수님들의 도움이 필요함니당!!!



부서DB와 사원DB가 있거든요



부서DB의 코드필드와 부서명필드에는 다음의 데이타가 있습니다.

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

코드 |부서명

1 |총무팀

2 |홍보팀 --------------->이건 부서DB입니다.

3 |영업팀

4 |경리팀

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



사원DB에는 사번,부서..필드가 있습니다.



신규사원입력할때 Editbox안에 '1'을 치면 "사원DB"의 부서필드에는 '총무팀'이라고 들어가길 원합니다.물론 소스안에 부서명을 박아버리는게 아니라 순수하게 DB 끼리 조인되게 하는 걸루요... 참고로 Query를 이용하구 있습니다.

제가 제선에서 해볼수 있는 방법은 해봤지만 역쉬 저같은 초보에겐 무리더라구여...

고수님들의 답변 기다릴께여!~~~



~~~~지금까지 고수님들의 가르침을 받고자하는 info여씀다.~~~~



1  COMMENTS
  • Profile
    송기원 2001.04.27 00:12
    info wrote:

    > 안녕하세여.저는 델초보 info임다...

    > 고수님들의 도움이 필요함니당!!!

    > -----------------

    > code | Name

    > 1 |총무팀

    > 2 |홍보팀

    > 3 |영업팀

    > 4 |경리팀

    > -----------------

    > 부서DB와 사원DB가 있거든요

    >

    > 신규사원입력할때 Editbox안에 '1'을 치면 사원DB의 부서필드에는 '총무팀'이라고 들어가길 원합니다.물론 소스안에 부서이름을 박아버리는게 아니라 순수하게 DB 끼리 조인되게 하는 걸루요... 참고로 Query를 이용하구 있습니다.

    > 제가 제선에서 해볼수 있는 방법은 해봤지만 역쉬 저같은 초보에겐 무리더라구여...

    > 고수님들의 답변 기다릴께여!~~~

    >

    > ~~~~지금까지 고수님들의 가르침을 받고자하는 info여씀다.~~~~

    >



    사번EditBox keypress Event에



    if key = #13 then

    Begin

    with query do

    Begin

    query.close;

    sql.add(format('select 부서명 from 부서테이블 where 부서코드 = ''%s''',[사번edit.text]));

    open;

    if isEmpty then Begin showMessage('등록되지 않는 부서코드입니다'); exit; end

    else 부서명edit.text := fields[0].asstring;

    end;

    end;



    요렇게 하면 될것 같은데요...

    근데 통상...위의 keypress Event에만 코딩을 하시면 엔터키를 누르면 위의 코드가

    실행되지만 마우스로 다른 곳을 클릭하면 위의 이벤트가 발생하지 않음으로

    loseFocus(??) 요 이벤트에도 같이 걸어 놓어 두심이.....

    기냥 참고하세요..