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

- little behavior adjusting for non gtk pairsplitter

Browse Source 
git-svn-id: trunk@11218 -
This commit is contained in:
paul 2007-05-29 15:05:25 +00:00
parent addb527f14
commit 3fe2db8ef9
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/widgetset/wspairsplitter.pp
View File

@ -116,6 +116,8 @@ begin
if InternalSplitter = nil then
begin
InternalSplitter := TSplitter.Create(ASplitter);
InternalSplitter.AutoSnap := False;
InternalSplitter.MinSize := 1;
InternalSplitter.Parent := ASplitter;
end;
InternalSplitter.Align := ASplitter.Sides[0].Align;