| |
|
|
Julian Schmidt | ¿Por qué es después de el Wechsel de el Vollbildmodus el Titleleiste verschwunden? Como bekommt uno lo hin el ellos después de el Wechsel otra vez disponible es? KompilierenMarcaSeparacióndeclare 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 esperado API-Stilkonstanten no de Xprofan. KompilierenMarcaSeparaciónDeclare 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 esperado API-Stilkonstanten no de Xprofan. KompilierenMarcaSeparaciónDeclare 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
Jetzt se el Stil des Programms no mehr adaptado ! El Titleleiste restos en el Vollbild obtener
¿Cómo se puede uno el Windowstyle después de el erzeugen uno Hauptfensters ändern?
LG
Julian |
|
|
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 13.03.2011 ▲ |
|
|
|
|
Julian Schmidt | Hab lo nun encima erweiterte Fensterstile hinbekommen KompilierenMarcaSeparación $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 ▲ |
|
|
|