Заголовок на кнопке
От: Аноним  
Дата: 02.09.04 08:59
Оценка: :)
Как сделать заголовок на кнопке
Re: Заголовок на кнопке
От: TObject Россия  
Дата: 02.09.04 09:05
Оценка:
Здравствуйте, <Аноним>, Вы писали:

А>Как сделать заголовок на кнопке

button.caption:='Ваша кнопка';
... << RSDN@Home 1.1.4 @@subversion >>
Re[2]: Заголовок на кнопке
От: Аноним  
Дата: 02.09.04 09:11
Оценка:
Здравствуйте, TObject, Вы писали:

TO>Здравствуйте, <Аноним>, Вы писали:


А>>Как сделать заголовок на кнопке

TO>button.caption:='Ваша кнопка';
TO>

Не button.caption, а window's title bar
Re: Заголовок на кнопке
От: Ronaldo  
Дата: 02.09.04 09:59
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Как сделать заголовок на кнопке

что-то я не понял вопроса. Тебе надо вывести надпись на кнопку или что??? Если да, то это делается элементарно. У объектов TButton есть свойство Caption измение его и получишь надпись на кнопке.
Re[3]: Заголовок на кнопке
От: Sheridan Россия  
Дата: 02.09.04 10:41
Оценка:
Здравствуйте, <Аноним>, Вы писали:

А>Не button.caption, а window's title bar


А... Это в свойствах проекта... или Application->Title = "чтотамтебенадо";
-=RSDN@Home 1.1.4 beta 2 rev. 181=- [Tranceplosion — Skylight [Cyberstorm] [Blue mix]]
Matrix has you...
Re: Заголовок на кнопке
От: NARIK  
Дата: 02.09.04 11:41
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Как сделать заголовок на кнопке


Если я тебя правильно понял ты имеешь виду свойство кнопки Caption.
(Пример: Button1.Caption:="MyBtn")
Re[2]: Заголовок на кнопке
От: Ronaldo  
Дата: 02.09.04 11:45
Оценка:
Здравствуйте, NARIK, Вы писали:

NAR>Здравствуйте, Аноним, Вы писали:


А>>Как сделать заголовок на кнопке


NAR>Если я тебя правильно понял ты имеешь виду свойство кнопки Caption.

NAR>(Пример: Button1.Caption:="MyBtn")
Да.
Re: Заголовок на кнопке
От: Аноним  
Дата: 02.09.04 12:01
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Как сделать заголовок на кнопке


АВТОР:

Поскольку Кнопка есть окно,
то у него можен быть Title-Bar(с меню, кнопками и т . п.)

Как это сделать в Run-Time(без создания нового компонента)
Re[3]: Заголовок на кнопке
От: Arioch  
Дата: 02.09.04 12:04
Оценка:
The stars so gaily glistened... (Thu, 02 Sep 2004 09:11:38 GMT @424)
...while the fading voice of whispered through the darkness:

А>>> Как сделать заголовок на кнопке

TO>> button.caption:='Ваша кнопка';
> Не button.caption, а window's title bar

Т.е. тебе кнопку на заголовкe, а не заголовок на кнопке ?
Тoгда Jedi VCL

--
WinAMP://Улица роз
http://Arioch.nm.ru/FL/Fidolook_SL.png Mail: the_Arioch<at>nm<dot>ru
Posted via RSDN NNTP Server 1.9 beta
Re[2]: Заголовок на кнопке
От: Flamer Кипр http://users.livejournal.com/_flamer_/
Дата: 02.09.04 12:53
Оценка:
Здравствуйте, Аноним, Вы писали:

[]

А>Поскольку Кнопка есть окно,

А>то у него можен быть Title-Bar(с меню, кнопками и т . п.)

А>Как это сделать в Run-Time(без создания нового компонента)



SetWindowText

The SetWindowText function changes the text of the specified window's title bar (if it has one). If the specified window is a control, the text of the control is changed. However, SetWindowText cannot change the text of a control in another application.


Пойдет?
Re[2]: Заголовок на кнопке
От: NARIK  
Дата: 02.09.04 13:39
Оценка: -2 :)
Здравствуйте, Аноним, Вы писали:

А>Здравствуйте, Аноним, Вы писали:


А>>Как сделать заголовок на кнопке


А>АВТОР:


А>Поскольку Кнопка есть окно,

А>то у него можен быть Title-Bar(с меню, кнопками и т . п.)

А>Как это сделать в Run-Time(без создания нового компонента)


А вы на чем пишете?
По-моему кнопка не есть окно, она находится в окне
Re[3]: Заголовок на кнопке
От: Flamer Кипр http://users.livejournal.com/_flamer_/
Дата: 02.09.04 13:49
Оценка:
Здравствуйте, NARIK, Вы писали:

[]

NAR>А вы на чем пишете?

NAR>По-моему кнопка не есть окно, она находится в окне

Ну таки кнопка все-таки окно. Так-же как и TMemo, и TEdit и пр. визуальные компоненты. Мало того, в некоторых визуальных компонентах содержится не одно окно (как пример приведу TComboBox).

И вполне себе легко сделать так, что TMemo, брошенный на форму, будет иметь заголовок окна, кнопки в правом верхнем углу и даже будет перемещаться по форме если его таскать за заголовок. Кода — ровно 3 строчки
Re[4]: Заголовок на кнопке
От: Аноним  
Дата: 03.09.04 05:38
Оценка:
Здравствуйте, Flamer, Вы писали:

