IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным. В описании темы указываем язык!!!

> Builder 6.0
Fanat
сообщение 4.01.2008 12:22
Сообщение #1


Fanat
***

Группа: Пользователи
Сообщений: 261
Пол: Мужской
Реальное имя: Сергей

Репутация: -  5  +


При создании динамически кнопки необходимо что бы она оказалась поверх всех компонентов...
BringToFont() и SendToBack() не работает в этом случае...Как быть?..
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 4.01.2008 15:22
Сообщение #2


Гость






Я бы сделал так:

class MyButton : public TSpeedButton
{
TPanel *parent;
public:
int n, m;
__fastcall MyButton(Classes::TComponent* AOwner, const TRect& rect);
};

__fastcall MyButton::MyButton(Classes::TComponent* AOwner, const TRect& rect)
:TSpeedButton(AOwner)
{
parent = new TPanel(AOwner);
parent->BoundsRect = rect;
parent->BevelOuter = bvNone;
parent->Parent = dynamic_cast<TWinControl*>(AOwner);

m = n = 0;
this->Parent = parent;
};

void __fastcall TForm1::Button1Click(TObject *Sender)
{
static MyButton* Button = new MyButton(this, Rect(10, 10, 10+23, 10+23));
Button->m = 10;
Button->n = 20;
Button->Show();
}

(эта тема является логическим продолжением темы о наследовании от Button-а, я не ошибся?)
 К началу страницы 
+ Ответить 
Fanat
сообщение 6.01.2008 14:14
Сообщение #3


Fanat
***

Группа: Пользователи
Сообщений: 261
Пол: Мужской
Реальное имя: Сергей

Репутация: -  5  +


Цитата(volvo @ 4.01.2008 15:22) *

(эта тема является логическим продолжением темы о наследовании от Button-а, я не ошибся?)


Нет, не ошибся...Очень интересно спасибо...=)
А что это за свойства?..
parent->BoundsRect
parent->BevelOuter
parent->Parent

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 18.07.2025 18:07
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"