Seite 1 von 1
'Rand' vom Fenster ändern
Verfasst: 15.06.2007 22:28
von S3b
Ich will das da
verändern oder verschwinden lassen..
geht das mit PureBasic?
Danke im Vorraus
Verfasst: 15.06.2007 22:33
von AND51
Ändern => Selber zeichnen
Verschwinden => #PB_Window_BorderLess
Verfasst: 16.06.2007 12:42
von Tafkadasom2k5
On the Fly (also bei bestimmten Aufrufen innerhalb deines Programmes), oder nur beim Erstellen?
Code: Alles auswählen
Procedure.l disableBorder(lWindow.l)
lWindow = WindowID(lWindow)
lCurrentStyle.l = GetWindowLong_(lWindow, #GWL_STYLE)
lNewStyle.l = lCurrentStyle NOT #WS_BORDER
lNewStyle = lNewStyle NOT #WS_BORDER
lNewStyle = lNewStyle NOT #WS_THICKFRAME
lNewStyle = lNewStyle NOT #WS_SYSMENU
SetWindowLong_(lWindow, #GWL_STYLE, lNewStyle)
EndProcedure
Das ist jetzt nur so dahingeschreibselt, ohne zu testen und ohne lange drüber nachzudenken. Mit dem "AND" und dem "NOT" bin ich mir nicht mehr so sicher.
Naja, ich hoffe, ich konnte wenigstens vom Ansatz her helfen
Gr33tz
Tafkadasom2k5
Verfasst: 16.06.2007 13:05
von S3b
Kay, Problem gelöst.. danke Tafkadasom2k5 & AND51
Verfasst: 18.06.2007 09:04
von Tafkadasom2k5
Funktionierte meine Procedure so ohne Weiteres?
