equal
deleted
inserted
replaced
593 ! |
593 ! |
594 |
594 |
595 isKeyEvent |
595 isKeyEvent |
596 "return true, if this event is a keyboard event" |
596 "return true, if this event is a keyboard event" |
597 |
597 |
598 ^ (type == #keyPress:x:y:) or:[type == #keyRelease:x:y:] |
598 ^ false |
|
599 |
|
600 "Modified: / 28.1.1998 / 00:03:17 / cg" |
599 ! |
601 ! |
600 |
602 |
601 isKeyPressEvent |
603 isKeyPressEvent |
602 "return true, if this event is a keyboard event" |
604 "return true, if this event is a keyboard press event" |
603 |
605 |
604 ^ (type == #keyPress:x:y:) |
606 ^ false |
|
607 |
|
608 "Modified: / 28.1.1998 / 00:03:24 / cg" |
|
609 ! |
|
610 |
|
611 isKeyReleaseEvent |
|
612 "return true, if this event is a keyboard release event" |
|
613 |
|
614 ^ false |
|
615 |
|
616 "Modified: / 28.1.1998 / 00:03:31 / cg" |
605 ! |
617 ! |
606 |
618 |
607 isPointerEnterEvent |
619 isPointerEnterEvent |
608 "return true, if this event is a pointer-enter event" |
620 "return true, if this event is a pointer-enter event" |
609 |
621 |
923 "return true, if this event is a keyboard event" |
935 "return true, if this event is a keyboard event" |
924 |
936 |
925 ^ true |
937 ^ true |
926 |
938 |
927 "Created: 4.4.1997 / 13:39:59 / cg" |
939 "Created: 4.4.1997 / 13:39:59 / cg" |
|
940 ! |
|
941 |
|
942 isKeyPressEvent |
|
943 "return true, if this event is a keyboard press event" |
|
944 |
|
945 ^ (type == #keyPress:x:y:) |
|
946 |
|
947 "Created: / 28.1.1998 / 00:02:40 / cg" |
|
948 "Modified: / 28.1.1998 / 00:02:52 / cg" |
|
949 ! |
|
950 |
|
951 isKeyReleaseEvent |
|
952 "return true, if this event is a keyboard release event" |
|
953 |
|
954 ^ (type == #keyRelease:x:y:) |
|
955 |
|
956 "Created: / 28.1.1998 / 00:02:48 / cg" |
928 ! ! |
957 ! ! |
929 |
958 |
930 !WindowEvent class methodsFor:'documentation'! |
959 !WindowEvent class methodsFor:'documentation'! |
931 |
960 |
932 version |
961 version |
933 ^ '$Header: /cvs/stx/stx/libview/Attic/WEvent.st,v 1.52 1998-01-16 15:07:44 cg Exp $' |
962 ^ '$Header: /cvs/stx/stx/libview/Attic/WEvent.st,v 1.53 1998-01-27 23:03:54 cg Exp $' |
934 ! ! |
963 ! ! |