mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-19 19:09:28 +01:00
DocEditor: set vertical splitter to right place (Left:=1), increase left pane's initial width
git-svn-id: trunk@38071 -
This commit is contained in:
parent
4cc2c0501d
commit
04cff70e47
@ -148,6 +148,7 @@ begin
|
||||
FSplitter:=TSplitter.Create(Self);
|
||||
FSPlitter.Parent:=Self;
|
||||
FSplitter.Align:=alLeft;
|
||||
FSplitter.Left:=1;
|
||||
FSplitter.Width:=5;
|
||||
|
||||
FElement:=TElementEditor.Create(Self);
|
||||
|
||||
@ -271,6 +271,7 @@ Constructor TPackageEditor.Create(AOwner : TComponent);
|
||||
|
||||
begin
|
||||
Inherited;
|
||||
Width:=300;
|
||||
FImageList := TImageList.Create(Self);
|
||||
Fimagelist.AddLazarusResource('node_new'); // ImgIndxNew
|
||||
Fimagelist.AddLazarusResource('node_edit'); // ImgIndxEdited
|
||||
|
||||
Loading…
Reference in New Issue
Block a user