Подскажите как сделать чтобы при клике по элементу Panel у нее появлялся контур?
Подскажите как сделать чтобы при клике по элементу Panel у нее появлялся контур?
еще пытался сделать чтобы при нажатии в текстовом поле отображалась определенная информация. Как понял, это через фокус делается
пробовал вот так, неработает...
могу я вобще с элементом Панель использовать Private Sub Panel1_Click??
еще пытался сделать чтобы при нажатии в текстовом поле отображалась определенная информация. Как понял, это через фокус делается
пробовал вот так, неработает...
Код:
Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
Private Sub panel1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
TextBox2.Text = "кккккккккккккккккккккккк"
End Sub
Private Sub panel1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus
TextBox2.Text = "ыыыыыыыыыыыыыыыыыыыыыыыы"
End Sub
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
Private Sub panel1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
TextBox2.Text = "кккккккккккккккккккккккк"
End Sub
Private Sub panel1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus
TextBox2.Text = "ыыыыыыыыыыыыыыыыыыыыыыыы"
End Sub
контур - в смысле выделение этой панели как активной
вот так уже
Код:
Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
Private Sub panel1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.LostFocus
TextBox2.Text = "1234"
End Sub
Private Sub panel1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.GotFocus
TextBox2.Text = "123"
End Sub
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
Private Sub panel1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.LostFocus
TextBox2.Text = "1234"
End Sub
Private Sub panel1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1.GotFocus
TextBox2.Text = "123"
End Sub
Вот это:
Серьезная ошибка.
Вы подписываетесь на эвент каждый раз, когда форма перерисовывается - то есть каждый раз когда ее перекрывает-проходит над ней итп - другая форма.
Зачем?
обработчик эвента MouseMove будет вызываться много раз, и с увеличением времени использования программы она будет работать все медленнее, и медленнее.
Подписку обработчиков надо делать один раз - в момент создания контрола.
Код:
Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
AddHandler (Panel1.MouseMove), AddressOf Panel_MouseMove
Me.Controls.Add(Panel1)
End Sub
Вы подписываетесь на эвент каждый раз, когда форма перерисовывается - то есть каждый раз когда ее перекрывает-проходит над ней итп - другая форма.
Зачем?
обработчик эвента MouseMove будет вызываться много раз, и с увеличением времени использования программы она будет работать все медленнее, и медленнее.
Подписку обработчиков надо делать один раз - в момент создания контрола.
По сути вопроса - у эвента MouseMove есть параметры, например e - а внем даже есть информация, нажата кнопка мыши или нет и какая.
Вот этот случай и можно обработать, приведя тип обьекта sender к типу panel и изменив у полученного свойство borderstyle (не помню точно).
Вот этот случай и можно обработать, приведя тип обьекта sender к типу panel и изменив у полученного свойство borderstyle (не помню точно).
увы в других вариантах перетаскивания пока разобраться не смог
Цитата: Rayrat7
увы в других вариантах перетаскивания пока разобраться не смог
Это не оправдание чтобы писать багокод.
Опасно продолжать так - в какой-то момент вы вообще перестанете понимать, что у вас происходит.
Я же давал вроде пример с перетаскиванием....
Надо:
- Четко выяснить, где создается панель. (и опять - почему панель? надо делать Юзерконтрол! Примитивным подходом вы уже не обойдетесь. Примитивно - вовсе не значит просто. Обязательно надо использовать организующие конструкции - в тот момент, когда примитивный подход приводит к копированию и писанию повторяющегося кода.
- в момент созадния экземпляра, его надо подготовить к будущей жизни - прицепить все необходимые обработчики, дать ему нужную визуализацию, итп...
- все, дальше он уже должен жить своей жизнью и реагировать на действия пользователя. Реагировать - а не додалбливаться инициализацией на грани интуиции.
не люблю писать на виби - хотя как раз вот сейчас пишу. На шарпе мог бы вам все поттвердить кодом.
:-)
:-)
Сделал по другому, теперь на PictureBox на них можно?) они никуда не пропадают при сворачивании и тп
Увы у меня уже почти нет времени на обучение и вникание.... попробую сделать все на столько просто на сколько это только возможно чтобы основные функции хотябы выполнялись а там уже походу буду наварачивать
Можно. Панельки тоже не пропадают при сворачивании - потому, что они дети класса Control
и они все перерисовываются.
Кстати, как у вас с пониманием наследования? почему в эвенте можно через ссылку на обьект (sender) можно узнать и достать того, у кого этот эвент случился - вы это понимаете?
Виби плох тем, что он пытается (и весьма успешно) скрыть обьектную структуру дотнета, сделать все типа интуитивно понятно. Это здорово, когда действительно не нужно выходить за рамки принципа RAD - rapid application development , накидал кнопочек и текстбоксов - и программа готова.
Но у вас уже не тот случай.
и они все перерисовываются.
Кстати, как у вас с пониманием наследования? почему в эвенте можно через ссылку на обьект (sender) можно узнать и достать того, у кого этот эвент случился - вы это понимаете?
Виби плох тем, что он пытается (и весьма успешно) скрыть обьектную структуру дотнета, сделать все типа интуитивно понятно. Это здорово, когда действительно не нужно выходить за рамки принципа RAD - rapid application development , накидал кнопочек и текстбоксов - и программа готова.
Но у вас уже не тот случай.
Цитата: Rayrat7
а там уже походу буду наварачивать
Вы ведь не первый, кто оказался в такой же ситуации.
Вот как раз юзерконтрол и позволил бы вам - "по ходу наворачивать" - а так придется тупо все переписывать.
Использовал BorderStyle для выделения объекта при нажатии как сделать чтобы он пропадал с предыдущего объекта при нажатии на новый??
чтобы выделение всегда было только на одном объекте
Ну с твоей архитектурой приложения примерно так:
при клике в цикле пробегаем по всем панелям и отключаем у них рамку, у кликнутого включаем.
при клике в цикле пробегаем по всем панелям и отключаем у них рамку, у кликнутого включаем.
Не, лучше так:
Создаём переменную, в которую будем записывать хендл объекта на который устанавливаем рамку.
Потом при клике удаляем рамку с объекта который сейчас в переменной, потом устанавливаем рамку на новый объект и сохраняем новый хендл в переменную.
Создаём переменную, в которую будем записывать хендл объекта на который устанавливаем рамку.
Потом при клике удаляем рамку с объекта который сейчас в переменной, потом устанавливаем рамку на новый объект и сохраняем новый хендл в переменную.
Цитата: QWERYTY
Создаём переменную, в которую будем записывать хендл объекта на который устанавливаем рамку.
Потом при клике удаляем рамку с объекта который сейчас в переменной, потом устанавливаем рамку на новый объект и сохраняем новый хендл в переменную
Потом при клике удаляем рамку с объекта который сейчас в переменной, потом устанавливаем рамку на новый объект и сохраняем новый хендл в переменную
Поддерживаю,хороший вариант.Сам так некогда делал
Разумеется,следует проверять переменную на пустоту
ОК попробую