| |
|
|
 Pedro Santos | Hallo Profaner
Gibt es ein Windowstyle wo das Fenster nur Vergrößerungsbox (Pfeil nach oben) und Verkleinerungsbox (Pfeil nach unten) hat?
Danke
Gruss
Pedro |
|
|
| |
|
|
|
 | Hallo Pedro Meinst Du sowas ? KompilierenMarkierenSeparieren---------------------------------------------------
Def GetSystemMenu(2) !"USER32","GetSystemMenu"
Def EnableMenuItem(3) !"USER32","EnableMenuItem"
DECLARE EE%,ende%
EE%=0
Window 100,50-600,400
EnableMenuitem(GetSystemMenu(GetActiveWindow(),0),$F060,1)
ende%=CREATE("BUTTON",%HWND,"ENDE",10,10,100,25)
WhileNot EE%
WAITINPUT
Case GetFocus(ende%):END
WEND
|
|
|
| |
|
|
|
 Pedro Santos | Hallo Horst
Danke sowas meine ich aber ohne das copyright von RGH
Gruss
Pedro |
|
|
| |
|
|
|
 Jens Petzold | Def Getsystemmenu(2) !USER32,GetSystemMenu Def Enablemenuitem(3) !USER32,EnableMenuItem WINDOWSTYLE 27 WINDOWTITLE Mein Fenster Window 100,50-600,400 Enablemenuitem(Getsystemmenu(Getactivewindow(),0),$F060,1) Waitinput |
|
|
| |
|
|