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

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

Button1.Caption в две строки


Юрий ©   (2002-12-18 15:04:00) 

1. как сделать Button1.Caption в две
строки?
2. Требуется в ComboBox1.Items иметь строки содержащие
табуляцию (попросту часть таблицы грузится) а она
(табуляция) отображается вертикальной чертой, как с этим
бороться? (и не только в ComboBox)


Юрий   (2002-12-19 16:54:00) [1]

Skier © (18.12.02 16:28)
Спасибо, задача не настолько принципиальна была, нашел синонимы в русском языке, намного короче (благо русский язык располагает :-) подходящими словами), позволившие кнопку сделать меньше, просто думал, что это проблема решаеться одним кликом мыши куда-нибудь, но "куда-нибудь" не получилось. Приведенный пример оставил в заначке. Спасибо еще раз.

Andrey007 (19.12.02 11:03)
Также спасибо, но именно не хотелось "раздраконивать" строки, надеялся цитата:"что это проблема решаеться одним кликом мыши куда-нибудь, но "куда-нибудь" не получилось."
Спасибо.


Andrey007   (2002-12-19 11:03:00) [2]

Юрий (18.12.02 16:23)
Тогда по OnDrawItem надо заменять символ табуляции некоторым количеством пробелов.


Skier   (2002-12-18 16:28:00) [3]

>Юрий

1.

TYourButton = class(TButton)
protected
procedure CreateParams(var Params: TCreateParams); override;
end; //TYourButton

//.............

{ TYourButton }

procedure TYourButton.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.Style := Params.Style or BS_MULTILINE;
end;

//.............

procedure TForm1.FormCreate(Sender: TObject);
begin
FButton := TYourButton.Create(Self);
FButton.SetBounds(10, 10, 120, 70);
FButton.Parent := Self;
FButton.Caption := "Hello, " + #10#13 + "world !";
end;


Юрий   (2002-12-18 16:23:00) [4]

По 2. - не задал бы вопрос, если бы #9 прокатило, отображаются как вертикальная черта и все тут


Song   (2002-12-18 16:21:00) [5]

1.BS_MULTILINE


Andrey007   (2002-12-18 16:06:00) [6]

1. Расположить на кнопке TLabel.
2. #9


Наверх

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