Программно задать родительскую форму

@Gelo123321 · Регистрация: 05.01.2012

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

Создаю собственный класс формы, столкнулся с проблемой, как сделать, что бы форма с которой вызывают мою форму, была родительской?

Release · 14.01.2014, 19:11

Gelo123321, применять свой класс для родительской формы, иначе вариантов не вижу.

@Gelo123321 · 14.01.2014, 23:04 **[ТС]**

Release, поподробнее, если можно.

@Qwertiy · 15.01.2014, 13:05

Через WinApi?

Что вообще надо-то?

@Gelo123321 · 15.01.2014, 14:36 **[ТС]**

Qwertiy, я создаю собственный класс формы. Потом я эту форму вызываю, например из Form1, посредством нажатия на кнопку Button1. Как в моем классе прописать, что бы та форма откуда ее вызывают мою форму, становилась родительской для моей. Вот это и надо. Могу дать свой код, но там только код формы, и то зачаточный -_- без попыток сделать форму родительской.

Памирыч · 15.01.2014, 15:44

VB.NET
1
2
3
4
        Dim SomeForm As New Form1
        SomeForm.TopLevel = False
        SomeForm.Parent = Me
        SomeForm.Show()

Me - текущий класс

@Gelo123321 · 16.01.2014, 23:20 **[ТС]**

Памирыч, а если моя форма вызывается на с Form1, a с Form2?

Памирыч · 17.01.2014, 06:09

Gelo123321, в свойствах проекта установите "Начальную форму"

@Gelo123321 · 17.01.2014, 18:08 **[ТС]**

Памирыч, а что если у моей формы будет возможность вызываться как с Form1 так и с Form2. Лучше сделать что бы при создании класса, в этом самом классе присваивалась "материнская" форма та, из которой вызывают мой класс. Но как так сделать я не представляю. Разве что, никак.

Памирыч · 17.01.2014, 18:36

Я так и не понял вопроса.
Если нужно узнать, с какой формы вызвали текущую, то, боюсь, без переменных в глобальном модуле будет нелегко.

В модуле например

VB.NET
1
    Public DrinkTheCoffee As Form

Потом при вызове какой либо формы, например, третьей

VB.NET
1
2
        DrinkTheCoffee = Me
        Form3.Show()

А в загрузке этой формы (и любой)

VB.NET
1
2
3
    Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Text = DrinkTheCoffee.Name
    End Sub

В заголовке формы будет имя той, с которой ее вызвали.

В общем, я не понял, что нужно )

@Qwertiy · 18.01.2014, 00:08

Это точно не подходит?

VB.NET
1
YourOtherForm.ShowDialog()

Тогда так:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
Public Overloads Sub Show(Owner As Form)
  With Me
    .TopLevel = False
    .Parent = Owner
    .Show()
  End With
End Sub
 
'==========================
 
YourOtherForm.Show(Me)

@Gelo123321 · 19.01.2014, 16:29 **[ТС]**

Qwertiy, при вызове моей формы методом MeForm.Show(Me) она оказывается вросшей в Form1 о_О.
Мне надо что бы моя форма, брала значения например, цвета BackColor в родительской форме и устанавливала себе при вызове, или при вызове располагалась по центре своей формы "матери" (StartPosition = FormStartPosition.CenterParent). И для этого я придумал сделать для нее родительскую форму ту, из которой вызывают мою форму. То есть неважно вызвали ли мою MeForm из Form1, или Form2, каждый раз она как бы будет разная (должна быть) так как будет брать цвет и прочие свойства из той формы из которой ее вызывают.

Возможно это можно сделать как то и по другому, но как, я еще не придумал.

Надеюсь понятно объяснил...

Добавлено через 2 часа 2 минуты
Qwertiy, безусловно в вашем коде кроется разгадка поставленной мною задачи, но не могу понять, почему моя форма появляется "вросшей" в Form1. К тому же StartPosition = FormStartPosition.CenterParent не работает.

@Qwertiy · 15.03.2014, 11:04

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

Мне надо что бы моя форма, брала значения например, цвета BackColor в родительской форме и устанавливала себе при вызове

VB.NET
1
2
3
4
5
Public Overloads Sub Show(Owner As Form)
  With Me
    .BackColor = Owner.BackColor
  End With
End Sub

Новые блоги и статьи Все статьи Все блоги /
Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определенном условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282

	Программно задать родительскую форму 14.01.2014, 17:56. Показов 2486. Ответов 12 Метки нет (Все метки) Создаю собственный класс формы, столкнулся с проблемой, как сделать, что бы форма с которой вызывают мою форму, была родительской? 0

Release 1652 / 715 / 47 Регистрация: 11.03.2012 Сообщений: 1,855 Записей в блоге: 1
	14.01.2014, 19:11
	Gelo123321, применять свой класс для родительской формы, иначе вариантов не вижу. 0

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282
	14.01.2014, 23:04 [ТС]
	Release, поподробнее, если можно. 0

@Qwertiy 835 / 643 / 101 Регистрация: 20.08.2013 Сообщений: 2,524
	15.01.2014, 13:05
	Через WinApi? Что вообще надо-то? 0

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282
	15.01.2014, 14:36 [ТС]
	Qwertiy, я создаю собственный класс формы. Потом я эту форму вызываю, например из Form1, посредством нажатия на кнопку Button1. Как в моем классе прописать, что бы та форма откуда ее вызывают мою форму, становилась родительской для моей. Вот это и надо. Могу дать свой код, но там только код формы, и то зачаточный -_- без попыток сделать форму родительской. 0

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282
	16.01.2014, 23:20 [ТС]
	Памирыч, а если моя форма вызывается на с Form1, a с Form2? 0

Памирыч Почетный модератор 23251 / 9163 / 1084 Регистрация: 11.04.2010 Сообщений: 11,014
	17.01.2014, 06:09
	Gelo123321, в свойствах проекта установите "Начальную форму" 0

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282
	17.01.2014, 18:08 [ТС]
	Памирыч, а что если у моей формы будет возможность вызываться как с Form1 так и с Form2. Лучше сделать что бы при создании класса, в этом самом классе присваивалась "материнская" форма та, из которой вызывают мой класс. Но как так сделать я не представляю. Разве что, никак. 0

@Gelo123321 22 / 22 / 8 Регистрация: 05.01.2012 Сообщений: 282
	19.01.2014, 16:29 [ТС]
	Qwertiy, при вызове моей формы методом MeForm.Show(Me) она оказывается вросшей в Form1 о_О. Мне надо что бы моя форма, брала значения например, цвета BackColor в родительской форме и устанавливала себе при вызове, или при вызове располагалась по центре своей формы "матери" (StartPosition = FormStartPosition.CenterParent). И для этого я придумал сделать для нее родительскую форму ту, из которой вызывают мою форму. То есть неважно вызвали ли мою MeForm из Form1, или Form2, каждый раз она как бы будет разная (должна быть) так как будет брать цвет и прочие свойства из той формы из которой ее вызывают. Возможно это можно сделать как то и по другому, но как, я еще не придумал. Надеюсь понятно объяснил... Добавлено через 2 часа 2 минуты Qwertiy, безусловно в вашем коде кроется разгадка поставленной мною задачи, но не могу понять, почему моя форма появляется "вросшей" в Form1. К тому же StartPosition = FormStartPosition.CenterParent не работает. 0

Программно задать родительскую форму

Решение