function hpanel = impixelinfo(varargin) %IMPIXELINFO Pixel information tool. % IMPIXELINFO creates a pixel information tool in the current figure. The % pixel information tool displays information about the pixel in an image that % the cursor is positioned over. The tool can display pixel information for % all the images in a figure. % % The pixel information tool is a uipanel object, positioned in the lower-left % corner of the figure, that contains the text string "Pixel Info" followed by % the pixel information. The information displayed depends on the image type, % as shown below. If the cursor is outside of the image area in the figure, % the pixel information tool displays the default string. % % Image Type Default String Example % ---------- -------------- ----------------- % Intensity (X,Y) Intensity (13,30) 82 % Indexed (X,Y) [R G B] (2,6) <4> [0.29 0.05 0.32] % Binary (X,Y) BW (12,1) 0 % Truecolor (X,Y) [R G B] (19,10) [15 255 10] % % If you want to display pixel information without the "Pixel Info" label, use % IMPIXELINFOVAL. % % IMPIXELINFO(H) creates a pixel information tool in the figure specified by % the handle H, where H is an image, axes, uipanel, or figure object. Axes, % uipanel, or figure objects must contain at least one image object. % % IMPIXELINFO(HPARENT,HIMAGE) creates a pixel information tool in HPARENT that % provides information about the pixels in HIMAGE. HIMAGE is a handle to an % image or an array of image handles. HPARENT is a handle to the figure or % uipanel object that contains the pixel information tool. % % HPANEL = IMPIXELINFO(...) returns a handle to the pixel information tool % uipanel. % % Note % ---- % To copy the pixel information string to the clipboard, right-click % while the cursor is positioned over a pixel. In the context menu, % choose Copy pixel info. % % % Examples % -------- % % h = imshow('hestain.png'); % hp = impixelinfo; % set(hp,'Position',[150 290 300 20]); % % figure % subplot(1,2,1), imshow('liftingbody.png'); % subplot(1,2,2), imshow('autumn.tif'); % impixelinfo % % See also IMPIXELINFOVAL, IMTOOL. % Copyright 1993-2004 The MathWorks, Inc. % $Revision: 1.1.8.1 $ $Date: 2004/08/10 01:49:12 $ [h,parent] = parseInputs(varargin{:}); if strcmp(get(parent,'Type'),'figure') parentIsFigure = true; else parentIsFigure = false; end imageHandles = imhandles(h); hFig = ancestor(h,'Figure'); if iscell(hFig) %hFig will be a cell array if imageHandles is an array, %even though imageHandles may belong to the same figure. hFig = hFig{1}; end if isempty(imageHandles) eid = sprintf('Images:%s:noImageInFigure',mfilename); msg = 'The figure must contain at least one image.'; error(eid,'%s',msg); end hPixInfoPanel = createPanel; % Make sure impixelinfo can update itself if an image has been added to % hFig. %reactToImageChangesInFig(imageHandles,@deleteFcn,@recreateFcn); reactToImageChangesInFig(imageHandles,@deleteFcn); %%%%%%%%%%%%%%%%%% function deleteFcn if ishandle(hPixInfoPanel) delete(hPixInfoPanel); end end %%%%%%%%%%%%%%%%%%%% function recreateFcn imageHandles = findobj(hFig,'type','image'); hPixInfoPanel = createPanel; reactToImageChangesInFig(imageHandles,@deleteFcn); end %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function hPixInfoPanel = createPanel units = 'Pixels'; posPanel = [1 1 300 20]; visibility = 'off'; if parentIsFigure backgrndColor = get(parent,'Color'); else backgrndColor = get(parent,'BackgroundColor'); end fudge = 2; %%% hPixInfoPanel = uipanel('Parent',parent,... 'Units',units, ... 'Position',posPanel,... 'Visible',visibility,... 'Bordertype','none',... 'BackgroundColor', backgrndColor); %%% hPixelInfoLabel = uicontrol('Parent',hPixInfoPanel,... 'Style','text',... 'String','Pixel info:', ... 'Units','pixels',... 'Visible',visibility,... 'BackgroundColor',backgrndColor); labelExtent = get(hPixelInfoLabel,'Extent'); posLabel = [posPanel(1) posPanel(2) labelExtent(3) labelExtent(4)]; set(hPixelInfoLabel,'Position',posLabel); %%% % initialize uicontrol that will contain the pixel info values. hPixelInfoValue = impixelinfoval(hPixInfoPanel,imageHandles); posPixInfoValue = get(hPixelInfoValue,'Position'); set(hPixelInfoValue,'Position',[posLabel(1)+posLabel(3) posPanel(2) ... posPixInfoValue(3) posPixInfoValue(4)]); posPixInfoValue = get(hPixelInfoValue,'Position'); % link visibility of hPixInfoPanel and its children hlink = linkprop([hPixInfoPanel hPixelInfoLabel hPixelInfoValue],... 'Visible'); setappdata(hPixInfoPanel,'linkToChildren',hlink); newPanelWidth = posPixInfoValue(1)+posPixInfoValue(3)+fudge; newPanelHeight = max([posLabel(4) posPixInfoValue(4)]) + 2*fudge; set(hPixInfoPanel,'Position', [posPanel(1) posPanel(2) newPanelWidth ... newPanelHeight]); set(hPixInfoPanel,'Visible','on'); % must be in this function. end if isequal(parent,ancestor(imageHandles,'figure')) && strcmp(get(parent, ... 'Visible'),'on') figure(parent); end if nargout > 0 hpanel = hPixInfoPanel; end end %main function %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function [h,parent] = parseInputs(varargin) iptchecknargin(0,2,nargin,mfilename); switch nargin case 0 %IMPIXELINFO h = get(0, 'CurrentFigure'); if isempty(h) eid = sprintf('Images:%s:noImageInFigure',mfilename); msg = sprintf('%s expects a current figure containing an image.', ... upper(mfilename)); error(eid,'%s',msg); end parent = h; case 1 h = varargin{1}; if ~ishandle(h) eid = sprintf('Images:%s:invalidGraphicsHandle',mfilename); msg = 'H is an invalid graphics handle.'; error(eid,'%s',msg); end parent = ancestor(h,'Figure'); case 2 parent = varargin{1}; if ishandle(parent) type = get(parent,'type'); if ~strcmp(type,'uipanel') && ~strcmp(type,'uicontainer') && ... ~strcmp(type,'figure') eid = sprintf('Images:%s:invalidParent',mfilename); msg = 'HPARENT must be a handle to a UIPANEL or a FIGURE.'; error(eid,'%s%s',msg); end else eid = sprintf('Images:%s:invalidGraphicsHandle',mfilename); msg = 'HPARENT is an invalid graphics handle.'; error(eid,'%s',msg); end h = varargin{2}; checkImageHandleArray(h,mfilename); end end