mirror of https://gitlab.com/basile.b/dexed.git
improve the page control under win, close #51
This commit is contained in:
parent
15630dcab8
commit
ec50bdede7
|
@ -5,7 +5,7 @@ unit ce_controls;
|
|||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, Forms, Controls, ComCtrls, ExtCtrls, buttons;
|
||||
Classes, SysUtils, Forms, Controls, ComCtrls, ExtCtrls, buttons, Graphics;
|
||||
|
||||
type
|
||||
TCEPageControlButton = (pbClose, pbMoveLeft, pbMoveRight, pbAdd, pbSplit);
|
||||
|
@ -166,6 +166,9 @@ begin
|
|||
fTabs.Options:=[];
|
||||
fTabs.OnChange:=@tabsChanged;
|
||||
fTabs.OnChanging:=@tabsChanging;
|
||||
{$IFDEF WINDOWS}
|
||||
fTabs.BorderSpacing.Top:= 8;
|
||||
{$ENDIF}
|
||||
|
||||
fMoveLeftBtn:= TSpeedButton.Create(self);
|
||||
fMoveLeftBtn.Parent := fHeader;
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
inherited CEProjectGroupWidget: TCEProjectGroupWidget
|
||||
Left = 866
|
||||
Left = 862
|
||||
Height = 195
|
||||
Top = 277
|
||||
Top = 273
|
||||
Width = 328
|
||||
Caption = 'Project group'
|
||||
ClientHeight = 195
|
||||
|
@ -33,12 +33,12 @@ inherited CEProjectGroupWidget: TCEProjectGroupWidget
|
|||
item
|
||||
AutoSize = True
|
||||
Caption = 'Type'
|
||||
Width = 38
|
||||
Width = 36
|
||||
end
|
||||
item
|
||||
AutoSize = True
|
||||
Caption = 'Configuration'
|
||||
Width = 86
|
||||
Width = 77
|
||||
end>
|
||||
GridLines = True
|
||||
ReadOnly = True
|
||||
|
|
Loading…
Reference in New Issue