| |
|
|
Julian Schmidt | pourquoi ist pour dem change aus dem Vollbildmodus qui Titleleiste verschwunden? comment bekommt on es hin cela vous pour dem change wieder vorhanden ist? KompilierenMarqueSéparationdeclare mode$
WindowStyle 24'16=kein © + 8=System Menü
Windowtitle "Beispiel"
Window 300,100-500,300
cls rgb(255,0,0)
AppendMenubar 1001,"&Vollbild"
AppendMenubar 1002,"&Beenden"
AddHotKey 1101,122, 0//F11
while 1
waitinput
if menuitem(1001) or menuitem(1101)
if mode$<>1
SetStyle %hwnd,80'16=kein © + 64=keine Titlezeile
ShowMax %hwnd
mode$=1
MessageBox("Vollbildmodus eingeschaltet","INFO",64)
elseif mode$=1
SetStyle %hwnd,24'16=kein © + 8=System Menü
Setwindowpos %hwnd=300,100-500,300
clear mode$
MessageBox("Vollbildmodus ausgeschaltet","INFO",64)
Endif
elseif menuitem(1002)
end
Endif
Endwhile
LG
Julian57 |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 13.03.2011 ▲ |
|
|
|
|
Andreas Miethe
| SetStyle erwartet API-Stilkonstanten aucun de Xprofan. KompilierenMarqueSéparationDeclare mode$
WindowStyle 24'16=kein © + 8=System Menü
WindowTitle "Beispiel"
WINDOW 300,100-500,300
CLS rgb(255,0,0)
AppendMenubar 1001,"&Vollbild"
AppendMenubar 1002,"&Beenden"
AddHotKey 1101,122, 0//F11
While 1
Waitinput
If menuitem(1001) or menuitem(1101)
If mode$<>1
Windowstyle 80'16=kein © + 64=keine Titlezeile
ShowMax %hwnd
mode$=1
MessageBox("Vollbildmodus eingeschaltet","INFO",64)
ElseIf mode$=1
Windowstyle 24'16=kein © + 8=System Menü
Setwindowpos %hwnd=300,100-500,300
Clear mode$
MessageBox("Vollbildmodus ausgeschaltet","INFO",64)
EndIf
ElseIf menuitem(1002)
End
EndIf
Endwhile
|
|
|
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...] | 13.03.2011 ▲ |
|
|
|
|
Julian Schmidt | Andreas Miethe (13.03.11)
SetStyle erwartet API-Stilkonstanten aucun de Xprofan. KompilierenMarqueSéparationDeclare mode$
WindowStyle 24'16=kein © + 8=System Menü
WindowTitle "Beispiel"
WINDOW 300,100-500,300
CLS rgb(255,0,0)
AppendMenubar 1001,"&Vollbild"
AppendMenubar 1002,"&Beenden"
AddHotKey 1101,122, 0//F11
While 1
Waitinput
If menuitem(1001) or menuitem(1101)
If mode$<>1
Windowstyle 80'16=kein © + 64=keine Titlezeile
ShowMax %hwnd
mode$=1
MessageBox("Vollbildmodus eingeschaltet","INFO",64)
ElseIf mode$=1
Windowstyle 24'16=kein © + 8=System Menü
Setwindowpos %hwnd=300,100-500,300
Clear mode$
MessageBox("Vollbildmodus ausgeschaltet","INFO",64)
EndIf
ElseIf menuitem(1002)
End
EndIf
Endwhile
maintenant wird qui Stil des Programms pas plus angepasst ! qui Titleleiste bleibt im Vollbild conservé
comment peux on den Windowstyle pour dem erzeugen eines Hauptfensters changement?
LG
Julian |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 13.03.2011 ▲ |
|
|
|
|
Julian Schmidt | Hab es eh bien sur Avancé Fensterstile hinbekommen KompilierenMarqueSéparation $H Windows.ph
declare mode$
WindowStyle 24'16=kein © + 8=System Menü
Windowtitle "Beispiel"
Window 300,100-500,300
cls rgb(255,0,0)
AppendMenubar 1001,"&Vollbild"
AppendMenubar 1002,"&Beenden"
AddHotKey 1101,122, 0//F11
while 1
waitinput
if menuitem(1001) or menuitem(1101)
if mode$<>1
SetStyle %hWnd,80
ShowMax %hwnd
mode$=1
elseif mode$=1
SetStyle %hWnd, 24 | ~WS_TILEDWINDOW
Setwindowpos %hwnd=300,100-500,300
clear mode$
Endif
elseif menuitem(1002)
end
Endif
Endwhile
LG
Julian |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 13.03.2011 ▲ |
|
|
|