Differenze tra le versioni di "Conoscere gli attributi della finestra di un programma con le funzioni esterne del API di X11"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "Ogni finestra di un programma possiede degli attributi specificati nella Struttura ''XWindowAttributes'' della libreria di X11. Per conoscere tali attributi si può utilizzar...")
 
 
(5 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
 
Ogni finestra di un programma possiede degli attributi specificati nella Struttura ''XWindowAttributes'' della libreria di X11.
 
Ogni finestra di un programma possiede degli attributi specificati nella Struttura ''XWindowAttributes'' della libreria di X11.
  
−
Per conoscere tali attributi si può utilizzare la funzione ''XGetWindowAttributes( )'' della libreria condivisa: "''libX11.so.6.3.0''"
+
Per conoscere tali attributi si può utilizzare la funzione ''XGetWindowAttributes( )'' della libreria condivisa: "''libX11.so.6.4.0'' ".
  
 
Tale funzione esterna richiede, fra l'altro, la specificazione del numero identificativo della finestra del programma, della quale si intende conoscere gli attributi specificati nella predett Struttura ''XWindowAttributes''.
 
Tale funzione esterna richiede, fra l'altro, la specificazione del numero identificativo della finestra del programma, della quale si intende conoscere gli attributi specificati nella predett Struttura ''XWindowAttributes''.
Riga 7: Riga 7:
  
 
Mostriamo un esempio essenziale:
 
Mostriamo un esempio essenziale:
−
  Library "libX11:6.3.0"
+
  Library "libX11:6.4.0"
 
   
 
   
 
  Public Struct XWindowAttributes
 
  Public Struct XWindowAttributes
Riga 37: Riga 37:
 
  <FONT Color=gray>' ''Display *XOpenDisplay(char *display_name)''
 
  <FONT Color=gray>' ''Display *XOpenDisplay(char *display_name)''
 
  ' ''Opens a connection to the X server that controls a display.''</font>
 
  ' ''Opens a connection to the X server that controls a display.''</font>
−
  Private Extern XOpenDisplay(display_name As String) As Pointer
+
  Private Extern XOpenDisplay(display_name As Pointer) As Pointer
 
   
 
   
 
  <FONT Color=gray>' ''Status XGetWindowAttributes(Display *display, Window w, XWindowAttributes *window_attributes_return)''
 
  <FONT Color=gray>' ''Status XGetWindowAttributes(Display *display, Window w, XWindowAttributes *window_attributes_return)''
Riga 48: Riga 48:
 
   
 
   
 
   
 
   
−
  '''Public Sub Main()
+
  '''Public''' Sub Main()
 
   
 
   
 
   Dim disp As Pointer
 
   Dim disp As Pointer
Riga 54: Riga 54:
 
   
 
   
 
  <FONT Color=gray>' ''Connessione al server X con impostazione di default:''</font>
 
  <FONT Color=gray>' ''Connessione al server X con impostazione di default:''</font>
−
  disp = XOpenDisplay(Null)
+
  disp = XOpenDisplay(0)
 +
  If disp == 0 Then Error.raise("Errore !")
 
   
 
   
 
   <FONT Color=#B22222>XGetWindowAttributes(disp, <FONT Color=gray>''num_ID_della_finestra''</font>, attr)</font>
 
   <FONT Color=#B22222>XGetWindowAttributes(disp, <FONT Color=gray>''num_ID_della_finestra''</font>, attr)</font>
 +
 
 +
<FONT Color=gray>' ''Mostra le dimensioni in pixel della finestra del programma, specificata dal suo ID nella funzione esterna precedente:''</font>
 +
  Print attr.width, attr.height
 
   
 
   
−
  <FONT Color=gray>' ''Chiude la libreria:''</font>
+
  <FONT Color=gray>' ''Chiude la libreria X11:''</font>
−
  XCloseDisplay(disp)
+
  XCloseDisplay(disp)
 
   
 
   
 
  '''End'''
 
  '''End'''
−
 
  
  

Versione attuale delle 16:03, 1 mag 2023

Ogni finestra di un programma possiede degli attributi specificati nella Struttura XWindowAttributes della libreria di X11.

Per conoscere tali attributi si può utilizzare la funzione XGetWindowAttributes( ) della libreria condivisa: "libX11.so.6.4.0 ".

Tale funzione esterna richiede, fra l'altro, la specificazione del numero identificativo della finestra del programma, della quale si intende conoscere gli attributi specificati nella predett Struttura XWindowAttributes.


Mostriamo un esempio essenziale: 

Library "libX11:6.4.0"

Public Struct XWindowAttributes
  x As Integer
  y As Integer
  width As Integer
  height As Integer
  border_width As Integer
  depth As Integer
  visual As Pointer
  root As Long
  classi As Integer
  bit_gravity As Integer
  win_gravity As Integer
  backing_store As Integer
  backing_planes As Long
  backing_pixel As Long
  save_under As Boolean
  colormap As Long
  map_installed As Boolean
  map_state As Integer
  all_event_masks As Long
  your_event_mask As Long
  do_not_propagate_mask As Long
  override_redirect As Boolean
  screenp As Pointer
End Struct

' Display *XOpenDisplay(char *display_name)
' Opens a connection to the X server that controls a display.
Private Extern XOpenDisplay(display_name As Pointer) As Pointer

' Status XGetWindowAttributes(Display *display, Window w, XWindowAttributes *window_attributes_return)
' Returns the current attributes for the specified window to an XWindowAttributes structure.
Private Extern XGetWindowAttributes(display As Pointer, w As Long, window_attr As XWindowAttributes) As Integer

' XCloseDisplay(Display *display)
' Closes the connection to the X server for the display specified in the Display structure and destroys all windows.
Private Extern XCloseDisplay(display As Pointer)


Public Sub Main()

 Dim disp As Pointer
 Dim attr As New XWindowAttributes

' Connessione al server X con impostazione di default:
 disp = XOpenDisplay(0)
 If disp == 0 Then Error.raise("Errore !")

 XGetWindowAttributes(disp, num_ID_della_finestra, attr)
 
' Mostra le dimensioni in pixel della finestra del programma, specificata dal suo ID nella funzione esterna precedente:
 Print attr.width, attr.height

' Chiude la libreria X11:
 XCloseDisplay(disp)

End


Riferimenti

Estratto da "https://www.gambas-it.org/wiki/index.php?title=Conoscere_gli_attributi_della_finestra_di_un_programma_con_le_funzioni_esterne_del_API_di_X11&oldid=33235"