OpenWindow() ohne Close & mit MinimizeGadget Maximize SizeGadget ?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
marcelx
Beiträge: 424
Registriert: 19.02.2010 20:19
Wohnort: Darmstadt

OpenWindow() ohne Close & mit MinimizeGadget Maximize SizeGadget ?

Beitrag von marcelx »

Hallo,

geht das?
Win-10, PB 5.31 (Windows - x86)
Lord
Beiträge: 313
Registriert: 21.01.2008 19:11

Re: OpenWindow() ohne Close & mit MinimizeGadget Maximize SizeGadget ?

Beitrag von Lord »

Hallo!

rsbasics WinaAPILibrary bietet zwei Möglichkeiten an:

Code: Alles auswählen

If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_Invisible|
                                     #PB_Window_SizeGadget|#PB_Window_MinimizeGadget| #PB_Window_MaximizeGadget)
  DeleteMenu_(GetSystemMenu_(WindowID(0),#False),6,#MF_BYPOSITION)
  HideWindow(0,0)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Code: Alles auswählen

If OpenWindow(0, 0, 0, 500, 250, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered|
                                     #PB_Window_SizeGadget|#PB_Window_MinimizeGadget| #PB_Window_MaximizeGadget)
  EnableMenuItem_(GetSystemMenu_(WindowID(0), #False), #SC_CLOSE, #MF_BYCOMMAND | 1)
  
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Bei beiden Beispielen wird der Close Button deaktiviert aber nicht entfernt.
Bei #1 ist zusätzlich der Eintrag im System-Popup entfernt.
Bild
Benutzeravatar
marcelx
Beiträge: 424
Registriert: 19.02.2010 20:19
Wohnort: Darmstadt

Re: OpenWindow() ohne Close & mit MinimizeGadget Maximize SizeGadget ?

Beitrag von marcelx »

Super, danke Lord (AND rsbasic)
Win-10, PB 5.31 (Windows - x86)
Antworten