Newsgroup: it.comp.appl.access
Titolo: Funzione per Nascondere o Mostrare la Finestra di MSAccess

Un saluto a tutti.
vorrei che in esecuzione un programma molto semplice con una maschera
soltanto facesse vedere solo la maschera stessa.
nel sito ho trovato questa soluzione, ma non riesco a capire come
applicarla. 
' nella parte di dicchiarazione del modulo della maschera di avvio 
Const SW_HIDE = 0 
' in A00 - non in A97 - � necessessario anche 
' Const SW_NORMAL = 1 
Private Declare Function ShowWindow Lib "user32" _ 
(ByVal hwnd As Long, ByVal nCmdShow As Long) As Long 
' OnOpen della maschera di avvio 
Dim hWindow As Long 
Dim nResult As Long 
Dim nCmdShow As Long 
hWindow = Application.hWndAccessApp 
nCmdShow = SW_HIDE 
nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow) 
' in A00 - non in A97 - � necessessario anche 
' Call ShowWindow(Me.hWnd, SW_NORMAL) 
qualora funzionasse si puo' tornare indietro e riuscire a vedere di
nuovo Access?
qualcuno mi puo' aiutare?
grazie
Oscar

 qualcuno mi puo' aiutare?
Se "nel sito" (?) non si trova nessuna descrizione prova con
www.donkarl.com/it?FAQ1.11
 e se hai problemi di applicarla,
con descrivere cosa fai, cosa succede o no.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 



il link � quello che ho trovato tramite il sito comune( e non sul sito
comune come giustamente mi hai fatto notare) ma non so come applicare
la soluzione suggerita:
Che significa:
"Nella sezione dichiarazioni del modulo di classe della maschera
principale inserisci:"
cio� dove debbo inserire queste 2 righe di codice? dove trovo "sezione
dichiarazioni del modulo di classe della maschera"?
Const SW_HIDE = 0
'in A00 devi aggiungere:
'Const SW_NORMAL = 1
Private Declare Function ShowWindow Lib "user32" _
    (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
questo sembra essere pi� facile ecredo che le debba inserire su:
Evento- Su Apertura
"Nella routine SuApertura della maschera principale:"
Dim hWindow As Long
Dim nResult As Long
Dim nCmdShow As Long
hWindow = Application.hWndAccessApp
nCmdShow = SW_HIDE
nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
'in A00 devi aggiungere:
'call ShowWindow(Me.hWnd, SW_NORMAL)
ti ringrazio per l'aiuto
Oscar

 'call ShowWindow(Me.hWnd, SW_NORMAL)
-- 




ho fatto tutto per bene tranne che nella dichiarazione del modulo non
compare la riga Option Explicit  che non compare anche dopo che ho
attivato l'opzione "dichiarazione di variabili obbligatoria.
purtroppo non funziona: al lancio del programma non si vede nulla
anche se il programma � in esecuzione visto che non riesco ad
eleminarlo.
grazie di nuovo
Oscar

 eleminarlo.
Se "non si vede nulla" vuol dire che non vedi ne Access ne la tua
maschera, non hai letto bene l'articolo segnalato, dov'� descritto
che si deve usare maschere popup e quale sono le altre limitazioni.




scusami se rispondo con ritardo. ho impostato la maschera su poup e
funziona tutto correttamente.
ti rimgrazio per il tuo aiuto e approfitto per chiederti ancora:
c'� differenza per l'impostazione popup tra le opzioni "a scelta
obbligatoria" SI o NO;
avendo ottenuto il risultato di vedere solo la maschera, se volessi
modificare qualcosa del programma posso farlo ed in che modo;
nel tentativo di entrare nel programma ho provato con il tasto destro
del mouse e cliccando su visualizzazione struttura � scomparso tutto:
posso inibire il tasto destro del mouse?
ciao e grazie di nuovo
Oscar

 posso inibire il tasto destro del mouse?
Se vuoi inibire il men� per una sola maschera puoi impostare
la propriet� "menu scelta rapida" della maschera a No.
Se vuoi inibire tutti menu di scelta rapida nel programma puoi disattivare
l'opzione nel men� Strumenti/Avvio/Menu di scelta rapida predefiniti.




grazie di tutto.
Oscar