- This topic has 12 replies, 3 voices, and was last updated 4 years, 5 months ago by
.
-
Posts
-
In the attached project I was not able to reduce the distance between caption and image. Imagemargins are all 0. Manipulating the ContentMargin does not bring image and caption more together.
Am I missing something?I think you’ll have better control with a TsBitBtn
Stephane Senecal
CIS Group
Delphi programmer since 2001<p zoompage-fontsize=”14″>I think you’ll have better control with a TsBitBtn
Why should I use a different button?
This worked before, but it’s hampered in AC 15.08 (the distance between image and caption has become larger).It’s actually very nice you had this. This proves that a previous version of AC went OK.
Thank you for your efforts.I think I found the culprit if you can’t wait for a fix by AlphaSkins.
In the sButton.pas unit, in the function CaptionRect(), at line 400, you can read the line “Result.Left := ImageMargins.Left + 2 * FContentMargin + ImgW + ContentSpacing(Self) + ImageMargins.Right;”
If you remove the “2 * “, it seems to produce the correct result. It will keep 6px between the icon and the caption.
If you don’t even want that spacing, remove “ContentSpacing(Self) + “.Stephane Senecal
CIS Group
Delphi programmer since 2001The issue will be solved in the nearest release.
Also, text position is depended from ImageMargins property, which may be changed in the Object Inspector (do not remove “ContentSpacing(Self)”).
- The topic ‘Image and Caption distance in TsButton is too big’ is closed to new replies.