Posted: Wed Feb 06, 2002 8:12 am
Restored from previous forum. Originally posted by Roxxler.
Hi,
hier eine kleine Procedure welche es erlaubt, ein Fenster in den
Vorder- oder Hintergrund zu stellen.
Hi,
here a little procedure which allows to put a window to front or
back.
Procedure.b FrontWindow(fensterid.l,status.b)
;
; Das Unterprogramm bringt das angegebene Fenster in den Vordergrund oder
; in den Hintergrund (je nach status.b).
; Es wird die WindowID() übergeben, so ist mittels UseWindow() vorher bestimmbar
; welches Fenster in den Vorder- oder Hintergrund gebracht werden soll. Beispiel:
; UseWindow(2)
; FrontWindow(WindowID(),-1) ; bringt das angegebene Fenster 2 nach vorn
;
; This procedure puts the given window to the back or to the front.
; For that you must use PureBasic's WindowID(), so you can define with a
; UseWindow() what window is put to back or front. Example:
; UseWindow(2)
; FrontWindow(WindowID(),-1) ; puts the window 2 to front
;
; Parameter: fensterid.l = Die Adresse des Fensters (ermittelt von WindowID())
; The address of the window structure (given by WindowID())
;
; status.b = TRUE = -1 Das Fenster wird nach vorn gebracht
; The window is put to the front
; = FALSE = 0 Das Fenster wird nach hinten gelegt
; The window is put to the back
;
; Rückgabe : Die Funktion gibt immer TRUE = -1 zurück.
; Return : always TRUE = -1
;
; Voraussetzungen: Die Intuition.library muß geöffnet sein (OpenIntuitionLibrary_()).
; Wird von PureBasic am Programmende wieder geschlossen.
; Requirements : You have to open the Intuition.library (OpenIntuitionLibrary_(version)).
; PureBasic will close the library at program end.
;
If status=-1
WindowToFront_(fensterid)
EndIf
If status=0
WindowToBack_(fensterid)
EndIf
ProcedureReturn -1
EndProcedure
Recht ruhig hier im Amiga-Bereich ?!
It seems that there are not many Amiga user of PureBasic ?!
Greetings ..
Roxxler
Hi,
hier eine kleine Procedure welche es erlaubt, ein Fenster in den
Vorder- oder Hintergrund zu stellen.
Hi,
here a little procedure which allows to put a window to front or
back.
Procedure.b FrontWindow(fensterid.l,status.b)
;
; Das Unterprogramm bringt das angegebene Fenster in den Vordergrund oder
; in den Hintergrund (je nach status.b).
; Es wird die WindowID() übergeben, so ist mittels UseWindow() vorher bestimmbar
; welches Fenster in den Vorder- oder Hintergrund gebracht werden soll. Beispiel:
; UseWindow(2)
; FrontWindow(WindowID(),-1) ; bringt das angegebene Fenster 2 nach vorn
;
; This procedure puts the given window to the back or to the front.
; For that you must use PureBasic's WindowID(), so you can define with a
; UseWindow() what window is put to back or front. Example:
; UseWindow(2)
; FrontWindow(WindowID(),-1) ; puts the window 2 to front
;
; Parameter: fensterid.l = Die Adresse des Fensters (ermittelt von WindowID())
; The address of the window structure (given by WindowID())
;
; status.b = TRUE = -1 Das Fenster wird nach vorn gebracht
; The window is put to the front
; = FALSE = 0 Das Fenster wird nach hinten gelegt
; The window is put to the back
;
; Rückgabe : Die Funktion gibt immer TRUE = -1 zurück.
; Return : always TRUE = -1
;
; Voraussetzungen: Die Intuition.library muß geöffnet sein (OpenIntuitionLibrary_()).
; Wird von PureBasic am Programmende wieder geschlossen.
; Requirements : You have to open the Intuition.library (OpenIntuitionLibrary_(version)).
; PureBasic will close the library at program end.
;
If status=-1
WindowToFront_(fensterid)
EndIf
If status=0
WindowToBack_(fensterid)
EndIf
ProcedureReturn -1
EndProcedure
Recht ruhig hier im Amiga-Bereich ?!
It seems that there are not many Amiga user of PureBasic ?!
Greetings ..
Roxxler