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:
juha 2012-07-28 09:21:05 +00:00
parent 4cc2c0501d
commit 04cff70e47
2 changed files with 2 additions and 0 deletions

View File

@ -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);

View File

@ -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