fcnkeyfunc.m

来自「一个matlab mex 文件」· M 代码 · 共 95 行

function fcnkeyfunc(action)
% FCNKEYFUNC M-file for testfcnkey application
%	FCNKEYFUNC implements the callback and keypressfcn 
%	functionalities of the testfcnkey gui application.
%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

switch (action)
    case ('keypress')
         % msgbox('Test');
		 hTxt = findobj('Tag', 'text1');
		 keypressed = wgfcnkey;
		 switch (keypressed)
		     case (0)
		          myText = 'No function key was pressed';
				  myColor = 'k';

			 case (1)
		          myText = 'F1 was pressed';
				  myColor = 'r';

		     case (2)
		          myText = 'F2 was pressed';
				  myColor = 'r';

		     case (3)
		          myText = 'F3 was pressed';
				  myColor = 'r';

		     case (4)
		          myText = 'F4 was pressed';
				  myColor = 'r';

		     case (5)
		          myText = 'F5 was pressed';
				  myColor = 'r';

		     case (6)
		          myText = 'F6 was pressed';
				  myColor = 'r';

		     case (7)
		          myText = 'F7 was pressed';
				  myColor = 'r';

		     case (8)
		          myText = 'F8 was pressed';
				  myColor = 'r';

		     case (9)
		          myText = 'F9 was pressed';
				  myColor = 'r';

		     case (10)
		          myText = 'F10 was pressed';
				  myColor = 'r';

		     case (11)
		          myText = 'F11 was pressed';
				  myColor = 'r';

		     case (12)
		          myText = 'F12 was pressed';
				  myColor = 'r';

			 case (13)
		          myText = 'Left Shift  was pressed';
				  myColor = 'r';

		     case (14)
		          myText = 'Left Ctrl was pressed';
				  myColor = 'r';

		     case (15)
		          myText = 'Left Alt was pressed';
				  myColor = 'r';

		     case (16)
		          myText = 'Right Shift was pressed';
				  myColor = 'r';

		     case (17)
		          myText = 'Right Ctrl was pressed';
				  myColor = 'r';

		     case (18)
		          myText = 'Right Alt was pressed';
				  myColor = 'r';

		 end
		
		set(hTxt, 'String', myText, 'ForegroundColor', myColor);
end