Starts moving lfms from OnPageChange to OnChange

git-svn-id: trunk@32625 -
This commit is contained in:
sekelsenmat 2011-10-02 19:42:59 +00:00
parent 03f0d554d1
commit 8f10f85be0
6 changed files with 3 additions and 6 deletions

View File

@ -18,7 +18,7 @@ object AboutForm: TAboutForm
Top = 0 Top = 0
Width = 460 Width = 460
Align = alClient Align = alClient
OnPageChanged = NotebookPageChanged OnChange = NotebookPageChanged
TabOrder = 0 TabOrder = 0
object VersionPage: TTabSheet object VersionPage: TTabSheet
Caption = 'Version' Caption = 'Version'

View File

@ -21,7 +21,7 @@ object CodeExplorerView: TCodeExplorerView
BorderSpacing.Top = 2 BorderSpacing.Top = 2
TabIndex = 0 TabIndex = 0
TabOrder = 0 TabOrder = 0
OnPageChanged = MainNotebookPageChanged OnChange = MainNotebookPageChanged
object CodePage: TTabSheet object CodePage: TTabSheet
Caption = 'CodePage' Caption = 'CodePage'
ClientHeight = 488 ClientHeight = 488

View File

@ -83,7 +83,7 @@ object CodeToolsDefinesEditor: TCodeToolsDefinesEditor
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
OnPageChanged = ValueNoteBookPageChanged OnChange = ValueNoteBookPageChanged
TabOrder = 0 TabOrder = 0
object ValueAsTextPage: TTabSheet object ValueAsTextPage: TTabSheet
Caption = 'ValueAsTextPage' Caption = 'ValueAsTextPage'

View File

@ -24,7 +24,6 @@ object FPDocEditor: TFPDocEditor
TabOrder = 0 TabOrder = 0
TabPosition = tpBottom TabPosition = tpBottom
OnChange = PageControlChange OnChange = PageControlChange
OnPageChanged = PageControlChange
object ShortTabSheet: TTabSheet object ShortTabSheet: TTabSheet
Caption = 'ShortTabSheet' Caption = 'ShortTabSheet'
ClientHeight = 123 ClientHeight = 123

View File

@ -88,7 +88,6 @@ object InitialSetupDialog: TInitialSetupDialog
TabIndex = 2 TabIndex = 2
TabOrder = 3 TabOrder = 3
OnChange = PropertiesPageControlChange OnChange = PropertiesPageControlChange
OnPageChanged = PropertiesPageControlChange
Options = [nboHidePageListPopup] Options = [nboHidePageListPopup]
object LazarusTabSheet: TTabSheet object LazarusTabSheet: TTabSheet
Caption = 'LazarusTabSheet' Caption = 'LazarusTabSheet'

View File

@ -24,7 +24,6 @@ object SearchResultsView: TSearchResultsView
OnChange = ResultsNoteBookPageChanged OnChange = ResultsNoteBookPageChanged
OnCloseTabClicked = ResultsNoteBookClosetabclicked OnCloseTabClicked = ResultsNoteBookClosetabclicked
OnMouseDown = ResultsNoteBookMouseDown OnMouseDown = ResultsNoteBookMouseDown
OnPageChanged = ResultsNoteBookPageChanged
Options = [nboShowCloseButtons, nboMultiLine] Options = [nboShowCloseButtons, nboMultiLine]
end end
object ToolBar: TToolBar object ToolBar: TToolBar