Differenze tra le versioni di "Muovere la finestra di un programma con le funzioni del API di X11"
Da Gambas-it.org - Wikipedia.
Riga 9: | Riga 9: | ||
<FONT Color=gray>' ''Display *XOpenDisplay(display_name)'' | <FONT Color=gray>' ''Display *XOpenDisplay(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( | + | Private Extern XOpenDisplay(display$ As String) As Pointer |
<FONT Color=gray>' ''XMoveWindow(display, w, x, y)'' | <FONT Color=gray>' ''XMoveWindow(display, w, x, y)'' | ||
Riga 25: | Riga 25: | ||
<FONT Color=gray>' ''Connessione al server X ed impostazione di default:''</font> | <FONT Color=gray>' ''Connessione al server X ed impostazione di default:''</font> | ||
− | disp = XOpenDisplay( | + | disp = XOpenDisplay(Null) |
<FONT Color=#B22222>XMoveWindow(disp, ''num_ID_della_finestra'', 300, 400)</font> | <FONT Color=#B22222>XMoveWindow(disp, ''num_ID_della_finestra'', 300, 400)</font> |
Versione delle 15:29, 9 nov 2014
Per muovere all'interno del desktop la finestra di un programma esterno si può utilizzare la funzione XMoveWindow() della libreria condivisa (nella sua attuale versione) libX11.so.6.3.0 .
Tale funzione esterna richiede, fra l'altro, la specificazione del numero identificativo della finestra del programma da chiudere.
Mostriamo un esempio essenziale:
Library "libX11:6.3.0" ' Display *XOpenDisplay(display_name) ' Opens a connection to the X server that controls a display. Private Extern XOpenDisplay(display$ As String) As Pointer ' XMoveWindow(display, w, x, y) ' Moves the specified window to the specified x and y coordinates. Private Extern XMoveWindow(displayP As Pointer, w As Integer, x As Integer, y As Integer) ' XCloseDisplay(display) ' Closes the connection to the X server for the display specified in the Display structure and destroys all windows. Private Extern XCloseDisplay(displayP As Pointer) Public Sub Main() Dim disp As Pointer ' Connessione al server X ed impostazione di default: disp = XOpenDisplay(Null) XMoveWindow(disp, num_ID_della_finestra, 300, 400) ' Chiude la libreria: XCloseDisplay(disp) End