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

gtk intf: fixed DrawSplitter

Browse Source 
git-svn-id: trunk@10050 -
This commit is contained in:
mattias 2006-10-10 06:39:53 +00:00
parent 502201703c
commit 4ed3233b92
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/gtk/gtklclintf.inc
View File

@ -214,9 +214,9 @@ begin
Style:=GetStyle(lgsButton);
if Horizontal then begin
Detail:='hpaned';
end else begin
Detail:='vpaned';
end else begin
Detail:='hpaned';
end;
DCOrigin:=GetDCOffset(TDeviceContext(DC));

4
lcl/interfaces/gtk/gtkwsextctrls.pp
View File

@ -478,9 +478,9 @@ begin
Style:=GetStyle(lgsButton);
if ASplitter.ResizeAnchor in [akTop,akBottom] then begin
Detail:='hpaned';
end else begin
Detail:='vpaned';
end else begin
Detail:='hpaned';
end;
DCOrigin:=GetDCOffset(DevContext);