|
OnKeyPress이벤트는 탭키를 처리안합니다.
OnKeyDown이나 OnKeyUp이벤트에서 처리하세요.
초보자 님이 쓰신 글 :
: void __fastcall TFormTEST::Edit_TESTKeyPress( TObject *Sender, wchar_t&Key )
: {
:
: {
: //if(bWorkListOn== true) return;
:
: int EditTag = (dynamic_cast<TEdit*>(Sender)->Tag);
:
:
: if(Key == 0x0D )
: {
: ShowMessage("Enter");
: }
: if(Key == 0x09 || Key == 0x0B)
: ShowMessage("TAB");
:
: if(EditTag==100)
: {
: String checkStringData = this->Edit_Name->Text;
:
:
: if(checkStringData.Length()<1 && 0x20 == Key)
: Key = 0;
: else if( (0x20 < Key && Key < 0x30) || (0x5C == Key || 0x60 == Key) )
: Key = 0;
:
: }
: else
: {
: //특수 문자 처리
: if( (0x1F< Key && Key < 0x28) || (0x29< Key && Key < 0x2D) )
: Key = 0;
: else if( (0x2D< Key && Key < 0x30) || (0x39< Key && Key < 0x40) )
: Key = 0;
: else if( (0x5A< Key && Key < 0x5F) || (0x60== Key ) )
: Key = 0;
: else if( (0x7A< Key && Key < 0x80) )
: Key = 0;
:
: }
: }
:
: }
:
: 들어 가지 않안서요
|