![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Кнопка
balagur © (2006-10-05 11:41:00)Всем привет!
Стукнуло мне на кнопке разместить текст в две строки...
Подскажите каким образом это можно сделать, или использовать другой компонент?
Спасиб :)
balagur (2006-10-05 11:55:00) [1]Блин, здоровско, работает!
Большое пасиба!!
balagur :)
pavel_guzhanov (2006-10-05 11:51:00) [2]
> Взято с DelphiWorld ... не проверял...
Проверил... И правда работает :0))
pavel_guzhanov (2006-10-05 11:49:00) [3]
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
i := GetWindowLong(Button1.Handle, GWL_STYLE);
SetWindowLong(Button1.Handle, GWL_STYLE, i or BS_MULTILINE);
Button1.Caption := 'Delphi World - ' + #13#10 + 'лучше не бывает!';
end;
Взято с DelphiWorld ... не проверял...
clickmaker (2006-10-05 11:45:00) [4]На стандартной, боюсь, никак. Разве что BitBtn + Glyph с надписью
Но можно создать свой компонент, от TButton, перекрыть CreateParams и включить стиль BS_MULTILINE