Как добавить кнопку на форму

@Hacker_ · Регистрация: 10.09.2009

Студворк — интернет-сервис помощи студентам

Здрасвтуйте, помогите пожалуйста. Мне нужно чтобы при нажатии кноки на форму появлялась еще одна кнопка. Я в Н файле написал следующий код:

C++
1
2
3
4
5
6
class Gr
{
TButton* Bt;
public:
Gr(TComponent* Owner);
};

В срр файле я написал реализацию конструктора:

C++
1
2
3
4
5
6
7
8
9
10
Gr::Gr(TComponent* Owner)
{
        Bt=new TButton(Owner);
        Bt->Left=20;
        Bt->Top=20;
        Bt->Height=100;
        Bt->Width=100;
        Bt->Visible=true;
        Bt->Caption="Hello World";
}

Теперь в событии обработки мыши мне надо сдеалать чтобы появлялась новая кнопка, я попытался реализовать это следующим образом:

C++
1
2
3
4
5
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Gr gr=Gr(Form1);
Form1->Repaint();
}

Кнопка не появляется, как заставить кнопку нарисоваться на форме?
Это не обязательно должна быть кнопка, я просто хочу понять принцип добавления обектов на форму программно а не перетаскиванием их с панели инструментов.

@Paulie · 06.10.2009, 10:41

Может ещё добавить TForm1->Controls->Add(gr); ?

@mamedovvms · 06.10.2009, 10:42

а может надо сначало сделать для второй кнопки свойство
Visible=false
а при нажатии на первую кнопку изменить это свойство на
Visible=true

oxotnik · 06.10.2009, 10:45

C++
1
2
3
Bt=new TButton(Owner);
...
BT->Parent = Owner; // это на чем она лежать будет

@mamedovvms · 06.10.2009, 10:46

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

понять принцип добавления обектов на форму программно а не перетаскиванием их с панели инструментов.

не заметил, то что я написал это будет работать если ты сначала ее положил на форму, сначала ее не будет видно, а потом уже при нажатии на первую вторая будет появляться

Новые блоги и статьи Все статьи Все блоги /
Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .

@Paulie Айхрень... 306 / 176 / 7 Регистрация: 02.06.2009 Сообщений: 1,077
	06.10.2009, 10:41
	Может ещё добавить TForm1->Controls->Add(gr); ? 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	06.10.2009, 10:42
	а может надо сначало сделать для второй кнопки свойство Visible=false а при нажатии на первую кнопку изменить это свойство на Visible=true 0