Q&A

  • enter 시에 폼이 없어져버리는데 말이죠~
도와주세요!!



폼에서 하는 일은 daytimepicker의 onexit 이벤트에서

날짜를 string으로 받아서 edit에 넣고,

sql문을 실행시켜 combobox의 index를 채우고 등등입니다.



그리고 enter 치면 다음 탭순서의 오브젝트로 포커스를 옮기기 위해서

onKeyPress 이벤트에 다음과 같은 코드도 넣었는데 말이죠..

if Key = #13 then begin

Key := #0;

PostMessage(GetFocus, WM_KEYDOWN,VK_TAB, 0);

end;

이런 코드는 폼 위에 있는 다른 오브젝트의 onKeyPress 이벤트에 모두 넣었다구요.



근데, 날짜를 선택하고 엔터를 치건 다른 입력사항(모두 Tedit)을 모두 입력하고 엔터를 치건간에 엔터만 치면 폼이 없어져버려요..

해결방법좀 부탁드립니다..



엇, 근데요~

이 폼의 onActivate 이벤트에 다음과 같은 코드가 있는데요..

if dtAccDate.Enabled then dtAccDate.SetFocus ;

이런게 문제가 되서 그럴까요??

1  COMMENTS
  • Profile
    유효종 2000.01.26 23:54
    뜨아 wrote:

    > 도와주세요!!

    >

    > 폼에서 하는 일은 daytimepicker의 onexit 이벤트에서

    > 날짜를 string으로 받아서 edit에 넣고,

    > sql문을 실행시켜 combobox의 index를 채우고 등등입니다.

    >

    > 그리고 enter 치면 다음 탭순서의 오브젝트로 포커스를 옮기기 위해서

    > onKeyPress 이벤트에 다음과 같은 코드도 넣었는데 말이죠..

    > if Key = #13 then begin

    > Key := #0;

    > PostMessage(GetFocus, WM_KEYDOWN,VK_TAB, 0);

    > end;

    > 이런 코드는 폼 위에 있는 다른 오브젝트의 onKeyPress 이벤트에 모두 넣었다구요.

    >

    > 근데, 날짜를 선택하고 엔터를 치건 다른 입력사항(모두 Tedit)을 모두 입력하고 엔터를 치건간에 엔터만 치면 폼이 없어져버려요..

    > 해결방법좀 부탁드립니다..

    >

    > 엇, 근데요~

    > 이 폼의 onActivate 이벤트에 다음과 같은 코드가 있는데요..

    > if dtAccDate.Enabled then dtAccDate.SetFocus ;

    > 이런게 문제가 되서 그럴까요??



    없어지는 폼에 OK 버튼 이나 Cancel 버튼이 있는가 확인해보세요.

    있다면 아마 프로퍼티에 Default 가 True 로 되어 있을