gbutt.m

来自「求解量子力学的薛定谔方程」· M 代码 · 共 12 行

function h = gbutt(xy,ww,action)
%> This is a standard green button
%> Call:  gbutt(xy,ww,action)
%> Input: xy = position 4-vector [x1  y1  x2-x1  y2-y1]
%> ww = text string, 
%> action = callback as 'close' or 'uiresume' 

h=uicontrol('Style','pushbutton','Units','normalized',...
          'Position',xy,'String',ww,...
          'BackGroundColor',[.0 .7 .0],'ForeGroundColor','r',...
          'Fontsize',12,'Callback',action);