Inno кнопка Настройки заголовок с линией ломает

Question

Я пытаюсь создать заголовок кнопки, который содержит разрыв строки:

Button.Caption := 'Line1' + #13#10 + 'Line2'; 

Однако разрыв символов стандартной линии #13#10 не появляется, чтобы работать в этом случае, как я получение:

Line1Line2

отображается на кнопке. Каков правильный синтаксис, чтобы разбить заголовок кнопки на нескольких строках?

Answer 1

Основываясь на Newline character in caption of button (в Delphi):

function GetWindowLong(Wnd: HWnd; Index: Integer): LongInt; 
    external 'GetWindowLongW@user32.dll stdcall'; 
function SetWindowLong(Wnd: HWnd; Index: Integer; NewLong: LongInt): LongInt; 
    external 'SetWindowLongW@user32.dll stdcall'; 

const 
    GWL_STYLE = -16; 
    BS_MULTILINE = $2000; 

procedure InitializeWizard(); 
var 
    Button: TNewButton; 
begin 
    Button := TNewButton.Create(WizardForm); 
    Button.Left := ScaleX(16); 
    Button.Top := WizardForm.NextButton.Top - ScaleX(8); 
    Button.Width := WizardForm.NextButton.Width; 
    Button.Height := WizardForm.NextButton.Height + ScaleY(16); 
    Button.Parent := WizardForm; 

    SetWindowLong(Button.Handle, GWL_STYLE, 
    GetWindowLong(Button.Handle, GWL_STYLE) or BS_MULTILINE); 

    Button.Caption := 'foo' + #13#10 + 'bar'; 
end;