Public Sub Form1_KeyPress()
Select Case Key.Code
Case Key.Enter, Key.Return 'testa la pressione del tasto "INVIO" del tastierino numerico ovvero della tastiera alfanumerica
Label1.text = "INVIO"
Case Key.F1
Label2.text = "Tasto F1"
Case "0" To "9"
Label2.text = "crt numerico"
End Select
EndPerplessità.
Devo realizzare un Form che si adatti alla dimensione max dello schermo e che mi deve garantire un buon risultato a numerose risoluzioni ( a partire da un min. di 1024*768).
Public Sub Button1_Click()
Dim w, h As Integer
w = Screen.AvailableWidth
h = Screen.AvailableHeight
Print w, h
End
@ vuott:...il Print ovviamente era solo per mostrare :violent: in modo esemplificativo e didattico cosa restituivano quelle funzioni ! Resta ovvio che sarà il programmatore a servirsi nel modo più opportuno e consono al suo progetto dei valori contenuti in quelle variabili !
Ho provato per curiosità le istruzioni che hai suggerito prima per la Form a tutto schermo, ma a me non ha funzionato; ha prodotto solo un Print nella console di Gambas, ma senza alcun effetto sulla dimensione grafica della Form stessa . Riconosco che non fino ad oggi non mi sono mai preoccupato di risolvere tale problematica.
@ vuott:......quindi a te ha funzionato ! :D
Ho provato per curiosità le istruzioni che hai suggerito prima per la Form a tutto schermo, ma a me non ha funzionato; ha prodotto solo un Print nella console di Gambas...
:ciao:
sottolineo che quelle istruzioni ritornano semplicemente e non impostano i valori del rettangolo del desktop utilizzabile visualizzato sul video. Dunque quei valori, ovviamente, possono essere utilizzati per impostare le dimensioni di un Form (o di quant'altro).Se volevi convincermi con la spiegazione ultima, mi dispiace, ma non ci sei proprio riuscito. Infatti, qualora si voglia rendere automatico il dimensionamento a tutto schermo di una Form, a prescindere dalla caratteristiche tecniche del monitor, sicuramente l'istruzione che hai riportato come esempio non va bene. Allora, siccome non capisco per limiti miei che cosa intendi con la frase
......quindi a te ha funzionato ! :D
:ciao:
sarà il programmatore a servirsi nel modo più opportuno e consono al suo progetto dei valori contenuti in quelle variabili !conviene riprendere l'esempio e scriverci valori ed istruzioni, magari riguardanti anche le proprietà della Form, che permettano di capire chiaramente il comportamento consono del programmatore.
conviene riprendere l'esempio e scriverci valori ed istruzioni, magari riguardanti anche le proprietà della Form, che permettano di capire chiaramente il comportamento consono del programmatore.
Che ne dici? ;) ;D
:evil: APPUNTO! :evil:
:D
Ah, te ne sei accorto in tempo, eh?!?
Sai cosa succede a quelli che aiutano troppo... vengono infettati forzatamente con la "ceskhonite" BLU (quella VERDE è terminata...).
Quello che fà la ceskhonite blu è orribile... :'(
Sarebbe possibile realizzare una applicazione che possa andare in full-screen REALE, cioè sopra eventuali barre/interfacce (Gnome, Unity e briscola).
Oppure, ancora meglio, essere reindirizzata su un altro monitor..??Eh.... qua ci vuole qualche Santo degli schermi: San Midi non mi ha concesso le conoscenze adeguate a questo riguardo così complesso !........ :-\
si potrebbe proporzionare la dimensione del Form sulla base appunto dei valori relativi al desktop disponibile passati da quelle funzioni là.... :-[
...dire e non-dire... :devil:
si potrebbe proporzionare la dimensione del Form sulla base appunto dei valori relativi al desktop disponibile passati da quelle funzioni là.... :-[
...dire e non-dire... :devil:
:hard: :mad: ;) :ciao:
É vero, ho risolto, ma mi dispiaccio però ancora :hard: :mad: per non avere capito quando dovevo capire ed ho fatto la fine che meritavo: :skull:
:ciao:
Oppure, ancora meglio, essere reindirizzata su un altro monitor..??
Oppure, ancora meglio, essere reindirizzata su un altro monitor..??
http://gambasdoc.org/help/comp/gb.qt4/screens?v3
Public Sub Button1_Click()
Dim dw As DesktopWindow
Dim ss As String[]
' Individuo l'Handle del programma che ha generato la propria finestra:
ss = Desktop.FindWindow("nome_del_programma")
'...ne individuo la finestra, e la inserisco in una variabile di tipo "DesktopWindow":
dw = Desktop.Windows.FromHandle(ss[0])
' sposto la finestra del programma nel desktop num. 2:
dw.Desktop = 2
End
Se nn ricordo male c'era qualcosa a livello di settings:
Settings[window/geometry, x,y,h,w,s]
Se nn ricordo male c'era qualcosa a livello di settings:Da qualche ricerca fatta, ho visto che l'ultimo parametro da te indicato (quella "s") dovrebbe effettivamente riferirsi al numero del monitor disponibile.
Settings[window/geometry, x,y,h,w,s]
Dove s sta per numero del monitor.
La cosa che nn so dirti se vale solo per la MainWindow
Mi sembrava che ....Ma mi domando: anche volendo indirizzare l'output video su un monitor specifico all'avvio dell'applicazione, con quale istruzione lo si comanda ? :-\
Nella classe della form:
Public Sub _new()
ME.Screen=0 '(oppure 1,2,...)
End