ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Список форм приложения
7 сообщений из 7, страница 1 из 1
Список форм приложения
    #39177810
Sergey_New
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_New
Участник
Создаю список форм приложения:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
    Public lstForms As New List(Of String)
    Sub GedForms()
        Dim myAssembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
        Dim types As Type() = myAssembly.GetTypes()
        For Each myType In types
            If myType.BaseType.FullName = "System.Windows.Forms.Form" Then
                Dim s As String = myType.Name
                lstForms.Add(s)
            End If
        Next
    End Sub


Подскажите, как обращаться к свойствам получаемых в цикле форм, не только имени формы?
...
Рейтинг: 0 / 0
24.02.2016, 14:53
| Ответить | Цитировать | Написать  
Список форм приложения
    #39177816
Фотография pation
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
pation
Участник
Sergey_New,

Код: c#
1.
typeof(Form).IsAssignableFrom(myType)
...
Рейтинг: 0 / 0
24.02.2016, 14:56
| Ответить | Цитировать | Написать  
Список форм приложения
    #39177842
Sergey_New
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_New
Участник
Вставил в цикл
Код: vbnet
1.
Dim frm As Form = Typeof(Form).IsAssignableFrom(myType)


Ошибка: вставить Is
...
Рейтинг: 0 / 0
24.02.2016, 15:08
| Ответить | Цитировать | Написать  
Список форм приложения
    #39177926
Фотография pation
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
pation
Участник
Sergey_New,

открой мсдн
Код: c#
1.
2.
3.
If Typeof(Form).IsAssignableFrom(myType) Then
  lstForms.Add(myType.Name)
End If
...
Рейтинг: 0 / 0
24.02.2016, 16:11
| Ответить | Цитировать | Написать  
Список форм приложения
    #39177977
Sergey_New
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_New
Участник
pation,
Имена форм и так добавляются в приведённом в сабже коде.
Мне нужно получить еще и другие свойства форм.
Кстати, формула
Код: vbnet
1.
2.
3.
If Typeof(Form).IsAssignableFrom(myType) Then
  lstForms.Add(myType.Name)
End If


так же вызывает ошибку.
...
Рейтинг: 0 / 0
24.02.2016, 17:01
| Ответить | Цитировать | Написать  
Список форм приложения
    #39185334
Фотография pation
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
pation
Участник
Sergey_NewМне нужно получить еще и другие свойства форм.
какие?


Sergey_Newтак же вызывает ошибку.
какую?
...
Рейтинг: 0 / 0
03.03.2016, 19:28
| Ответить | Цитировать | Написать  
Список форм приложения
    #39185454
Артем G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Артем G
Гость
1 почему у вас список форм как List(of String) а не List(of Form)?

2 не проще ли сделать запрос с помощью lambda expressions?

под рукой нет открытого WinForm проекта но вот код для примера который должен вас будет наталкнуть как это сделать красивее

Код: c#
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
private void toolStripButtonBooks_Click(object sender, EventArgs e)
{
    FormBooks formBooks;
 
    if (!this.MdiChildren.Any<Form>(item => item is FormBooks))
    {
        formBooks = new FormBooks();
        formBooks.MdiParent = this;
        formBooks.Show();
    }
    else
    {
      formBooks =  (FormBooks) this.MdiChildren.FirstOrDefault<Form>(item => item is FormBooks);
      formBooks.Activate();
    }
}
...
Рейтинг: 0 / 0
03.03.2016, 22:50
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Список форм приложения
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]