•Listeners

In[185]:=

(* *)

In[186]:=

listenerFilterBoxFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[187]:=

handlerFilterBoxFilter[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ; fr ... .Box"] ; ProcessEffect[frame, kBox] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[188]:=

listenerFilterBoxFilter @ setHandler["actionPerformed", ToString[handlerFilterBoxFilter]] ;

In[189]:=

itemFilterBoxFilter @ addActionListener[listenerFilterBoxFilter]

In[190]:=

(* *)

In[191]:=

listenerFilterGaussianFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[192]:=

handlerFilterGaussianFilter[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ... quot;] ; ProcessEffect[frame, kGaussian] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[193]:=

listenerFilterGaussianFilter @ setHandler["actionPerformed", ToString[handlerFilterGaussianFilter]] ;

In[194]:=

itemFilterGaussianFilter @ addActionListener[listenerFilterGaussianFilter]

In[195]:=

(* *)

In[196]:=

listenerFilterHighpassFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[197]:=

handlerFilterHighpassFilter[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ... quot;] ; ProcessEffect[frame, kHighpass] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[198]:=

listenerFilterHighpassFilter @ setHandler["actionPerformed", ToString[handlerFilterHighpassFilter]] ;

In[199]:=

itemFilterHighpassFilter @ addActionListener[listenerFilterHighpassFilter]

In[200]:=

(* *)

In[201]:=

listenerFilterUnsharpFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[202]:=

handlerFilterUnsharpFilter[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ; ... "] ; ProcessEffect[frame, kUnsharp] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[203]:=

listenerFilterUnsharpFilter @ setHandler["actionPerformed", ToString[handlerFilterUnsharpFilter]] ;

In[204]:=

itemFilterUnsharpFilter @ addActionListener[listenerFilterUnsharpFilter]

In[205]:=

(* *)

In[206]:=

listenerFilterSmoothingFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[207]:=

handlerFilterSmoothingFilter[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ... uot;] ; ProcessEffect[frame, kSmoothing] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[208]:=

listenerFilterSmoothingFilter @ setHandler["actionPerformed", ToString[handlerFilterSmoothingFilter]] ;

In[209]:=

itemFilterSmoothingFilter @ addActionListener[listenerFilterSmoothingFilter]

In[210]:=

(* *)

In[211]:=

listenerFilterLaplacianOfGaussianFilter = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[212]:=

handlerFilterLaplacianOfGaussianFilter[event_, command_] := Module[ {saved}, saved = frame @ ... ProcessEffect[frame, kLaplacianOfGaussian] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[213]:=

listenerFilterLaplacianOfGaussianFilter @ setHandler["actionPerformed", ToString[handlerFilterLaplacianOfGaussianFilter]] ;

In[214]:=

itemFilterLaplacianOfGaussianFilter @ addActionListener[listenerFilterLaplacianOfGaussianFilter]

In[215]:=

(* *)

In[216]:=

listenerFilterThreshold = JavaNew["JLinkProgramming.JavaSwing.ThreadMathActionListener"]

In[217]:=

handlerFilterThreshold[event_, command_] := Module[ {saved}, saved = frame @ getTitle[] ; fr ... uot;] ; ProcessEffect[frame, kThreshold] ; frame @ setTitle[saved] ; ReleaseObject[event] ; ]

In[218]:=

listenerFilterThreshold @ setHandler["actionPerformed", ToString[handlerFilterThreshold]] ;

In[219]:=

itemFilterThreshold @ addActionListener[listenerFilterThreshold]

Converted by Mathematica  (July 17, 2003)