TPanel - Помощь студентам

Valera · 31.07.2008, 13:43

Как на TPanel можно вывести текст в несколько строк?

Panel1.Caption:='Íåïëîõî!' + #10#13 + 'À, òû åùå ÷òî-òî çíàåøü?';
такой вариант не проходит.

Stilet · 31.07.2008, 14:11

Ну скинь на панель TLabel и уже в нее выводи.

Valera · 31.07.2008, 16:40

Цитата:

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

Ну скинь на панель TLabel и уже в нее выводи.

Большое спасибо.

Valera · 06.08.2008, 17:31

Цитата:

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

Ну скинь на панель TLabel и уже в нее выводи.

Label прячется под Panel. Что делать?

_Dmitry · 06.08.2008, 17:43

Значит она у вас не на панели, а на форме.
В дереве объектов перетащите Label на Panel или удалите Label и заново бросьте ее на Panel, а не на форму.

Valera · 06.08.2008, 17:51

Да, если сразу опустить на "панель". А, если метка на форме, то не получается.
А, можно метку кинуть на простую кнопку?

_Dmitry · 06.08.2008, 18:02

А зачем? Если вам нужно выводить текст в несколько строк на кнопке, то используйте BitBtn она это позволяет. Если все же необходимо использовать Button, то в обработчике события OnCreate формы нужно прописать следующее:

Код:

procedure TForm1.FormCreate(Sender: TObject);   
var   
  Style: integer;   
begin   
  Style:=GetWindowLong(Button1.Handle,GWL_STYLE);   
  SetWindowLong(Button1.Handle,GWL_STYLE,Style or BS_MULTILINE);   
end;

обратите внимание, что MULTILINE создается для кнопки Button1

Valera · 06.08.2008, 18:08

Мне нужно, чтобы кнопка меняла свой цвет. Brush не получается.

JTG · 06.08.2008, 18:24

Цветных кнопок уже наделали великие тыщи..

http://delphi.about.com/od/vclwritee.../aa061104a.htm
http://delphi-faq.zoxt.net/1546.htm

_Dmitry · 06.08.2008, 18:46

Без дополнительных компонентов так:
кидаете на форму Panel, на нее кнопку SpeedButton
у панели устанавливаете нужный цвет (Color) и AutoSize:=true;
у кнопки Transparent:=true; Flat:=true;
этот симбиоз и будет цветной кнопкой.

31.07.2008, 14:11	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Ну скинь на панель TLabel и уже в нее выводи. I'm learning to live...

06.08.2008, 18:02	#7
_Dmitry Участник клуба Регистрация: 02.09.2007 Сообщений: 1,193	А зачем? Если вам нужно выводить текст в несколько строк на кнопке, то используйте BitBtn она это позволяет. Если все же необходимо использовать Button, то в обработчике события OnCreate формы нужно прописать следующее: Код: `procedure TForm1.FormCreate(Sender: TObject); var Style: integer; begin Style:=GetWindowLong(Button1.Handle,GWL_STYLE); SetWindowLong(Button1.Handle,GWL_STYLE,Style or BS_MULTILINE); end;` обратите внимание, что MULTILINE создается для кнопки Button1

06.08.2008, 18:24	#9
JTG я получил эту роль Старожил Регистрация: 25.05.2007 Сообщений: 3,694	Цветных кнопок уже наделали великие тыщи.. http://delphi.about.com/od/vclwritee.../aa061104a.htm http://delphi-faq.zoxt.net/1546.htm пыщь

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
добавление обработчика OnPaint в TPanel	Mixasik	Общие вопросы Delphi	2	23.07.2008 17:36
Компонент на основе TPanel для отображения погоды из интернета...	xzDelphi	Компоненты Delphi	7	08.01.2008 17:33
Вопрос по TPanel	SeRhy	Общие вопросы Delphi	3	30.12.2007 11:33

31.07.2008, 13:43	#1
Valera Пользователь Регистрация: 23.06.2008 Сообщений: 86	TPanel Как на TPanel можно вывести текст в несколько строк? Panel1.Caption:='Íåïëîõî!' + #10#13 + 'À, òû åùå ÷òî-òî çíàåøü?'; такой вариант не проходит.

06.08.2008, 17:43	#5
_Dmitry Участник клуба Регистрация: 02.09.2007 Сообщений: 1,193	Значит она у вас не на панели, а на форме. В дереве объектов перетащите Label на Panel или удалите Label и заново бросьте ее на Panel, а не на форму.

06.08.2008, 17:51	#6
Valera Пользователь Регистрация: 23.06.2008 Сообщений: 86	Да, если сразу опустить на "панель". А, если метка на форме, то не получается. А, можно метку кинуть на простую кнопку?

06.08.2008, 18:08	#8
Valera Пользователь Регистрация: 23.06.2008 Сообщений: 86	Мне нужно, чтобы кнопка меняла свой цвет. Brush не получается.

06.08.2008, 18:46	#10
_Dmitry Участник клуба Регистрация: 02.09.2007 Сообщений: 1,193	Без дополнительных компонентов так: кидаете на форму Panel, на нее кнопку SpeedButton у панели устанавливаете нужный цвет (Color) и AutoSize:=true; у кнопки Transparent:=true; Flat:=true; этот симбиоз и будет цветной кнопкой.