Подскажите как в Лазарусе реализовать функцию аналогичную фукции делфи
showwindow(Application.handle, SW_HIDE); //Прячим кнопку на панели задачь, форма видима и можно с ней работать
showwindow(Frorm1.handle, SW_HIDE); //Прячим форму
Интересуют обе функции, нужно чтоб кнопки на панели не было, а с формой можно было работать.
Прячим форму
Модератор: Модераторы
Эти функции не Делфи! Это чистый WinAPI
У каждой формы есть свойство ShowInTaskBar - должно работать
А в Винде не кто тебе не мешает использовать эти функции. Подключи модуль Windows
У каждой формы есть свойство ShowInTaskBar - должно работать
А в Винде не кто тебе не мешает использовать эти функции. Подключи модуль Windows
Подключил модуль Windows...
showwindow(Form1.handle, SW_HIDE); //Прячим форму
ЗАРАБОТАЛА, форма исчезает.
showwindow(Application.handle, SW_HIDE); //Прячим кнопку на панели задачь, форма видима и можно с ней работать
НЕРАБОТАЕТ, жалуется на HANDLE (Error: identifier idents no member "Handle")

showwindow(Form1.handle, SW_HIDE); //Прячим форму
ЗАРАБОТАЛА, форма исчезает.
showwindow(Application.handle, SW_HIDE); //Прячим кнопку на панели задачь, форма видима и можно с ней работать
НЕРАБОТАЕТ, жалуется на HANDLE (Error: identifier idents no member "Handle")
А я все таки нашел решение
Все оказалось очень просто...
может кому тоже пригодиться:
ShowWindow(FindWindow(nil,'project1'), sw_hide); - прячим кнопку на панели задачь
ShowWindow(FindWindow(nil,'project1'), sw_show); - показываем кнопку на панели задачь
Пользуйтесь
Все оказалось очень просто...
может кому тоже пригодиться:
ShowWindow(FindWindow(nil,'project1'), sw_hide); - прячим кнопку на панели задачь
ShowWindow(FindWindow(nil,'project1'), sw_show); - показываем кнопку на панели задачь
Пользуйтесь
qivi писал(а):А я все таки нашел решение![]()
Все оказалось очень просто...
может кому тоже пригодиться:
ShowWindow(FindWindow(nil,'project1'), sw_hide); - прячим кнопку на панели задачь
ShowWindow(FindWindow(nil,'project1'), sw_show); - показываем кнопку на панели задачь
Пользуйтесь
Это не выход! Очень медленно!
alexs писал(а):Не изобретай велосипед - у каждого окна есть свойство ShowInTaskBar - и не надо мучаться.
на Application он не расспространяется...
А как пользоваться ShowInTaskBar, что-то я не понял .... какой параметр не ставил этому свойству, ничего не происходило
Киньте примерчик пожалуйста...
Киньте примерчик пожалуйста...
- alexs
- долгожитель
- Сообщения: 4069
- Зарегистрирован: 15.05.2005 23:17:07
- Откуда: г.Ставрополь
- Контактная информация:
Mr.Smart писал(а):на Application он не расспространяется...
Application.ShowMainForm
Глядеть в исходники LCL очень полезно.
qivi писал(а):как пользоваться ShowInTaskBar, что-то я не понял
stDefault - системное поведение
stAlways - отображать всегда
stNever - не отображать
работает
