Lang/Delphi

Enter 이벤트 쉽게 적용하기

hamaganatanadda 2022. 8. 27. 13:42

procedure Form1.AllKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
    case key of
        vk_return: perform(wm_NextDlgCtl,0,0); //TAB기능
    end;
end;

작업 후 KeyPress에 넣어주기

TabOrder에 따라서 움직여서 Edit - TabOrder 에서 수정필요

'Lang > Delphi' 카테고리의 다른 글

TEdit SelectAll 동시 컨트롤  (0) 2022.08.27
PostMessage로 자기자신 호출하기  (0) 2022.08.27
Free/nill/Destroy  (0) 2022.08.27
델파이 Cafree  (0) 2022.08.27
edit 박스 속성 컨트롤  (0) 2022.08.27