diff --git a/ide/compileroptions.pp b/ide/compileroptions.pp index fc4512c9cc..8bf26ceb5a 100644 --- a/ide/compileroptions.pp +++ b/ide/compileroptions.pp @@ -1533,6 +1533,7 @@ begin nbMain.Pages.Add(dlgCOLinking); nbMain.Pages.Add(dlgCOMessages); nbMain.Pages.Add(dlgCOOther); + nbMain.PageIndex:=0; { bvlButtonBar := TBevel.Create(Self); diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp index bcf64274ec..b0db9ed4e1 100644 --- a/ide/editoroptions.pp +++ b/ide/editoroptions.pp @@ -1917,6 +1917,7 @@ begin Pages.Add(dlgKeyMapping); Pages.Add(dlgEdColor); Pages.Add('Code Tools'); //by VVI - it seems to be a proper name + PageIndex:=0; end; ImageList:=TImageList.Create(Self); diff --git a/ide/environmentopts.pp b/ide/environmentopts.pp index c2f3e685ba..8277043185 100644 --- a/ide/environmentopts.pp +++ b/ide/environmentopts.pp @@ -93,7 +93,7 @@ type const LazarusLanguageNames: array[TLazarusLanguage] of string = ( - 'Automatic (default is english)', 'English', 'Deutsch', 'Espan~ol' + 'Automatic (default is english)', 'English', 'Deutsch', 'Espanol' ); LazarusLanguageIDs: array[TLazarusLanguage] of string = ( @@ -1225,6 +1225,7 @@ begin Pages.Add(dlgEnvFiles); Pages.Add(dlgEnvBckup); Pages.Add(dlgNaming); + PageIndex:=0; end; SetupDesktopPage(0); diff --git a/ide/projectopts.pp b/ide/projectopts.pp index c7fe2e007f..4162629d78 100644 --- a/ide/projectopts.pp +++ b/ide/projectopts.pp @@ -140,6 +140,7 @@ begin Pages.Add(dlgPOApplication); Pages.Add(dlgPOFroms); Pages.Add(dlgPOInfo); + PageIndex:=0; end; SetupFormsPage;