pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

LazStats: Bring menu items and their OnExecute event handlers in MainUnit into logical order.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7792 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-10-22 13:04:44 +00:00
parent e04a433d41
commit f495e6fb12
2 changed files with 559 additions and 504 deletions
Download Patch File Download Diff File Expand all files Collapse all files

434
applications/lazstats/source/forms/mainunit.lfm
View File

@ -20,7 +20,7 @@ object OS3MainFrm: TOS3MainFrm
OnDestroy = FormDestroy OnDestroy = FormDestroy
OnShow = FormShow OnShow = FormShow
LCLVersion = '2.1.0.0' LCLVersion = '2.1.0.0'
object Panel1: TPanel object PanelTop: TPanel
Left = 0 Left = 0
Height = 35 Height = 35
Top = 0 Top = 0
@ -30,9 +30,9 @@ object OS3MainFrm: TOS3MainFrm
ClientHeight = 35 ClientHeight = 35
ClientWidth = 725 ClientWidth = 725
TabOrder = 0 TabOrder = 0
object Label1: TLabel object NoCasesLabel: TLabel
AnchorSideLeft.Control = Panel1 AnchorSideLeft.Control = PanelTop
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 12 Left = 12
Height = 14 Height = 14
@ -42,10 +42,10 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'No. Cases' Caption = 'No. Cases'
ParentColor = False ParentColor = False
end end
object Label2: TLabel object NoVarsLabel: TLabel
AnchorSideLeft.Control = NoCasesEdit AnchorSideLeft.Control = NoCasesEdit
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 139 Left = 139
Height = 14 Height = 14
@ -55,10 +55,10 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'No. Variables' Caption = 'No. Variables'
ParentColor = False ParentColor = False
end end
object Label3: TLabel object CurrentFileLabel: TLabel
AnchorSideLeft.Control = NoVarsEdit AnchorSideLeft.Control = NoVarsEdit
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 302 Left = 302
Height = 14 Height = 14
@ -69,9 +69,9 @@ object OS3MainFrm: TOS3MainFrm
ParentColor = False ParentColor = False
end end
object NoCasesEdit: TEdit object NoCasesEdit: TEdit
AnchorSideLeft.Control = Label1 AnchorSideLeft.Control = NoCasesLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 83 Left = 83
Height = 22 Height = 22
@ -84,9 +84,9 @@ object OS3MainFrm: TOS3MainFrm
Text = 'NoCasesEdit' Text = 'NoCasesEdit'
end end
object NoVarsEdit: TEdit object NoVarsEdit: TEdit
AnchorSideLeft.Control = Label2 AnchorSideLeft.Control = NoVarsLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 238 Left = 238
Height = 22 Height = 22
@ -99,11 +99,11 @@ object OS3MainFrm: TOS3MainFrm
Text = 'NoVarsEdit' Text = 'NoVarsEdit'
end end
object FileNameEdit: TEdit object FileNameEdit: TEdit
AnchorSideLeft.Control = Label3 AnchorSideLeft.Control = CurrentFileLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1 AnchorSideTop.Control = PanelTop
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Panel1 AnchorSideRight.Control = PanelTop
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 401 Left = 401
Height = 22 Height = 22
@ -117,7 +117,7 @@ object OS3MainFrm: TOS3MainFrm
Text = 'FileNameEdit' Text = 'FileNameEdit'
end end
end end
object Panel2: TPanel object PanelBottom: TPanel
Left = 0 Left = 0
Height = 41 Height = 41
Top = 458 Top = 458
@ -127,9 +127,9 @@ object OS3MainFrm: TOS3MainFrm
ClientHeight = 41 ClientHeight = 41
ClientWidth = 725 ClientWidth = 725
TabOrder = 1 TabOrder = 1
object Label4: TLabel object RowLabel: TLabel
AnchorSideLeft.Control = Panel2 AnchorSideLeft.Control = PanelBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 12 Left = 12
Height = 14 Height = 14
@ -139,10 +139,10 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Row:' Caption = 'Row:'
ParentColor = False ParentColor = False
end end
object Label5: TLabel object ColLabel: TLabel
AnchorSideLeft.Control = RowEdit AnchorSideLeft.Control = RowEdit
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 137 Left = 137
Height = 14 Height = 14
@ -152,10 +152,10 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Column:' Caption = 'Column:'
ParentColor = False ParentColor = False
end end
object Label6: TLabel object FilterLabel: TLabel
AnchorSideLeft.Control = ColEdit AnchorSideLeft.Control = ColEdit
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 275 Left = 275
Height = 14 Height = 14
@ -166,9 +166,9 @@ object OS3MainFrm: TOS3MainFrm
ParentColor = False ParentColor = False
end end
object RowEdit: TEdit object RowEdit: TEdit
AnchorSideLeft.Control = Label4 AnchorSideLeft.Control = RowLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 48 Left = 48
Height = 22 Height = 22
@ -181,9 +181,9 @@ object OS3MainFrm: TOS3MainFrm
Text = 'RowEdit' Text = 'RowEdit'
end end
object ColEdit: TEdit object ColEdit: TEdit
AnchorSideLeft.Control = Label5 AnchorSideLeft.Control = ColLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 194 Left = 194
Height = 22 Height = 22
@ -196,9 +196,9 @@ object OS3MainFrm: TOS3MainFrm
Text = 'ColEdit' Text = 'ColEdit'
end end
object FilterEdit: TEdit object FilterEdit: TEdit
AnchorSideLeft.Control = Label6 AnchorSideLeft.Control = FilterLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = PanelBottom
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 374 Left = 374
Height = 22 Height = 22
@ -266,30 +266,30 @@ object OS3MainFrm: TOS3MainFrm
object mnuFileImport: TMenuItem object mnuFileImport: TMenuItem
Caption = 'Import File of Type' Caption = 'Import File of Type'
object mnuFileImportTAB: TMenuItem object mnuFileImportTAB: TMenuItem
Caption = 'TAB Separated' Caption = 'Tab Separated (*.tab)'
OnClick = mnuFileImportTABClick OnClick = mnuFileImportTABClick
end end
object mnuFileImportCSV: TMenuItem object mnuFileImportCSV: TMenuItem
Caption = 'Comma Separated' Caption = 'Comma Separated (*.csv)'
OnClick = mnuFileImportCSVClick OnClick = mnuFileImportCSVClick
end end
object mnuFileImportSSV: TMenuItem object mnuFileImportSSV: TMenuItem
Caption = 'Space Separated' Caption = 'Space Separated (*.ss)'
OnClick = mnuFileImportSSVClick OnClick = mnuFileImportSSVClick
end end
end end
object mnuFileExport: TMenuItem object mnuFileExport: TMenuItem
Caption = 'Export File of Type' Caption = 'Export File of Type'
object mnuFileExportTab: TMenuItem object mnuFileExportTab: TMenuItem
Caption = 'Tab Separated' Caption = 'Tab Separated (*.tab)'
OnClick = mnuFileExportTabClick OnClick = mnuFileExportTabClick
end end
object mnuFileExportCSV: TMenuItem object mnuFileExportCSV: TMenuItem
Caption = 'Comma Separated' Caption = 'Comma Separated (*.csv)'
OnClick = mnuFileExportCSVClick OnClick = mnuFileExportCSVClick
end end
object mnuFileExportSSV: TMenuItem object mnuFileExportSSV: TMenuItem
Caption = 'Space Separated' Caption = 'Space Separated (*.ss)'
OnClick = mnuFileExportSSVClick OnClick = mnuFileExportSSVClick
end end
end end
@ -452,7 +452,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Distribution Statistics' Caption = 'Distribution Statistics'
OnClick = mnuAnalysisDescr_DistribStatsClick OnClick = mnuAnalysisDescr_DistribStatsClick
end end
object MenuItem4: TMenuItem object mnuAnalysisDescr_Separator1: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisDescr_Freq: TMenuItem object mnuAnalysisDescr_Freq: TMenuItem
@ -463,7 +463,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Plot Group Frequencies' Caption = 'Plot Group Frequencies'
OnClick = mnuAnalysisDescr_GrpFreqClick OnClick = mnuAnalysisDescr_GrpFreqClick
end end
object MenuItem5: TMenuItem object mnuAnalysisDescr_Separator2: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisDescr_PlotXvsY: TMenuItem object mnuAnalysisDescr_PlotXvsY: TMenuItem
@ -489,7 +489,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Repeated Measures Bubble Plot' Caption = 'Repeated Measures Bubble Plot'
OnClick = mnuAnalysisDescr_BubblePlotClick OnClick = mnuAnalysisDescr_BubblePlotClick
end end
object MenuItem6: TMenuItem object mnuAnalysisDescr_Separator4: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisDescr_CrossTabs: TMenuItem object mnuAnalysisDescr_CrossTabs: TMenuItem
@ -500,7 +500,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Breakdown' Caption = 'Breakdown'
OnClick = mnuAnalysisDescr_BreakdownClick OnClick = mnuAnalysisDescr_BreakdownClick
end end
object MenuItem13: TMenuItem object mnuAnalysisDescr_Separator5: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisDescr_Normality: TMenuItem object mnuAnalysisDescr_Normality: TMenuItem
@ -511,7 +511,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Compare Distributions' Caption = 'Compare Distributions'
OnClick = mnuAnalysisDescr_CompareDistsClick OnClick = mnuAnalysisDescr_CompareDistsClick
end end
object MenuItem16: TMenuItem object mnuAnalysisDescr_Separator6: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisDescr_StemLeaf: TMenuItem object mnuAnalysisDescr_StemLeaf: TMenuItem
@ -538,82 +538,84 @@ object OS3MainFrm: TOS3MainFrm
OnClick = mnuAnalysisDescr_DataSmoothClick OnClick = mnuAnalysisDescr_DataSmoothClick
end end
end end
object OneSampTests: TMenuItem object mnuAnalysisOneSampleTests: TMenuItem
Caption = 'One Sample Tests' Caption = 'One Sample Tests'
OnClick = OneSampTestsClick OnClick = mnuAnalysisOneSampleTestsClick
end end
object MenuItem34: TMenuItem object mnuAnalysisComp: TMenuItem
Caption = 'Comparisons' Caption = 'Comparisons'
object PropDiff: TMenuItem object mnuAnalysisComp_PropDiff: TMenuItem
Caption = 'Difference beween Proportions' Caption = 'Difference beween Proportions'
OnClick = PropDiffClick OnClick = mnuAnalysisComp_PropDiffClick
end end
object CorrDiff: TMenuItem object mnuAnalysisComp_CorrDiff: TMenuItem
Caption = 'Difference Between Correlations' Caption = 'Difference Between Correlations'
OnClick = CorrDiffClick RadioItem = True
OnClick = mnuAnalysisComp_CorrDiffClick
end end
object ttests: TMenuItem object mnuAnalysisComp_tTests: TMenuItem
Caption = 't-tests' Caption = 't-tests'
OnClick = ttestsClick RadioItem = True
OnClick = mnuAnalysisComp_tTestsClick
end end
object Anova: TMenuItem object mnuAnalysisComp_Anova: TMenuItem
Caption = '1,2 or 3 Way ANOVAs' Caption = '1,2 or 3 Way ANOVAs'
OnClick = AnovaClick OnClick = mnuAnalysisComp_AnovaClick
end end
object WithinAnova: TMenuItem object mnuAnalysisComp_WithinAnova: TMenuItem
Caption = 'Within Subjects ANOVA' Caption = 'Within Subjects ANOVA'
OnClick = WithinAnovaClick OnClick = mnuAnalysisComp_WithinAnovaClick
end end
object AxSAnova: TMenuItem object mnuAnalysisComp_AxSAnova: TMenuItem
Caption = 'A x S ANOVA' Caption = 'A x S ANOVA'
OnClick = AxSAnovaClick OnClick = mnuAnalysisComp_AxSAnovaClick
end end
object ABSAnova: TMenuItem object mnuAnalysisComp_ABSAnova: TMenuItem
Caption = 'A x B x S ANOVA' Caption = 'A x B x S ANOVA'
OnClick = ABSAnovaClick OnClick = mnuAnalysisComp_ABSAnovaClick
end end
object BinA: TMenuItem object mnuAnalysisComp_BinA: TMenuItem
Caption = 'B Nested in A ANOVA' Caption = 'B Nested in A ANOVA'
OnClick = BinAClick OnClick = mnuAnalysisComp_BinAClick
end end
object NestedABC: TMenuItem object mnuAnalysisComp_NestedABC: TMenuItem
Caption = 'ABC ANOVA with B Nested in A' Caption = 'ABC ANOVA with B Nested in A'
OnClick = NestedABCClick OnClick = mnuAnalysisComp_NestedABCClick
end end
object OneCaseAnova: TMenuItem object mnuAnalysisComp_OneCaseAnova: TMenuItem
Caption = '2 or 3 Way ANOVA with One Case Per Cell' Caption = '2 or 3 Way ANOVA with One Case Per Cell'
OnClick = OneCaseAnovaClick OnClick = mnuAnalysisComp_OneCaseAnovaClick
end end
object Ancova: TMenuItem object mnuAnalysisComp_Ancova: TMenuItem
Caption = 'ANCOVA by Regression' Caption = 'ANCOVA by Regression'
OnClick = AncovaClick OnClick = mnuAnalysisComp_AncovaClick
end end
object GLM: TMenuItem object mnuAnalysisComp_GLM: TMenuItem
Caption = 'General Linear Model' Caption = 'General Linear Model'
OnClick = GLMClick OnClick = mnuAnalysisComp_GLMClick
end end
object LatinSquares: TMenuItem object mnuAnalysisComp_LatinSquares: TMenuItem
Caption = 'Latin and Greco-Latin Squares' Caption = 'Latin and Greco-Latin Squares'
OnClick = LatinSquaresClick OnClick = mnuAnalysisComp_LatinSquaresClick
end end
end end
object MenuItem35: TMenuItem object mnuAnalysisCorrel: TMenuItem
Caption = 'Correlation' Caption = 'Correlation'
object MenuItem71: TMenuItem object mnuAnalysisCorrel_ProductMoment: TMenuItem
Caption = 'Product-Moment' Caption = 'Product-Moment'
OnClick = MenuItem71Click OnClick = mnuAnalysisCorrel_ProductMomentClick
end end
object MenuItem72: TMenuItem object mnuAnalysisCorrel_Partial: TMenuItem
Caption = 'Partial, Semipartial' Caption = 'Partial, Semipartial'
OnClick = MenuItem72Click OnClick = mnuAnalysisCorrel_PartialClick
end end
object MenuItem73: TMenuItem object mnuAnalysisCorrel_AutoCorr: TMenuItem
Caption = 'Autocorrelation' Caption = 'Autocorrelation'
OnClick = MenuItem73Click OnClick = mnuAnalysisCorrel_AutoCorrClick
end end
object MenuItem74: TMenuItem object mnuAnalysisCorrel_Canonical: TMenuItem
Caption = 'Canonical' Caption = 'Canonical'
OnClick = MenuItem74Click OnClick = mnuAnalysisCorrel_CanonicalClick
end end
end end
object mnuAnalysisMultReg: TMenuItem object mnuAnalysisMultReg: TMenuItem
@ -658,7 +660,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Weighted Least Squares Regression' Caption = 'Weighted Least Squares Regression'
OnClick = mnuAnalysisMultReg_WeightedClick OnClick = mnuAnalysisMultReg_WeightedClick
end end
object MenuItem2: TMenuItem object mnuAnalysisMultReg_Separator1: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisMultReg_LinProg: TMenuItem object mnuAnalysisMultReg_LinProg: TMenuItem
@ -666,225 +668,225 @@ object OS3MainFrm: TOS3MainFrm
OnClick = mnuAnalysisMultReg_LinProgClick OnClick = mnuAnalysisMultReg_LinProgClick
end end
end end
object MenuItem37: TMenuItem object mnuAnalysisMulti: TMenuItem
Caption = 'Multivariate' Caption = 'Multivariate'
object MenuItem83: TMenuItem object mnuAnalysisMulti_MANOVA: TMenuItem
Caption = 'MANOVA / Discriminant Function' Caption = 'MANOVA / Discriminant Function'
OnClick = MenuItem83Click OnClick = mnuAnalysisMulti_MANOVAClick
end end
object MenuItem84: TMenuItem object mnuAnalysisMulti_Hierarchical: TMenuItem
Caption = 'Hierarchical Analysis' Caption = 'Hierarchical Analysis'
OnClick = MenuItem84Click OnClick = mnuAnalysisMulti_HierarchicalClick
end end
object MenuItem29: TMenuItem object mnuAnalysisMulti_AvgLink: TMenuItem
Caption = 'Average Link Clustering' Caption = 'Average Link Clustering'
OnClick = MenuItem29Click OnClick = mnuAnalysisMulti_AvgLinkClick
end end
object MenuItem31: TMenuItem object mnuAnalysisMulti_KMeans: TMenuItem
Caption = 'K Means Clustering' Caption = 'K Means Clustering'
OnClick = MenuItem31Click OnClick = mnuAnalysisMulti_KMeansClick
end end
object MenuItem33: TMenuItem object mnuAnalysisMulti_SingleLink: TMenuItem
Caption = 'Single Link Clustering' Caption = 'Single Link Clustering'
OnClick = MenuItem33Click OnClick = mnuAnalysisMulti_SingleLinkClick
end end
object MenuItem85: TMenuItem object mnuAnalysisMulti_Path: TMenuItem
Caption = 'Path Analysis' Caption = 'Path Analysis'
OnClick = MenuItem85Click OnClick = mnuAnalysisMulti_PathClick
end end
object MenuItem86: TMenuItem object mnuAnalysisMulti_Factor: TMenuItem
Caption = 'Factor Analysis' Caption = 'Factor Analysis'
OnClick = MenuItem86Click OnClick = mnuAnalysisMulti_FactorClick
end end
object MenuItem87: TMenuItem object mnuAnalysisMulti_Canonical: TMenuItem
Caption = 'Canonical Correlation' Caption = 'Canonical Correlation'
OnClick = MenuItem87Click OnClick = mnuAnalysisMulti_CanonicalClick
end end
object MenuItem88: TMenuItem object mnuAnalysisMulti_GLM: TMenuItem
Caption = 'General Linear Model' Caption = 'General Linear Model'
OnClick = MenuItem88Click OnClick = mnuAnalysisMulti_GLMClick
end end
object BartlettTest: TMenuItem object mnuAnalysisMulti_Bartlett: TMenuItem
Caption = 'Bartlett Test of Sphericity' Caption = 'Bartlett Test of Sphericity'
OnClick = BartlettTestClick OnClick = mnuAnalysisMulti_BartlettClick
end end
object Correspondence: TMenuItem object mnuAnalysisMulti_Correspondence: TMenuItem
Caption = 'Correspondence Analysis' Caption = 'Correspondence Analysis'
OnClick = CorrespondenceClick OnClick = mnuAnalysisMulti_CorrespondenceClick
end end
object MedianPolish: TMenuItem object mnuAnalysisMulti_MedianPolish: TMenuItem
Caption = 'Median Polishing for a 2x2 Table' Caption = 'Median Polishing for a 2x2 Table'
OnClick = MedianPolishClick OnClick = mnuAnalysisMulti_MedianPolishClick
end end
end end
object MenuItem38: TMenuItem object mnuAnalysisCC: TMenuItem
Caption = 'Cross-Classification' Caption = 'Cross-Classification'
object MenuItem89: TMenuItem object mnuAnalysisCC_ABLogLin: TMenuItem
Caption = 'AxB Log Linear' Caption = 'AxB Log Linear'
OnClick = MenuItem89Click OnClick = mnuAnalysisCC_ABLogLinClick
end end
object MenuItem90: TMenuItem object mnuAnalysisCC_ABCLogLin: TMenuItem
Caption = 'AxBxC Log Linear' Caption = 'AxBxC Log Linear'
OnClick = MenuItem90Click OnClick = mnuAnalysisCC_ABCLogLinClick
end end
object MenuItem91: TMenuItem object mnuAnalysisCC_LogLinScreen: TMenuItem
Caption = 'Log Linear Screen' Caption = 'Log Linear Screen'
OnClick = MenuItem91Click OnClick = mnuAnalysisCC_LogLinScreenClick
end end
end end
object MenuItem39: TMenuItem object mnuAnalysisMeas: TMenuItem
Caption = 'Measurement Programs' Caption = 'Measurement Programs'
object MenuItem92: TMenuItem object mnuAnalysisMeas_SampleData: TMenuItem
Caption = 'Generate Sample Test Data' Caption = 'Generate Sample Test Data'
OnClick = MenuItem92Click OnClick = mnuAnalysisMeas_SampleDataClick
end end
object MenuItem50: TMenuItem object mnuAnalysisMeas_Separator1: TMenuItem
Caption = '-' Caption = '-'
end end
object MenuItem93: TMenuItem object mnuAnalysisMeas_Classical: TMenuItem
Caption = 'Classical Test Analysis' Caption = 'Classical Test Analysis'
OnClick = MenuItem93Click OnClick = mnuAnalysisMeas_ClassicalClick
end end
object MenuItem94: TMenuItem object mnuAnalysisMeas_Rash: TMenuItem
Caption = 'Rasch Test Calibration' Caption = 'Rasch Test Calibration'
OnClick = MenuItem94Click OnClick = mnuAnalysisMeas_RashClick
end end
object MenuItem95: TMenuItem object mnuAnalysisMeas_Interval: TMenuItem
Caption = 'Successive Interval Scaling' Caption = 'Successive Interval Scaling'
OnClick = MenuItem95Click OnClick = mnuAnalysisMeas_IntervalClick
end end
object MenuItem96: TMenuItem object mnuAnalysisMeas_Guttman: TMenuItem
Caption = 'Guttman Scalogram Analysis' Caption = 'Guttman Scalogram Analysis'
OnClick = MenuItem96Click OnClick = mnuAnalysisMeas_GuttmanClick
end end
object MenuItem97: TMenuItem object mnuAnalysisMeas_Composite: TMenuItem
Caption = 'Weighted Composite Reliability' Caption = 'Weighted Composite Reliability'
OnClick = MenuItem97Click OnClick = mnuAnalysisMeas_CompositeClick
end end
object MenuItem98: TMenuItem object mnuAnalysisMeas_KR21: TMenuItem
Caption = 'Kuder-Richardson #21 Reliability' Caption = 'Kuder-Richardson #21 Reliability'
OnClick = MenuItem98Click OnClick = mnuAnalysisMeas_KR21Click
end end
object MenuItem99: TMenuItem object mnuAnalysisMeas_Spearman: TMenuItem
Caption = 'Spearman-Brown Prophecy Reliability' Caption = 'Spearman-Brown Prophecy Reliability'
OnClick = MenuItem99Click OnClick = mnuAnalysisMeas_SpearmanClick
end end
object MenuItem100: TMenuItem object mnuAnalysisMeas_VarChange: TMenuItem
Caption = 'Reliability Due to Test Variance Change' Caption = 'Reliability Due to Test Variance Change'
OnClick = MenuItem100Click OnClick = mnuAnalysisMeas_VarChangeClick
end end
object MenuItem47: TMenuItem object mnuAnalysisMeas_Separator2: TMenuItem
Caption = '-' Caption = '-'
end end
object MenuItem101: TMenuItem object mnuAnalysisMeas_Differential: TMenuItem
Caption = 'Differential Item Functioning' Caption = 'Differential Item Functioning'
OnClick = MenuItem101Click OnClick = mnuAnalysisMeas_DifferentialClick
end end
object MenuItem102: TMenuItem object mnuAnalysisMeas_Polytomous: TMenuItem
Caption = 'Polytomous DIF Analysis' Caption = 'Polytomous DIF Analysis'
OnClick = MenuItem102Click OnClick = mnuAnalysisMeas_PolytomousClick
end end
object MenuItem43: TMenuItem object MenuItem43: TMenuItem
Caption = '-' Caption = '-'
end end
object GrdBkMnu: TMenuItem object mnuAnalysisMeas_GradeBook: TMenuItem
Caption = 'Grade Book' Caption = 'Grade Book'
OnClick = GrdBkMnuClick OnClick = mnuAnalysisMeas_GradeBookClick
end end
object ItemBankMenuItem: TMenuItem object mnuAnalysisMeas_ItemBanking: TMenuItem
Caption = 'Item Banking' Caption = 'Item Banking'
OnClick = ItemBankMenuItemClick OnClick = mnuAnalysisMeas_ItemBankingClick
end end
end end
object MenuItem40: TMenuItem object mnuAnalysisNonPar: TMenuItem
Caption = 'Nonparametric' Caption = 'Nonparametric'
object SimpChiSqr: TMenuItem object mnuAnalysisNonPar_SimpleChiSq: TMenuItem
Caption = 'Simple ChiSquare for Categories' Caption = 'Simple ChiSquare for Categories'
OnClick = SimpChiSqrClick OnClick = mnuAnalysisNonPar_SimpleChiSqClick
end end
object MenuItem103: TMenuItem object mnuAnalysisNonPar_ContingChiSq: TMenuItem
Caption = 'Contingency Chi Square' Caption = 'Contingency Chi Square'
OnClick = MenuItem103Click OnClick = mnuAnalysisNonPar_ContingChiSqClick
end end
object MenuItem104: TMenuItem object mnuAnalysisNonPar_Spearman: TMenuItem
Caption = 'Spearman Rank Correlation' Caption = 'Spearman Rank Correlation'
OnClick = MenuItem104Click OnClick = mnuAnalysisNonPar_SpearmanClick
end end
object MenuItem105: TMenuItem object mnuAnalysisNonPar_MannWhitney: TMenuItem
Caption = 'Mann-Whitney U Test' Caption = 'Mann-Whitney U Test'
OnClick = MenuItem105Click OnClick = mnuAnalysisNonPar_MannWhitneyClick
end end
object MenuItem106: TMenuItem object mnuAnalysisNonPar_Fisher: TMenuItem
Caption = 'Fisher''s Exact Test' Caption = 'Fisher''s Exact Test'
OnClick = MenuItem106Click OnClick = mnuAnalysisNonPar_FisherClick
end end
object MenuItem107: TMenuItem object mnuAnalysisNonPar_Kendall: TMenuItem
Caption = 'Kendall''s Coefficient of Concordance' Caption = 'Kendall''s Coefficient of Concordance'
OnClick = MenuItem107Click OnClick = mnuAnalysisNonPar_KendallClick
end end
object MenuItem108: TMenuItem object mnuAnalysisNonPar_KruskalWallis: TMenuItem
Caption = 'Kruskal-Wallis One Way ANOVA' Caption = 'Kruskal-Wallis One Way ANOVA'
OnClick = MenuItem108Click OnClick = mnuAnalysisNonPar_KruskalWallisClick
end end
object MenuItem109: TMenuItem object mnuAnalysisNonPar_Wilcoxon: TMenuItem
Caption = 'Wilcoxon Matched Pairs Signed Ranks Test' Caption = 'Wilcoxon Matched Pairs Signed Ranks Test'
OnClick = MenuItem109Click OnClick = mnuAnalysisNonPar_WilcoxonClick
end end
object MenuItem110: TMenuItem object mnuAnalysisNonPar_Cochran: TMenuItem
Caption = 'Cochran Q Test' Caption = 'Cochran Q Test'
OnClick = MenuItem110Click OnClick = mnuAnalysisNonPar_CochranClick
end end
object MenuItem111: TMenuItem object mnuAnalysisNonPar_SignTest: TMenuItem
Caption = 'Sign Test' Caption = 'Sign Test'
OnClick = MenuItem111Click OnClick = mnuAnalysisNonPar_SignTestClick
end end
object MenuItem112: TMenuItem object mnuAnalysisNonPar_Friedman: TMenuItem
Caption = 'Friedman Two Way ANOVA' Caption = 'Friedman Two Way ANOVA'
OnClick = MenuItem112Click OnClick = mnuAnalysisNonPar_FriedmanClick
end end
object MenuItem113: TMenuItem object mnuAnalysisNonPar_Binomial: TMenuItem
Caption = 'Probability of a binomial event' Caption = 'Probability of a binomial event'
OnClick = MenuItem113Click OnClick = mnuAnalysisNonPar_BinomialClick
end end
object MenuItem114: TMenuItem object mnuAnalysisNonPar_Tau: TMenuItem
Caption = 'Kendall''s Tau and Parrtial Tau' Caption = 'Kendall''s Tau and Parrtial Tau'
OnClick = MenuItem114Click OnClick = mnuAnalysisNonPar_TauClick
end end
object MenuItem115: TMenuItem object mnuAnalysisNonPar_Survival: TMenuItem
Caption = 'Kaplan-Meier Survival Analysis' Caption = 'Kaplan-Meier Survival Analysis'
OnClick = MenuItem115Click OnClick = mnuAnalysisNonPar_SurvivalClick
end end
object RiditAnalysis: TMenuItem object mnuAnalysisNonPar_RIDIT: TMenuItem
Caption = 'RIDIT Analysis' Caption = 'RIDIT Analysis'
OnClick = RiditAnalysisClick OnClick = mnuAnalysisNonPar_RIDITClick
end end
object WghtedKappa: TMenuItem object mnuAnalysisNonPar_WeightedKappa: TMenuItem
Caption = 'Kappa and Weighted Kappa' Caption = 'Kappa and Weighted Kappa'
OnClick = WghtedKappaClick OnClick = mnuAnalysisNonPar_WeightedKappaClick
end end
object GenKappa: TMenuItem object mnuAnalysisNonPar_GenKappa: TMenuItem
Caption = 'Generalized Kappa' Caption = 'Generalized Kappa'
OnClick = GenKappaClick OnClick = mnuAnalysisNonPar_GenKappaClick
end end
object RunsTest: TMenuItem object mnuAnalysisNonPar_RunsTest: TMenuItem
Caption = 'Runs Test for Normality' Caption = 'Runs Test for Normality'
OnClick = RunsTestClick OnClick = mnuAnalysisNonPar_RunsTestClick
end end
object Sens: TMenuItem object mnuAnalysisNonPar_Sens: TMenuItem
Caption = 'Sen''s Slope Analysis' Caption = 'Sen''s Slope Analysis'
OnClick = SensClick OnClick = mnuAnalysisNonPar_SensClick
end end
object KSTest: TMenuItem object mnuAnalysisNonPar_KSTest: TMenuItem
Caption = 'Kolmogorov-Smirnov Test' Caption = 'Kolmogorov-Smirnov Test'
OnClick = KSTestClick OnClick = mnuAnalysisNonPar_KSTestClick
end end
object SRHItem: TMenuItem object mnuAnalysisNonPar_SRH: TMenuItem
Caption = 'Scheirer-Ray-Hart 2-way ANOVA' Caption = 'Scheirer-Ray-Hart 2-way ANOVA'
OnClick = SRHItemClick OnClick = mnuAnalysisNonPar_SRHClick
end end
object lifetable: TMenuItem object mnuAnalysisNonPar_LifeTable: TMenuItem
Caption = 'Life Table' Caption = 'Life Table'
OnClick = lifetableClick OnClick = mnuAnalysisNonPar_LifeTableClick
end end
end end
object mnuAnalysisSPC: TMenuItem object mnuAnalysisSPC: TMenuItem
@ -905,7 +907,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'CUSUM Chart' Caption = 'CUSUM Chart'
OnClick = mnuAnalysisSPC_CUSUMClick OnClick = mnuAnalysisSPC_CUSUMClick
end end
object MenuItem3: TMenuItem object mnuAnalysisSPC_Separator1: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuAnalysisSPC_CChart: TMenuItem object mnuAnalysisSPC_CChart: TMenuItem
@ -921,73 +923,79 @@ object OS3MainFrm: TOS3MainFrm
OnClick = mnuAnalysisSPC_UChartClick OnClick = mnuAnalysisSPC_UChartClick
end end
end end
object MenuItem9: TMenuItem object MenuItem30: TMenuItem
Caption = '-'
end
object mnuAnalysisFinancial: TMenuItem
Caption = 'Financial' Caption = 'Financial'
object MenuItem10: TMenuItem object mnuAnalysisFinancial_LoanAmort: TMenuItem
Caption = 'Loan Amortization Schedule' Caption = 'Loan Amortization Schedule'
OnClick = MenuItem10Click OnClick = mnuAnalysisFinancial_LoanAmortClick
end end
object MenuItem11: TMenuItem object mnuAnalysisFinancial_SumOfYearsDigts: TMenuItem
Caption = 'Sum of years digits depreciation' Caption = 'Sum of years digits depreciation'
OnClick = MenuItem11Click OnClick = mnuAnalysisFinancial_SumOfYearsDigtsClick
end end
object MenuItem14: TMenuItem object mnuAnalysisFinancial_SLDeprec: TMenuItem
Caption = 'Straight line depreciation' Caption = 'Straight line depreciation'
OnClick = MenuItem14Click OnClick = mnuAnalysisFinancial_SLDeprecClick
end end
object MenuItem17: TMenuItem object mnuAnalysisFinancial_Return: TMenuItem
Caption = 'Internal rate of return' Caption = 'Internal rate of return'
Visible = False Visible = False
end end
object MenuItem18: TMenuItem object mnuAnalysisFinancial_PresentValue: TMenuItem
Caption = 'Present Value' Caption = 'Present Value'
Visible = False Visible = False
end end
object MenuItem19: TMenuItem object mnuAnalysisFinancial_PeriodPayment: TMenuItem
Caption = 'Period Payment' Caption = 'Period Payment'
Visible = False Visible = False
end end
object MenuItem21: TMenuItem object mnuAnalysisFinancial_Payment: TMenuItem
Caption = 'Payment' Caption = 'Payment'
Visible = False Visible = False
end end
object MenuItem22: TMenuItem object mnuAnalysisFinancial_NumPeriods: TMenuItem
Caption = 'No. of Periods' Caption = 'No. of Periods'
Visible = False Visible = False
end end
object MenuItem23: TMenuItem object mnuAnalysisFinancial_NetPresentValue: TMenuItem
Caption = 'Net Present Value' Caption = 'Net Present Value'
Visible = False Visible = False
end end
object MenuItem24: TMenuItem object mnuAnalysisFinancial_InterestRate: TMenuItem
Caption = 'Interest Rate' Caption = 'Interest Rate'
Visible = False Visible = False
end end
object MenuItem25: TMenuItem object mnuAnalysisFinancial_InterestPayment: TMenuItem
Caption = 'Interest Payment' Caption = 'Interest Payment'
Visible = False Visible = False
end end
object MenuItem26: TMenuItem object mnuAnalysisFinancial_FutureValue: TMenuItem
Caption = 'Future Value' Caption = 'Future Value'
Visible = False Visible = False
end end
object MenuItem27: TMenuItem object mnuAnalysisFinancial_DblDecling: TMenuItem
Caption = 'Double Declining Value' Caption = 'Double Declining Value'
OnClick = MenuItem27Click OnClick = mnuAnalysisFinancial_DblDeclingClick
end end
end end
object mnuAnalysisDescr_Separator7: TMenuItem
Caption = '-'
end
object MatManMnu: TMenuItem object MatManMnu: TMenuItem
Caption = 'Matrix Manipulation' Caption = 'Matrix Manipulation'
OnClick = MatManMnuClick OnClick = MatManMnuClick
end end
end end
object mnuIOptions: TMenuItem object mnuOptions: TMenuItem
Caption = 'Options' Caption = 'Options'
object mnuShowOptions: TMenuItem object mnuOptions_ShowOptions: TMenuItem
Caption = 'Show Options' Caption = 'Show Options'
OnClick = mnuShowOptionsClick OnClick = mnuOptions_ShowOptionsClick
end end
object PicView: TMenuItem object mnuOptions_PicView: TMenuItem
Caption = 'View Pictures' Caption = 'View Pictures'
Visible = False Visible = False
end end
@ -1014,7 +1022,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Distribution Plots and Critical Values' Caption = 'Distribution Plots and Critical Values'
OnClick = mnuSimDistPlotsClick OnClick = mnuSimDistPlotsClick
end end
object MenuItem52: TMenuItem object mnuSimSeparator1: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuSimGenerateSeqValues: TMenuItem object mnuSimGenerateSeqValues: TMenuItem
@ -1025,7 +1033,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Random Theoretical Values' Caption = 'Random Theoretical Values'
OnClick = mnuSimGenerateRandomValuesClick OnClick = mnuSimGenerateRandomValuesClick
end end
object MenuItem51: TMenuItem object mnuSimSeparator2: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuSimProbabilities: TMenuItem object mnuSimProbabilities: TMenuItem
@ -1042,14 +1050,14 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'Probability between two z Values' Caption = 'Probability between two z Values'
OnClick = mnuSimProbBetweenClick OnClick = mnuSimProbBetweenClick
end end
object MenuItem45: TMenuItem object MnuSimProb_Separator1: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuSimInverseZ: TMenuItem object mnuSimInverseZ: TMenuItem
Caption = 'z for a given Cumulative Probability' Caption = 'z for a given Cumulative Probability'
OnClick = mnuSimInverseZClick OnClick = mnuSimInverseZClick
end end
object mnuSimProbDIVIDER: TMenuItem object mnuSimProb_Separator2: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuSimChiSqProb: TMenuItem object mnuSimChiSqProb: TMenuItem
@ -1080,7 +1088,7 @@ object OS3MainFrm: TOS3MainFrm
Caption = 'License...' Caption = 'License...'
OnClick = mnuHelpLicenseClick OnClick = mnuHelpLicenseClick
end end
object MenuItem46: TMenuItem object mnuHelpSeparator: TMenuItem
Caption = '-' Caption = '-'
end end
object mnuHelpShowTOC: TMenuItem object mnuHelpShowTOC: TMenuItem

629
applications/lazstats/source/forms/mainunit.pas
View File

File diff suppressed because it is too large Load Diff