Caption на Button в две строки и более

[jziiiiiii]

Как написать на кнопке название в две или более строк?

[B_N]

У кнопок есть стандартный стиль BS_MULTILINE, который можно поставить через SetWindowLong или через сообщение BM_SETSTYLE. Ну а в VCL наверняка должно быть что-то вроде TButton.Multiline.

[Лубышев]

Попробуй в качестве кнопки панель использовать. Фленов в Библии delphi описал это

[SERG1980]

1. у кнопки поставить св-во WordWrap в true
Далее или в режиме редактирования пиши надпись и она сама перенесётся на новую строку ( в зависимости от ширины кнопкии)
или программно например:
procedure TForm1.FormCreate(Sender: TObject);
begin
button2.Caption:='Строка1'+#10#13+' Строка2';
end;

[SERG1980]

у меня работает

[Stilet]

В какой версии Делфы есть WordWrap для кнопок?

[Лубышев]

Не знаю с какой начиная, но в моей седьмой это есть!

[mihali4]

Сообщение от Stilet

В какой версии Делфы есть WordWrap для кнопок?

Действительно, в 7-ой есть для TButton и TBitBtn.
Но работает это свойство в редакторе только у TButton...

[puporev]

Чтобы писать заголовок кнопок Button, BitBtn и SpeedButton
в несколько строк, нужно свойство WordWrap у Button и BitBtn
поставвить в True.У Button можно вводить заголовок и в ручную
и программно (см. код пост#4). У BitBtn только программно.
У SpeedButton этого свойства нет, но ввести несколько строк тоже
можно программно.

[andrey4623]

Причем свойство wordwrap не всегда удобно.
Допустим, вы пишете текст с пробелами, так эти пробелы ТОЖЕ будут переноситься, и текст на кнопке выглядит скошенным. Намного удобнее присваивать caption программно

procedure TForm1.FormCreate(Sender: TObject);
begin
button2.Caption:='Строка1'+#10#13+' Строка2';
end;