paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-25 18:09:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

packager: fix package options after injection of build modes (bug )

Browse Source 
git-svn-id: trunk@18553 -
This commit is contained in:
paul 2009-02-04 08:27:57 +00:00
parent 14a26422f9
commit 1768dc3318
1 changed files with 6 additions and 4 deletions

10
packager/pkgoptionsdlg.pas
View File

@ -269,6 +269,7 @@ end;
procedure TPackageOptionsDialog.FormCreate(Sender: TObject);
begin
NoteBook.PageIndex := 0;
{$IFNDEF EnableBuildModes}
Usage2Page.TabVisible:=false;
{$ENDIF}
@ -397,10 +398,11 @@ end;
procedure TPackageOptionsDialog.SetupComponents;
begin
Notebook.Page[0].Caption:=lisPckOptsUsage;
Notebook.Page[1].Caption:=lisToDoLDescription;
Notebook.Page[2].Caption:=lisPckOptsIDEIntegration;
Notebook.Page[3].Caption:=lisPckOptsProvides;
Notebook.Page[4].Caption:=dlgPOI18n;
Notebook.Page[1].Caption:=lisPckOptsUsage; // todo: add new caption
Notebook.Page[2].Caption:=lisToDoLDescription;
Notebook.Page[3].Caption:=lisPckOptsIDEIntegration;
Notebook.Page[4].Caption:=lisPckOptsProvides;
Notebook.Page[5].Caption:=dlgPOI18n;
OKButton.Caption:=lisLazBuildOk;
CancelButton.Caption:=dlgCancel;