Changeset 161

Timestamp:

Sep 7, 2007 4:59:29 PM (15 years ago)

Author:

srkline

Message:

Added fit reporting (just the basics) to write the results to the panel. Simply changes the title of GroupBox? elements.

Location:

sans/Analysis/branches/ajj_23APR07/IGOR_Package_Files

Files:

• Put in Igor Help Files/SANS_Model_Docs_v3.01.ihf (modified) (previous)
• Put in User Procedures/SANS_Models_v3.00/Packages/Wrapper.ipf (modified) (2 diffs)

sans/Analysis/branches/ajj_23APR07/IGOR_Package_Files/Put in User Procedures/SANS_Models_v3.00/Packages/Wrapper.ipf

@@ -23 +23 @@
         GroupBox grpBox_0,pos={18,11},size={350,113}
         GroupBox grpBox_1,pos={386,10},size={247,113}
+        GroupBox grpBox_2 title="No Fit",pos={10,130},size={620,1},frame=0,fSize=10,fstyle=1,fColor=(39321,1,1)
+        GroupBox grpBox_3 title="",pos={10,150},size={620,1},frame=0,fSize=10,fstyle=1,fColor=(39321,1,1)
         Button button_0,pos={523,93},size={100,20},proc=DoTheFitButton,title="Do The Fit"
         Button button_1,pos={270,57},size={80,20},proc=PlotModelFunction,title="Plot"
@@ -562 +564 @@
         WAVE w_sigma
         print w_sigma
-        
-
+        String resultStr=""
+                
+        //now re-write the results
+        sprintf resultStr,"Chi^2 = %g  Sqrt(X^2/N) = %g",V_chisq,sqrt(V_chisq/V_Npnts)
+        resultStr = PadString(resultStr,63,0x20)
+        GroupBox grpBox_2 title=resultStr
+        ControlUpdate/W=WrapperPanel grpBox_2
+        sprintf resultStr,"FitErr = %s : FitQuit = %s",W_ErrorMessage(V_FitError),W_QuitMessage(V_FitQuitReason)
+        resultStr = PadString(resultStr,63,0x20)
+        GroupBox grpBox_3 title=resultStr
+        ControlUpdate/W=WrapperPanel grpBox_3
+        
         Variable yesSave=0,yesReport=0
         ControlInfo check_4