paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-08 14:38:48 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL/SpeedButton: Fix clipping of caption containing double ampersand characters, issue #39820.

Browse Source
This commit is contained in:
wp_xyz 2022-10-27 22:27:35 +02:00
parent 8ef10902f3
commit fbe7aa44e1
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/include/speedbutton.inc
View File

@ -1124,7 +1124,6 @@ begin
if FShowCaption and (Caption <> '') then if FShowCaption and (Caption <> '') then
begin begin
TMP := Caption; TMP := Caption;
DeleteAmpersands(TMP);
Flags := DT_CalcRect; Flags := DT_CalcRect;
if not Canvas.TextStyle.SingleLine then if not Canvas.TextStyle.SingleLine then
Inc(Flags, DT_WordBreak); Inc(Flags, DT_WordBreak);