F>Здравствуйте, NARIK, Вы писали:


F>[]


NAR>>А вы на чем пишете?

NAR>>По-моему кнопка не есть окно, она находится в окне

F>Ну таки кнопка все-таки окно. Так-же как и TMemo, и TEdit и пр. визуальные компоненты. Мало того, в некоторых визуальных компонентах содержится не одно окно (как пример приведу TComboBox).


F>И вполне себе легко сделать так, что TMemo, брошенный на форму, будет иметь заголовок окна, кнопки в правом верхнем углу и даже будет перемещаться по форме если его таскать за заголовок. Кода — ровно 3 строчки


Не поленись дай 3 строчки.
Re[5]: Заголовок на кнопке
От: Flamer Кипр http://users.livejournal.com/_flamer_/
Дата: 03.09.04 06:27
Оценка:
Здравствуйте, <Аноним>, Вы писали:

[]

F>>И вполне себе легко сделать так, что TMemo, брошенный на форму, будет иметь заголовок окна, кнопки в правом верхнем углу и даже будет перемещаться по форме если его таскать за заголовок. Кода — ровно 3 строчки


А>Не поленись дай 3 строчки.


1. Почитайте справку про CreateParams и все станет ясно
2. Стили окну назначаем нужные и все.
3. За списком стилей — в MSDN, описание функции CreateWindow.

Как видите, три строчки
... << RSDN@Home 1.1.3 stable >>
Re: Заголовок на кнопке
От: Spaider Верблюд  
Дата: 03.09.04 07:21
Оценка:
Здравствуйте, <Аноним>, Вы писали:

А>Как сделать заголовок на кнопке


Гы, может, кнопку на заголовке?
... << RSDN@Home 1.1.4 @@subversion >>
--
К вашим услугам,
Re[6]: Заголовок на кнопке
От: Аноним  
Дата: 03.09.04 07:27
Оценка:
Здравствуйте, Flamer, Вы писали:

F>Здравствуйте, <Аноним>, Вы писали:


F>[]


F>>>И вполне себе легко сделать так, что TMemo, брошенный на форму, будет иметь заголовок окна, кнопки в правом верхнем углу и даже будет перемещаться по форме если его таскать за заголовок. Кода — ровно 3 строчки


А>>Не поленись дай 3 строчки.


F>1. Почитайте справку про CreateParams и все станет ясно

F>2. Стили окну назначаем нужные и все.
F>3. За списком стилей — в MSDN, описание функции CreateWindow.

F>Как видите, три строчки


спасибо, но

Форма с кнопками,memo и т.д. существует(создана),
и все надо делать на "лету"

1 строчка GetWindowLong(Control.Handle
2 строчка SetWindowLoyg(control.Handle
3 строчка ??? надо это "закрепить",
а как не помню.

ПОДСКАЖИ
Re[7]: Заголовок на кнопке
От: Arioch  
Дата: 03.09.04 09:08
Оценка:
The stars so gaily glistened... (Fri, 03 Sep 2004 07:27:57 GMT @352)
...while the fading voice of whispered through the darkness:

> 3 строчка ??? надо это "закрепить",

> а как не помню.

А м.б. все же TButton.CreateParams а потом TButton.ReCreateWnd ?
--
WinAMP://Jonny Lang — Missing Your Love
http://Arioch.nm.ru/FL/Fidolook_SL.png Mail: the_Arioch<at>nm<dot>ru
Posted via RSDN NNTP Server 1.9 beta
Re[8]: Заголовок на кнопке
От: Аноним  
Дата: 03.09.04 09:22
Оценка:
Здравствуйте, Arioch, Вы писали:

A>А м.б. все же TButton.CreateParams а потом TButton.ReCreateWnd ?



для Вас еше раз

Форма с кнопками,memo и т.д. УЖЕ создана и отображена,
и все надо делать на "лету"
( CreateParams имеет имеет атрибут protected и из экземпляра не виден,
я не хочу создавать новый class(TButton))
Re[9]: Заголовок на кнопке
От: Arioch  
Дата: 03.09.04 10:05
Оценка:
The stars so gaily glistened... (Fri, 03 Sep 2004 09:22:23 GMT @432)
...while the fading voice of whispered through the darkness:

> Форма с кнопками,memo и т.д. УЖЕ создана и отображена,

> и все надо делать на "лету"

Потому и пишу про ReCreateWnd.

> ( CreateParams имеет имеет атрибут protected и из экземпляра не виден,

> я не хочу создавать новый class(TButton))

Про hack classes не слышал?

--
WinAMP://Nightwish — Planet Hell
http://Arioch.nm.ru/FL/Fidolook_SL.png Mail: the_Arioch<at>nm<dot>ru
Posted via RSDN NNTP Server 1.9 beta
Re: Заголовок на кнопке
От: Аноним  
Дата: 03.09.04 10:09
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Как сделать заголовок на кнопке


Автор вопроса:

разобрался сам

Вот, что требовалось от ВАС

H:=Button2.Handle;
X:=GetWindowLong(H,GWL_STYLE);
X := X OR WS_OVERLAPPEDWINDOW;
SetWindowLong(H,GWL_STYLE,X);



SetWindowPos(H,HWND_TOP,0,0,0,0,SWP_DRAWFRAME+SWP_NOSIZE+SWP_NOMOVE);
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.