Сворачивание формы без бордюра по клике на ее иконку в панели задач

@MAXLviv · Регистрация: 28.07.2011

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

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

VB.NET

1	Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None

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

@Devel · 17.08.2011, 21:06

MAXLviv,Сворачивает форму при потере фокуса (например щелчке по панели задач или рабочему столу, хотя это не то, что Вы просите)

VB.NET

1
2
3

     Private Sub Form1_Deactivate(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Deactivate
          Me.WindowState = FormWindowState.Minimized
     End Sub

Возможно работать не будет. Сейчас Студия занята немного другим

Сорри

@Ciberst · 17.08.2011, 21:31

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

хотя это не то, что Вы просите

Не по теме:

Если не то? зачем писать?

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

Сейчас Студия занята немного другим

Не по теме:

Можно открыть вторую студию

@MAXLviv · 17.08.2011, 21:31 **[ТС]**

Сворачивается и сразу разворачивается))

@Ciberst · 17.08.2011, 21:37

MAXLviv, я тебя плохо понял, можешь разъяснить, а лучше показать картинку?

@MAXLviv · 17.08.2011, 21:45 **[ТС]**

Ciberst, при нажатии на иконку форма мигает(пропадает и появляется), тут картинкой не покажу, тут видео надо показывать))

@Ciberst · 17.08.2011, 21:49

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

Ciberst, при нажатии на иконку

где иконка расположена?

@MAXLviv · 17.08.2011, 21:51 **[ТС]**

Ciberst, на панели задач

@Devel · 17.08.2011, 22:01

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

Можно открыть вторую студию

Не по теме:

Проще процессор сразу в духовку кинуть, чем мучать его двумя и более студиями

@Ciberst · 17.08.2011, 22:10

VB.NET

Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
   Debug.Print(m.Msg)
        If m.Msg = 134 Then
            Me.WindowState = FormWindowState.Minimized
        ElseIf m.Msg = 7 Then
            Me.WindowState = FormWindowState.Normal
        End If
        MyBase.WndProc(m)
 
    End Sub

примерно так, проверь

Добавлено через 1 минуту
хотя, нет, плохо

@MAXLviv · 17.08.2011, 22:15 **[ТС]**

Ciberst, сразу сворачивается и развернуть не возможно.

@MAXLviv · 20.08.2011, 03:13 **[ТС]**

нашел вот такой код

VB.NET

Protected Overrides ReadOnly Property CreateParams() As CreateParams
        Get
            Dim CP As CreateParams = MyBase.CreateParams
            CP.Style = &HA0000
            Return CP
        End Get
    End Property

работает, но при запуске формы, форма моргает 2 секунды, а дальше все нормально, как это мерцание убрать?

Добавлено через 24 минуты
Мерцания у меня я так понял из за того что сначала на 2 секунды у меня запускается другая форма которая нужна для того чтоб главная форма успела загрузится и тогда только появлялась, что здесь можно сделать?

Блоги программистов
Обновление сайта www.historian.by Reglage 05.01.2025 Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .	Как использовать GraphQL в C# с HotChocolate Programming 05.01.2025 GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .	Модель полного двоичного суматора с помощью логических операций (python) AlexSky-coder 04.01.2025 def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()	Это мы не проходили, это нам не задавали...(асихронный счётчик с управляющим сигналом задержки). Hrethgir 04.01.2025 Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .	Руководство по созданию бота для Телеграм на Python IT_Exp 04.01.2025 Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .	Применение компонентов PrimeVue в Vue.js 3 на TypeScript BasicMan 04.01.2025 Введение в PrimeVue и настройка окружения PrimeVue представляет собой мощную библиотеку компонентов пользовательского интерфейса для Vue. js 3, которая предоставляет разработчикам богатый набор. . .
Как стать Senior developer cpp_developer 04.01.2025 В современной индустрии разработки программного обеспечения позиция Senior Developer представляет собой не просто следующую ступень карьерной лестницы, а качественно новый уровень профессионального. . .	Что известно о дате выхода Windows 12 и чего от нее ждать IT_Exp 04.01.2025 В мире технологий постоянно происходят изменения, и операционные системы не являются исключением. Windows 11, выпущенная в октябре 2021 года, принесла множество инноваций и улучшений, но. . .	Что новенького в .NET Core 9 Programming 04.01.2025 Обзор ключевых изменений в . NET Core 9 Платформа . NET Core продолжает активно развиваться, и версия 9 представляет собой значительный шаг вперед в эволюции этой технологии. Новый релиз. . .	Инструкция по установке python3.13.1 в Debian 12 AlexSky-coder 03.01.2025 sudo apt update sudo apt install build-essential zlib1g-dev libncurses5-dev libgdbm-dev libnss3-dev libssl-dev libreadline-dev libffi-dev wget. . .	Затестил триггеры. архив проекта прилагаю с GOA файлами в настройках архиватора проектов. Hrethgir 03.01.2025 В этот раз нет закольцованности, потому что от неё только глюки, как я понял, логика не вырезанная. Триггеры очень быстрые если верить измерениям с помощью анализатора от Gowin. Есть ещё регистры,. . .	Python в помощь DevOps IT_Exp 03.01.2025 Причины использования Python в работе DevOps Python стал неотъемлемой частью мира DevOps, и это не случайно. Этот язык программирования обладает множеством преимуществ, которые делают его. . .

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	17.08.2011, 21:31	3
	Сообщение от Devel хотя это не то, что Вы просите Не по теме: Если не то? зачем писать? Сообщение от Devel Сейчас Студия занята немного другим Не по теме: Можно открыть вторую студию 0

@MAXLviv 0 / 0 / 1 Регистрация: 28.07.2011 Сообщений: 27
	17.08.2011, 21:31 [ТС]	4
	Сворачивается и сразу разворачивается)) 0

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	17.08.2011, 21:37	5
	MAXLviv, я тебя плохо понял, можешь разъяснить, а лучше показать картинку? 0

@MAXLviv 0 / 0 / 1 Регистрация: 28.07.2011 Сообщений: 27
	17.08.2011, 21:45 [ТС]	6
	Ciberst, при нажатии на иконку форма мигает(пропадает и появляется), тут картинкой не покажу, тут видео надо показывать)) 0

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	17.08.2011, 21:49	7
	Сообщение от MAXLviv Ciberst, при нажатии на иконку где иконка расположена? 0

@MAXLviv 0 / 0 / 1 Регистрация: 28.07.2011 Сообщений: 27
	17.08.2011, 21:51 [ТС]	8
	Ciberst, на панели задач 0

@Devel 91 / 46 / 2 Регистрация: 02.11.2010 Сообщений: 261
	17.08.2011, 22:01	9
	Сообщение от Ciberst Можно открыть вторую студию Не по теме: Проще процессор сразу в духовку кинуть, чем мучать его двумя и более студиями 0

@MAXLviv 0 / 0 / 1 Регистрация: 28.07.2011 Сообщений: 27
	17.08.2011, 22:15 [ТС]	11
	Ciberst, сразу сворачивается и развернуть не возможно. 0

	20.08.2011, 03:13