Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
 Аватар для Vladislav Grom
9 / 8 / 2
Регистрация: 01.11.2013
Сообщений: 111

Подписать кнопку на событие

11.07.2015, 09:22. Показов 1060. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Делаю в WPF TabControl в которые добавляются по мере надобности Items, которые если надо можно закрыть. Реализую так: Создал UserControl(Это типа заголовок моего будущего Item), добавил на него кнопку (Которая должна типа закрывать эту вкладку), Создал другой класс где наследовал только что созданный контрол. Вот теперь и сам вопрос. Как мне получить доступ к событиям кнопки которая должна закрывать вкладку при нажатии. Вот пример кода всего.

Пример кода контрола:
XML
1
2
3
4
5
6
7
8
9
10
11
12
<UserControl x:Class="_Tab_Item"
             xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
             xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
             xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" 
             xmlns:d="http://schemas.microsoft.com/expression/blend/2008" 
             mc:Ignorable="d" 
             d:DesignHeight="23" d:DesignWidth="81" Margin="0">
    <Grid>
        <Label Content="TabItem"  Height="23" HorizontalAlignment="Left" Margin="4,1,0,0" Name="label_TabTitle" VerticalAlignment="Top" FontFamily="Courier" FontSize="12" />
        <Button Content="X"  Height="19" HorizontalAlignment="Right" Margin="0,0,4,1" x:Name="button_close" VerticalAlignment="Bottom" Width="20" FontFamily="Courier" FontWeight="Bold" Style="{StaticResource {x:Static ToolBar.ButtonStyleKey}}" FontStretch="Normal" Visibility="Visible" FontSize="14" Padding="0" ToolTip="Close"/>
    </Grid>
</UserControl>

Вот пример класса:


VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
Public Class _Closebal_Tab
    Inherits TabItem
    Dim h As New _Tab_Item
    Public WriteOnly Property MY_TITLE As String
        Set(value As String)
            DirectCast(Me.Header, _Tab_Item).label_TabTitle.Content = value
        End Set
    End Property
 
 
    Sub New()
        Me.Header = h
    End Sub
 
 
 
    '
    ' - - - Overrides  - - -
    '
 
 
    ' Override OnSelected - Show the Close Button
    Protected Overrides Sub OnSelected(e As RoutedEventArgs)
        MyBase.OnSelected(e)
        DirectCast(Me.Header, _Tab_Item).button_close.Visibility = Visibility.Visible
    End Sub
 
    ' Override OnUnSelected - Hide the Close Button
    Protected Overrides Sub OnUnselected(e As RoutedEventArgs)
        MyBase.OnUnselected(e)
        DirectCast(Me.Header, _Tab_Item).button_close.Visibility = Visibility.Hidden
    End Sub
 
    ' Override OnMouseEnter - Show the Close Button
    Protected Overrides Sub OnMouseEnter(e As MouseEventArgs)
        MyBase.OnMouseEnter(e)
        DirectCast(Me.Header, _Tab_Item).button_close.Visibility = Visibility.Visible
    End Sub
 
    ' Override OnMouseLeave - Hide the Close Button (If it is NOT selected)
    Protected Overrides Sub OnMouseLeave(e As MouseEventArgs)
        MyBase.OnMouseLeave(e)
        If Not Me.IsSelected Then
            DirectCast(Me.Header, _Tab_Item).button_close.Visibility = Visibility.Hidden
        End If
    End Sub
 
 
    ' Button MouseEnter - When the mouse is over the button - change color to Red
    Protected Sub button_close_MouseEnter(e As MouseEventArgs)
        DirectCast(Me.Header, _Tab_Item).button_close.Foreground = Brushes.Red
    End Sub
 
    ' Button MouseLeave - When mouse is no longer over button - change color back to black
    Protected Sub button_close_MouseLeave(sender As Object, e As MouseEventArgs)
        DirectCast(Me.Header, _Tab_Item).button_close.Foreground = Brushes.Black
    End Sub
 
 
    ' Button Close Click - Remove the Tab - (or raise an event indicating a "CloseTab" event has occurred)
    Protected Sub button_close_Click(e As RoutedEventArgs)
        DirectCast(Me.Parent, TabControl).Items.Remove(Me)
    End Sub
 
 
    ' Label SizeChanged - When the Size of the Label changes (due to setting the Title) set position of button properly
    Private Sub label_TabTitle_SizeChanged(sender As Object, e As SizeChangedEventArgs)
        DirectCast(Me.Header, _Tab_Item).button_close.Margin = New Thickness(DirectCast(Me.Header, _Tab_Item).label_TabTitle.ActualWidth + 5, 3, 4, 0)
    End Sub
 
 
 
 
 
