Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Кнопка


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо