Verfasst: 31.03.2007 17:09
edel hat geschrieben:Warum das denn ?!

Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/
edel hat geschrieben:Warum das denn ?!
Code: Alles auswählen
Procedure SetWindowCloseButton(hWnd.l, Show.l)
If (Show = #True Or Show = #False) And hWnd
hSysMenu = GetSystemMenu_(hWnd, #False)
If hSysMenu
EnableMenuItem_(hSysMenu, #SC_CLOSE, #MF_BYCOMMAND | Show ! 1)
DrawMenuBar_(hWnd)
EndIf
EndIf
EndProcedure
Code: Alles auswählen
(Show = #True Or Show = #False)
sollte er eigentlich, ist er aber bei direkten vergleich mit den konstanten nicht.Fluid Byte hat geschrieben:Der eigentliche Witz ist das dieser Teil redundant ist.
Code: Alles auswählen
For n=-2 To 3
Debug Str(n)+" *--------"
If n = #True
Debug "true"
ElseIf n = #False
Debug "false"
Else
Debug "none"
EndIf
;------- test 2
If n = n&1 : Debug "0 or 1" : EndIf
;-------
Next
Code: Alles auswählen
If Show = Show&1
Code: Alles auswählen
OpenWindow(0, 0, 0, 240, 100, "Modal frame", #PB_Window_SystemMenu | #PB_Window_TitleBar | #PB_Window_ScreenCentered | #PB_Window_Invisible)
SetWindowLong_(WindowID(0), #GWL_EXSTYLE, GetWindowLong_(WindowID(0), #GWL_EXSTYLE) | #WS_EX_DLGMODALFRAME)
HideWindow(0, 0)
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
Wenn man auf "Suchen" klickt, bekommt man die Möglichkeit, folgende Bereiche zu durchsuchen:Kaeru Gaman hat geschrieben: wußte ich noch garnicht, dass ich threads aus dem englischen forum finden kann, wenn ich die suchfunktion dieses forums verwende....
Wenn Du das ironisch gemeint hast, fehlt mir der Smiley...PureBoard
PureBoard-Archiv
Englisches Forum
PureArea.net