Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.22;
Скачать: CL | DM;

Вниз

Кнопка   Найти похожие ветки 

 
balagur ©   (2006-10-05 11:41) [0]

Всем привет!
Стукнуло мне на кнопке разместить текст в две строки...
Подскажите каким образом это можно сделать, или использовать другой компонент?

Спасиб :)


 
clickmaker ©   (2006-10-05 11:45) [1]

На стандартной, боюсь, никак. Разве что BitBtn + Glyph с надписью
Но можно создать свой компонент, от TButton, перекрыть CreateParams и включить стиль BS_MULTILINE


 
pavel_guzhanov ©   (2006-10-05 11:49) [2]

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 ... не проверял...


 
pavel_guzhanov ©   (2006-10-05 11:51) [3]


> Взято с DelphiWorld ... не проверял...

Проверил... И правда работает :0))


 
balagur ©   (2006-10-05 11:55) [4]

Блин, здоровско, работает!
Большое пасиба!!

balagur :)



Страницы: 1 вся ветка

Текущий архив: 2006.10.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.065 c
2-1159765679
Officeman
2006-10-02 09:07
2006.10.22
требуется програмно закрыть окно, имя окна хранится в переменной


2-1160296945
WoW
2006-10-08 12:42
2006.10.22
Чем virtual отличаеться от abstract...


4-1149959106
suharew
2006-06-10 21:05
2006.10.22
ComPort компонент


2-1159894378
Fantasy
2006-10-03 20:52
2006.10.22
IBBackupService


4-1149111939
ychenick
2006-06-01 01:45
2006.10.22
Своя иконка возле кнопок свернуть,развернуть, закрыть