边缘检测程序(matlab)
% Selectmethod:选择边缘检测方法 % Loadnew Image:读入被选择的图像 % Updatethreshctrl:数据更新 % Updatelogs1ze-:更新与LoG滤波器相关的数据 if nargin<l action='initializeedgedetection'i end: feval(action, varargin turn 号88函数 Initializeedgedetection function Initializeedgedetection() h= findobj (allchild(0),'tag''edgedetectionsoft') if isempty(h) figure(h(1)) return ena screend= get(0,'screendepth)i if screend> 8 grayres=256; else grayres = 128; e Edgedetectionfig= figure( Name','基于差分运算的数字图像边缘检测软件', 'numbertitle','off,' handlevisibility''on' tag','基于差分运算的数字图像边缘检测软件', Visible,'off,'resize','off 'busyaction','queue,'interruptible,'off', Color',[.8.8.8] Integer handle','off. doublebuffer'on', colormap',gray( grayres)) figpos= get( Edgedetectionfig,'position') 调节图像窗口尺寸 figpos(3:4)=[560420]; horizdecorations =10; resize controls, etc vertdecorations=45; s title bar, etc. e- get(0,'screens if(so size(3)<=1 No display connected apparentl y d screens1ze(3:4)=[10000100000]; if(((figpos(3)+ horizdecorations)> screensize(3)) ((figpos(4)+y 窗口尺寸太小 oratio s)> delete( Edgedetectionfig)i creensize(4))) r(['s n resolutio on 1s too or text f d are to g) te n dx screensize(3)- figpos(1)- figpos(3)- horizdecorations; s edgesoft'1) dy= screensize(4)- figpos(2)- figpos(4)-vertdecorationsi