Ciao a tutti,
ho fatto una ricerca su goole e sul forum ma ho trovato gli stessi esempi:
codice nelle dichiarazioni generali:
codice nel form:codice:'Dichiarazione della funzione API (sostituire Private con Public in funzione delle necessità) Private Declare Function SetWindowPos Lib "user32" _ (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _ ByVal x As Long, ByVal y As Long, ByVal cx As Long, _ ByVal cy As Long, ByVal wFlags As Long) As Long Function SetTopMost(ByVal hwnd As Long, topmost As Boolean) 'non ridimensiona la finestra Const SWP_NOSIZE = &H1 'Non muove la finestra Const SWP_NOMOVE = &H2 'pone la finestra in primo piano al di sopra di tutte le altre. Const HWND_TOPMOST = -1 'pone la finestra al di sotto di tutte le finestre in 'primo piano e al di sopra di quelle non in primo piano Const HWND_NOTOPMOST = -2 If topmost Then SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE Else SetWindowPos hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE End If End Function
Questo codice mi funziona in parte, cioè il form che apro rimane sempre in primo piano, pero se clicco ad esempio su una combo che si trova nel form sottostante, la combo si apre....codice:SetTopMost Me.hwnd, True
Io vorrei che nel mio progetto quando apro questo form, non si riesca a selezionare e cliccare nulla che non sia presente su questo form!!!!
Un esempio per farvi capire quello che voglio è quando salvi un file word, e devi selezionare dove salvarlo, non puoi modificare il file word se prima non chiudi la finestra (sfoglia) del salva con nome....
Spero di esser stato abbastanza chiaro!
Grazie!
![]()

Rispondi quotando
