paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-10 11:09:44 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: add to package: replaced TNoteBook with TPageControl

Browse Source 
git-svn-id: trunk@27353 -
This commit is contained in:
mattias 2010-09-13 20:47:30 +00:00
parent 628fb8fa0f
commit 7f54ebde82
2 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/addtoprojectdlg.lfm
View File

@ -11,15 +11,14 @@ object AddToProjectDialog: TAddToProjectDialog
OnClose = AddToProjectDialogClose OnClose = AddToProjectDialogClose
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.27' LCLVersion = '0.9.27'
object Notebook: TNotebook object Notebook: TPageControl
Left = 0 Left = 0
Height = 300 Height = 300
Top = 0 Top = 0
Width = 500 Width = 500
Align = alClient Align = alClient
PageIndex = 0
TabOrder = 0 TabOrder = 0
object AddEditorFilePage: TPage object AddEditorFilePage: TTabSheet
Caption = 'AddEditorFilePage' Caption = 'AddEditorFilePage'
ClientWidth = 492 ClientWidth = 492
ClientHeight = 274 ClientHeight = 274
@ -56,7 +55,7 @@ object AddToProjectDialog: TAddToProjectDialog
ShowBevel = False ShowBevel = False
end end
end end
object NewDependPage: TPage object NewDependPage: TTabSheet
Caption = 'NewDependPage' Caption = 'NewDependPage'
ClientWidth = 492 ClientWidth = 492
ClientHeight = 274 ClientHeight = 274
@ -124,7 +123,7 @@ object AddToProjectDialog: TAddToProjectDialog
ShowBevel = False ShowBevel = False
end end
end end
object AddFilesPage: TPage object AddFilesPage: TTabSheet
Caption = 'AddFilesPage' Caption = 'AddFilesPage'
ClientWidth = 492 ClientWidth = 492
ClientHeight = 274 ClientHeight = 274

8
ide/addtoprojectdlg.pas
View File

@ -61,10 +61,10 @@ type
FileButtonPanel: TButtonPanel; FileButtonPanel: TButtonPanel;
DependButtonPanel: TButtonPanel; DependButtonPanel: TButtonPanel;
// notebook // notebook
NoteBook: TNoteBook; NoteBook: TPageControl;
AddEditorFilePage: TPage; AddEditorFilePage: TTabSheet;
NewDependPage: TPage; NewDependPage: TTabSheet;
AddFilesPage: TPage; AddFilesPage: TTabSheet;
// add file page // add file page
AddFileLabel: TLabel; AddFileLabel: TLabel;
AddFileListBox: TListBox; AddFileListBox: TListBox;