End Class


Не знаю сумел ли я объяснить что у меня не получается но,был бы рад любой помощи.


p.s Код не мой. Я его нарыл на шарпе и перекодировал
там а начале есть такое:
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
{
        // Create an instance of the usercontrol
        CloseableHeader closableTabHeader = new CloseableHeader();
 
        // Assign the usercontrol to the tab header
        this.Header = closableTabHeader;
 
        // Attach to the CloseableHeader events (Mouse Enter/Leave, Button Click, and Label resize)
        closableTabHeader.button_close.MouseEnter += new MouseEventHandler(button_close_MouseEnter);
        closableTabHeader.button_close.MouseLeave += new MouseEventHandler(button_close_MouseLeave);
        closableTabHeader.button_close.Click += new RoutedEventHandler(button_close_Click);
        closableTabHeader.label_TabTitle.SizeChanged += new SizeChangedEventHandler(label_TabTitle_SizeChanged);
    }
Разобраться в этом у меня нервов не хватает....



Пожалуйста срочно надо ))) Работа стоит )

Добавлено через 1 час 10 минут
блин. как всё просто оказывается )))
VB.NET
1
  AddHandler h.button_close.Click, New EventHandler(AddressOf button_close_Click)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
11.07.2015, 09:22
Ответы с готовыми решениями:

Как подписать на событие каждую кнопку в массиве
Как в массиве объекта (Button) добавить такое событие на каждый Button на каждый Button своя мелодия при нажатии Public Class Form1 ...

Подписать на событие 128 PictureBox
на форме 128 PictureBox в них нужно прописать текст: PictureBox1.CreateGraphics.DrawString(Mid(str, 2, 1), tmpFont,...

Подписать на событие клика ячейки DataGridView
Приветствую. На форме имеется TabControl 4-мя TabPage. На каждой TabPage по одному DataGridView. Я знаю, как добавить хэндл клика всем...

2
 Аватар для diadiavova
7258 / 2605 / 744
Регистрация: 11.04.2015
Сообщений: 4,150
Записей в блоге: 43
11.07.2015, 09:30
Цитата Сообщение от Vladislav Grom Посмотреть сообщение
Разобраться в этом у меня нервов не хватает....
Так здесь как раз обработчики событий и назначаются.
C#
1
CloseableHeader closableTabHeader = new CloseableHeader();
Здесь, я думаю и так понятно, но вот
VB.NET
1
Dim closableTabHeader = New CloseableHeader()
C#
1
this.Header = closableTabHeader;
Здесь просто this на Me заменить и точку с запятой убрать.
C#
1
closableTabHeader.button_close.MouseEnter += new MouseEventHandler(button_close_MouseEnter);
А это, как и все остальные подобные конструкции, делается так
VB.NET
1
AddHandler closableTabHeader.button_close.MouseEnter, AddressOf button_close_MouseEnter
1
 Аватар для Vladislav Grom
9 / 8 / 2
Регистрация: 01.11.2013
Сообщений: 111
11.07.2015, 10:11  [ТС]
Спасибо ))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.07.2015, 10:11
Помогаю со студенческими работами здесь

Подписать на событие динамически созданный объект
Друзья, подскажите пожалуйста, что делаю неправильно. Есть программка, создает массивы label и TextBox. С этой задачей вроде справился....

Подписать на одно событие множество элементов управления
Здравствуйте. На форме есть 5 PictureBox'ов. Необходимо сделать так, чтобы при нажатии на любой из них, он выбирал картинку из ресурсов....

Событие на кнопку X
Какое событие отвечает за кнопку X ??? Как сделать так чтобы при нажатие на X программа просто свернула себя в трей.

Как подписать кнопку на событие
private void Form1_Load(object sender, EventArgs e) { button.Size = new Size(64, 20); button.Text =...

Как подписать кнопку на событие
есть коллекция кнопок List&lt;Button&gt; list_btn есть метод создающий несколько кнопок в этой коллекции private void btn_test(object sender,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru