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

TTaskDialog: Win32WS: handle '\n' in caption of (radio)buttons (for backwards compatibility).

Browse Source
This commit is contained in:
Bart 2023-07-29 23:59:33 +02:00
parent 1729b47bbe
commit 15989485bf
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32wsdialogs.pp
View File

@ -1720,7 +1720,7 @@ var
SetLength(ButtonCaptions,RUCount+16);
SetLength(Buttons,RUCount+16);
end;
ButtonCaptions[RUCount] := Utf8ToUtf16(List[i]);//GetNextStringLineToWS(P);
ButtonCaptions[RUCount] := Utf8ToUtf16(StringReplace(List[i],'\n',#10,[rfReplaceAll]));
Buttons[RUCount].nButtonID := n+firstID;
Buttons[RUCount].pszButtonText := PWideChar(ButtonCaptions[RUCount]);
inc(n);