home *** CD-ROM | disk | FTP | other *** search
- /* 1994 H.Ogasawara(COR.) */
- #include "wlib.h"
-
- ClipGetKeyboardAll( wp, info )
- WindowID wp;
- EventInfo *info;
- {
- if( info->option == EventUser ){
- EventInfo DummyInfo;
- switch( info->ComData ){
- case UserStrings: {
- unsigned char **p= info->ComBuffer;
- for(; *p ;){
- DummyInfo.option= EventUser;
- DummyInfo.ComData= UserString;
- DummyInfo.ComBuffer= *p++;
- WindowSendEvent( wp, &DummyInfo );
- }
- }
- break;
- case UserPaste:
- case UserString: {
- unsigned char *p= info->ComBuffer;
- for(; *p ;){
- DummyInfo.option= EventKey;
- DummyInfo.KeyCode= *p++;
- DummyInfo.ShiftStat= 0;
- WindowSendEvent( wp, &DummyInfo );
- }
- }
- }
- return TRUE;
- }
- return FALSE;
- }
-
-