Q&A

  • 동시에 두개키가 눌렸을때 처리....
폼 위에서 동시에 화살표키 위와 오른쪽이 눌렸을때는

메세지를 보여주고 싶다면 어찌해야 하는지요...?



3  COMMENTS
  • Profile
    xdelphi 2001.01.10 04:01
    과객 wrote:

    > 폼 위에서 동시에 화살표키 위와 오른쪽이 눌렸을때는

    > 메세지를 보여주고 싶다면 어찌해야 하는지요...?

    >



    Ctrl키와 방향키위쪽이 눌러진건데요....조금만 응용하시면 원하시는 답이 나올까요??



    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;

    Shift: TShiftState);

    begin



    if Shift = [ssCtrl] then begin //Ctrl키...

    if key = VK_UP then ShowMessage('눌러졌네요~~~');

    end;



    end;

  • Profile
    과객 2001.01.10 04:11
    xdelphi wrote:

    > 과객 wrote:

    > > 폼 위에서 동시에 화살표키 위와 오른쪽이 눌렸을때는

    > > 메세지를 보여주고 싶다면 어찌해야 하는지요...?

    > >

    >

    > Ctrl키와 방향키위쪽이 눌러진건데요....조금만 응용하시면 원하시는 답이 나올까요??

    >

    > procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;

    > Shift: TShiftState);

    > begin

    >

    > if Shift = [ssCtrl] then begin //Ctrl키...

    > if key = VK_UP then ShowMessage('눌러졌네요~~~');

    > end;

    >

    > end;



    그래도 안되는데여...?



  • Profile
    액션가면 2001.01.10 23:22


    그러니 되네염^^



    과객 wrote:

    > xdelphi wrote:

    > > 과객 wrote:

    > > > 폼 위에서 동시에 화살표키 위와 오른쪽이 눌렸을때는

    > > > 메세지를 보여주고 싶다면 어찌해야 하는지요...?

    > > >

    > >

    > > Ctrl키와 방향키위쪽이 눌러진건데요....조금만 응용하시면 원하시는 답이 나올까요??

    > >

    > > procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;

    > > Shift: TShiftState);

    > > begin

    > >

    > > if Shift = [ssCtrl] then begin //Ctrl키...

    > > if key = VK_UP then ShowMessage('눌러졌네요~~~');

    > > end;

    > >

    > > end;

    >

    > 그래도 안되는데여...?

    >