Newsgroup: it.comp.lang.visual-basic
Titolo: Listbox e mouse dx

Un'aiuto, come posso far in modo che quando all'interno di listbox si preme
il mouse dx esegua una piccola form che il left e top parta dove sta il
cursore del mouse.
Troppo dificile?
Grazie
Claudio

 wrote in message 8ab19o$6fj$1...@nslave1.tin.it...


 cursore del mouse.
Considerando Form1 il form dove risiede l'oggetto ListBox
List1 e Form2 il form che compare alla pressione del tasto:
nell'evento List1_MouseDown
   If Button And 2 Then  ' Tasto destro
      Load Form2
      Form2.Left = Form1.Left + List1.Left + X + 32  ' + Bordo
      Form2.Top = Form1.Top + List1.Top + Y + 320  ' + TitleBar
      Form2.Show
   End If

       Form2.Top = Form1.Top + List1.Top + Y + 320  ' + TitleBar
jimi, solo una domanda.
scasinando con "aspetto" in schermo / proprieta', se uno cambia il carattere
della finestra, e io almeno lo faccio sempre perche' come la pensa ms non ci
vedo una mintula ( latino :), cambia anche l'altezza della barra del titolo.
prova a mettere come font ms s.s. 24 e lo vedi bene gia' con "applica".
invece di 320 non c'e' modo di mettere una variabile ?
e, visto che lo stesso accade con la barra dei menu', sarebbe bello poter
ricavare tali variabili in genere per tutte le impostazioni
personalizzabili: larghezza barre di scorrimento, ecc.
gia' mi incasinano mica poco scaleh/w, con alcuni controlli che bisogna
considerare e altri no...
ciao, a.

 personalizzabili: larghezza barre di scorrimento, ecc.
Questi parametri si ottengono con la funzione GetSystemMetrics,
che restituisce informazioni relative ai "metrics" appunto, ossia le
dimensioni di oggetti di sistema basilari. Le misure sono rese in
pixel.
ad esempio:
    'Dimensione in pixel della Titlebar
    lngRet = GetSystemMetrics(SM_CYCAPTION)
    'Dimensione in twips
    lngRet = lngRet * Screen.TwipsPerPixelY
