안녕하세요
델 초보자입니다.
질문은 에디터박스에서 엔터키를 누르면 그러니까 먼저 주소 를 입력하고
엔터를 치면 라디오그룹에서 4개중 하나를 선택하는데 주소를 입력한후
엔터를 치면 라디오그룹으로 setfocus를 줄려고 하는데
예문...
procedure TfrmHome.edt_addrKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_up then edt_zip.SetFocus;
if (key=vk_down) or (key=vk_return) then radiogroup.setfocus;
end;
라디오그룹으로 focus가 가질 않구 사라져 버립니다.
라디오그룹으로 focus를 주는 방법을 가르쳐 주세요
언젠가는 제가 답변할 날을 기대하며
델초보자 서비 드림
ItemIndex 를 0이상으로 쎄팅해서 디폴트체킹을 하세요
그리고 edit 의 keydown에서
if key = VK_RETURN then then
keybd_event(VK_TAB,MapVirtualkey(VK_TAB, 0),0, 0);
keybd_event(VK_TAB,MapVirtualkey(VK_TAB, 0),KEYEVENTF_KEYUP, 0);
keybd_event(VK_TAB,MapVirtualkey(VK_TAB, 0),0, 0);
keybd_event(VK_TAB,MapVirtualkey(VK_TAB, 0),KEYEVENTF_KEYUP, 0);
end;
오용섭 께서 말씀하시기를...
> 안녕하세요
>
> 델 초보자입니다.
> 질문은 에디터박스에서 엔터키를 누르면 그러니까 먼저 주소 를 입력하고
>
> 엔터를 치면 라디오그룹에서 4개중 하나를 선택하는데 주소를 입력한후
> 엔터를 치면 라디오그룹으로 setfocus를 줄려고 하는데
>
> 예문...
> procedure TfrmHome.edt_addrKeyDown(Sender: TObject; var Key: Word;
> Shift: TShiftState);
> begin
> if key=vk_up then edt_zip.SetFocus;
> if (key=vk_down) or (key=vk_return) then radiogroup.setfocus;
>
> end;
>
> 라디오그룹으로 focus가 가질 않구 사라져 버립니다.
>
> 라디오그룹으로 focus를 주는 방법을 가르쳐 주세요
>
> 언젠가는 제가 답변할 날을 기대하며
> 델초보자 서비 드림