- This topic has 9 replies, 2 voices, and was last updated 12 years, 4 months ago by Support.
-
AuthorPosts
-
July 11, 2012 at 12:38 pm #35260muratkParticipant
When TsDateEdit is in TsToolBar its top starts from negative.
July 19, 2012 at 8:55 am #48633SupportKeymasterHello
Can you show an example please?
July 19, 2012 at 11:46 am #48636muratkParticipantAdd TsSkinManager and select skin and make active.
and put TsDateEdit in TsToolBar
and run
July 19, 2012 at 12:07 pm #48637SupportKeymasterI did it. What should I see? Can you send me a screenshot or a demo (better) please?
July 19, 2012 at 1:56 pm #48638muratkParticipantobject Form11: TForm11
Left = 0
Top = 0
Caption = 'Form11'
ClientHeight = 254
ClientWidth = 480
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object sToolBar1: TsToolBar
Left = 0
Top = 0
Width = 480
Height = 29
Caption = 'sToolBar1'
DoubleBuffered = True
ParentDoubleBuffered = False
TabOrder = 0
SkinData.SkinSection = 'TOOLBAR'
ExplicitLeft = 72
ExplicitTop = 40
ExplicitWidth = 150
object sDateEdit1: TsDateEdit
Left = 0
Top = 0
Width = 86
Height = 22
AutoSize = False
Color = clWhite
EditMask = '!99/99/9999;1; '
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 0
Text = ' . . '
BoundLabel.Indent = 0
BoundLabel.Font.Charset = DEFAULT_CHARSET
BoundLabel.Font.Color = clWindowText
BoundLabel.Font.Height = -11
BoundLabel.Font.Name = 'Tahoma'
BoundLabel.Font.Style = []
BoundLabel.Layout = sclLeft
BoundLabel.MaxWidth = 0
BoundLabel.UseSkinColor = True
SkinData.SkinSection = 'EDIT'
GlyphMode.Blend = 0
GlyphMode.Grayed = False
end
end
object sSkinManager1: TsSkinManager
InternalSkins = <>
MenuSupport.ExtraLineFont.Charset = DEFAULT_CHARSET
MenuSupport.ExtraLineFont.Color = clWindowText
MenuSupport.ExtraLineFont.Height = -11
MenuSupport.ExtraLineFont.Name = 'Tahoma'
MenuSupport.ExtraLineFont.Style = []
SkinDirectory = 'f:publicnavskins'
SkinName = 'Acryl'
SkinInfo = '7.2'
ThirdParty.ThirdEdits = ' '
ThirdParty.ThirdButtons = 'TButton'
ThirdParty.ThirdBitBtns = ' '
ThirdParty.ThirdCheckBoxes = ' '
ThirdParty.ThirdGroupBoxes = ' '
ThirdParty.ThirdListViews = ' '
ThirdParty.ThirdPanels = ' '
ThirdParty.ThirdGrids = ' '
ThirdParty.ThirdTreeViews = ' '
ThirdParty.ThirdComboBoxes = ' '
ThirdParty.ThirdWWEdits = ' '
ThirdParty.ThirdVirtualTrees = ' '
ThirdParty.ThirdGridEh = ' '
ThirdParty.ThirdPageControl = ' '
ThirdParty.ThirdTabControl = ' '
ThirdParty.ThirdToolBar = ' '
ThirdParty.ThirdStatusBar = ' '
ThirdParty.ThirdSpeedButton = ' '
ThirdParty.ThirdScrollControl = ' '
ThirdParty.ThirdUpDown = ' '
ThirdParty.ThirdScrollBar = ' '
Left = 120
Top = 104
end
end
Here is runtime and design time view:
July 19, 2012 at 2:14 pm #48639SupportKeymasterWhich version of Delphi do you uses?
You have ExplicitLeft, ExplicitTop properties in the TsToolBar, but these properties are not published in control.
How it may be?
Try to place other control to this ToolBar.
July 19, 2012 at 2:24 pm #48640muratkParticipantXE2
July 19, 2012 at 2:29 pm #48641muratkParticipantskinmanager not active
July 19, 2012 at 2:31 pm #48642SupportKeymasterCan you show it by TeamViewer or similar tool?
July 19, 2012 at 2:32 pm #48643SupportKeymasterI see it now, thanks for your last picture.
Issue occurs when Aero is off.
-
AuthorPosts
- You must be logged in to reply to this topic.