Ti riporto un elenco delle costanti che la funzione accetta
come parametri.
Public Const SM_CXSCREEN = 0       'Dimensione orizzontale dello schermo
Public Const SM_CYSCREEN = 1      'Dimensione verticale dello schermo
Public Const SM_CXVSCROLL = 2      'Larghezza della freccia nelle scroll bar verticali
Public Const SM_CYHSCROLL = 3      'Altezza della freccia nelle scroll bar orizzontali
Public Const SM_CYCAPTION = 4      'Dimensione verticale della titlebar
Public Const SM_CXBORDER = 5      'Larghezza del frame non ridimensionabile
Public Const SM_CYBORDER = 6      'Altezza del frame non ridimensionabile
Public Const SM_CXDLGFRAME = 7      'Larghezza del frame di un DialogBox
Public Const SM_CYDLGFRAME = 8      'Altezza del frame di un DialogBox
Public Const SM_CYHTHUMB = 9      'Altezza del thumb box di una scroll bar orizzontale
Public Const SM_CXHTHUMB = 10      'Larghezza del thumb di una scroll bar orizzontale
Public Const SM_CXICON = 11      'Larghezza preferenziale dell'icona
Public Const SM_CYICON = 12      'Altezza preferenziale dell'icona
Public Const SM_CXCURSOR = 13      'Larghezza del cursore
Public Const SM_CYCURSOR = 14      'Altezza del cursore
Public Const SM_CYMENU = 15                'Altezza di un menu a linea singola
Public Const SM_CXFULLSCREEN = 16   'Larghezza della client area di finestre full-screen
Public Const SM_CYFULLSCREEN = 17   'Altezza della client area di finestre full-screen (Altezza - Titlebar)
Public Const SM_CYKANJIWINDOW = 18 'Altezza di una finestra Kanji
Public Const SM_MOUSEPRESENT = 19  'Mouse presente
Public Const SM_CYVSCROL = 20      'Altezza della freccia nelle scroll bar verticali
Public Const SM_CXHSCROLL = 21      'Larghezza della freccia nelle scroll bar orizzontali
Public Const SM_DEBUG = 22          'Ritorna un valore se Windows è una versione di debug.
Public Const SM_SWAPBUTTON = 23     'True se i pulsanti del mouse sono invertiti
' Da 24 a 27 riservati
Public Const SM_CXMIN = 28              'Larghezza minima di una finestra
Public Const SM_CYMIN = 29      'Altezza minima di una finestra
Public Const SM_CXSIZE = 30      'Larghezza del bitmap contenuto in una Titlebar
Public Const SM_CYSIZE = 31      'Altezza del bitmap contenuto in una Titlebar
Public Const SM_CXFRAME = 32      'Larghezza del frame ridimensionabile
Public Const SM_CYFRAME = 33      'Altezza del frame ridimensionabile
Public Const SM_CXMINTRACK = 34        'Larghezza minima di una finestra dimensionabile
Public Const SM_CYMINTRACK = 35        'Altezza minima di una finestra dimensionabile
Public Const SM_CXDOUBLECLK = 36 ' Larghezza e ampiezza minima dell'area del rettangolo
Public Const SM_CYDOUBLECLK = 37 'dove si è verificato il click in una sequenza DoubleClick
Public Const SM_CXICONSPACING = 38  'Spaziatura orizzantale delle icone
Public Const SM_CYICONSPACING = 39  'Spaziatura verticale delle icone
Public Const SM_MENUDROPALIGNMENT = 40 'True se gli elementi del menu sono allineati a destra
Public Const SM_PENWINDOWS = 41     'Estensioni Windows for Pen conputing installate
Public Const SM_DBCSENABLED = 42    'User.exe in versione double-byte character
Public Const SM_CMOUSEBUTTONS = 43  'N. pulsanti del mouse - 0 = non presente
Public Const SM_CXFIXEDFRAME = SM_CXDLGFRAME
Public Const SM_CYFIXEDFRAME = SM_CYDLGFRAME
Public Const SM_CXSIZEFRAME = SM_CXFRAME
Public Const SM_CYSIZEFRAME = SM_CYFRAME
'Win9x o sup.
Public Const SM_SECURE = 44        'True -> security presente
Public Const SM_CXEDGE = 45        'Dimensione del bordo 3D
Public Const SM_CYEDGE = 46
Public Const SM_CXMINSPACING = 47  'Dimensione minima della griglia per finestre
Public Const SM_CYMINSPACING = 48  'minimizzata (finestra sulla Taskbar)
Public Const SM_CXSMICON = 49      'Dimensione raccomandata per l'icona piccola
Public Const SM_CYSMICON = 50
Public Const SM_CYSMCAPTION = 51   'Altezza della Titlebar ridotta
Public Const SM_CXSMSIZE = 52      'Dimensione dei pulsanti sulla
Public Const SM_CYSMSIZE = 53      'Titlebar ridotta
Public Const SM_CXMENUSIZE = 54    'Dimensione del pulsante del system menu
Public Const SM_CYMENUSIZE = 55
Public Const SM_ARRANGE = 56       'Metodo utilizzato nel minimizzare le finestre
Public Const SM_CXMINIMIZED = 57   'Dimensione di una finestra normale minimizzata
Public Const SM_CYMINIMIZED = 58
Public Const SM_CXMAXTRACK = 59    'Dimensione massima di una finestra ridimensionabile
Public Const SM_CYMAXTRACK = 60
Public Const SM_CXMAXIMIZED = 61   'Dimensioni di default per finestre massimizzate
Public Const SM_CYMAXIMIZED = 62   'nello schermo del monitor primario
Public Const SM_NETWORK = 63       'True -> Rete installata
Public Const SM_CLEANBOOT = 67     'Metodo utilizzato nel boot del sistema
Public Const SM_CXDRAG = 68        'Dimensione del rettangolo entro il quale si
Public Const SM_CYDRAG = 69        'aziona l'operazione di drag
Public Const SM_SHOWSOUNDS = 70    'True -> L'utente richiede presentazioni visuali
                                                                    'in luogo di presentazioni normalmente audio
Public Const SM_CXMENUCHECK = 71    'Dimensione del checkmark bitmap
Public Const SM_CYMENUCHECK = 72
Public Const SM_SLOWMACHINE = 73    'True => Processore low-end (lento)
Public Const SM_MIDEASTENABLED = 74  'True => supporto per lingue ebraiche/arabe
Public Const SM_MOUSEWHEELPRESENT = 75  'WinNT, Win2000 - Wheel mouse
'Win98, Win2000
Public Const SM_XVIRTUALSCREEN = 76    'Left side dello schermo virtuale
Public Const SM_YVIRTUALSCREEN = 77    'Top side dello schermo virtuale
Public Const SM_CXVIRTUALSCREEN = 78   'Dimensione dello schermo virtuale
Public Const SM_CYVIRTUALSCREEN = 79
Public Const SM_CMONITORS = 80         'Numero di display monitor sul desktop
Public Const SM_SAMEDISPLAYFORMAT = 81 'True > i display monitor hanno = numero di colori

 Questi parametri si ottengono con la funzione GetSystemMetrics,
grazie mille. salvo e archivio. cioe', vorrei mettere *te* nell'mdb.
confessa che in qualche uovo di pasqua di vb appari anche tu, confessa !