Newsgroup: it.comp.appl.access
Titolo: Esiste un modo per bloccare le form?

Ciao a tutti,
ho la necessità di impedire che una maschera possa essere spostata dalla sua
posizione di partenza...
In vb mi pare di ricordare che ci fosse la possibilità di settare a vero o
falso il poter muovere una form ma in access 2000
non la trovo. Non esiste? Qualcuno sa darmi delucidazioni in merito?
Salutoni

Wh|t3C0m4 ha scritto nel messaggio

L'opzioni la trovi in A 'XP.
Con le realese precedenti ti consiglio d'impostare a "senza bordo" lo stile bordo della maschera e
costruirti il bordino della form, la barretta blu e il pulsante di chiusura...
E' un pochino artificioso ma lo sforzo è minimo e non corri rischi con API che potrebbero non
funzionare con win '2000.
Ciao, warp

 ha scritto nel messaggio
news:9pcofk$1f3$1...@lacerta.tiscalinet.it...

Se però come me non hai XP, io utilizzo A97 sono di vecchie vedute è un pò
piu complesso, ma ti può aiutare
la bellissima Recensione di Moreno Sirri fatta in VBA con la tecnica del
SubClassing ....
Prova a guardare in :
www.it-lang-vb.net/Documentazione/Articoli/Subclassing.htm
@Alex.

 
www.it-lang-vb.net/Documentazione/Articoli/Subclassing.htm
Molto interessante.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

 Sib
Ciao Sib, non l'ho mai provata in Access, in VB c'è l'esempio e seguendolo
passo passo VA...!!!
Ciao @Alex.

 
www.it-lang-vb.net/Documentazione/Articoli/Subclassing.htm
Mah, se posso dire la mia ... ultimamente sto incontrando problemi
d'incompatibilità con l'API di win '2k da esaurimento nervoso.
A proposito, se vi viene in mente qualcosa sul problema che ho postato
qualche giorno fa sputate, ok?   ;-))
Ciao, Simone


controlla i Msg di qualche giorno fa...cerca per user ### CH v2.001 ### (che
sono io)..ho risposto ad un altro utente su come evitare le modifiche
involontarie...
comunque te lo allego...in questo messaggio
fai un modulo così
--------------
Public Function sbloccamask(mask As String)
Dim risposta
risposta = MsgBox("Attenzione si stanno per sbloccare i dati del cliente per
eventuale modifica", vbYesNo, "Sblocco i dati?")
If risposta = vbYes Then
Forms(mask).AllowEdits = True
ElseIf risposta = vbNo Then
Forms(mask).AllowEdits = False
End If
End Function
---------------------
Public Function bloccaon(mask As String)
    If DLookup("block_mask", "setup") = True Then
       Forms(mask)!pls_modifica.Visible = True
       Forms(mask).AllowEdits = False
    Else
       Forms(mask)!pls_modifica.Visible = False
    End If
End Function
----------------
e sulla maschera/maschere su cui vuoi un controllo antimodifica inserisci:
-----------
Private Sub Form_Current()
Call bloccaon(Form.Name)
End Sub
-----------------
poi sulla maschera vera e propria fai un pulsante chiamato pls_modifica
(sblocca maschera) con evento su click così....
--------
Private Sub pls_modifica_Click()
Call sbloccamask(Form.Name)
End Sub
----------------
io ti consiglio poi di fare una tabella nel database chiamata SETUP, con la
sua eventuale maschera...dove inserirai un campo SI/NO chiamato block_mask
che serve per abilitare la funzione di bloccaggio delle maschere o
disabilitarla.
Se la l'abiliti compare il pulsante Sblocca maschera se no non appare e la
maschera non è bloccata.
Non solo nella maschera SETUP puoi poi inserire una serie di controlli di
programma come le directory di lavoro, valori predefiniti ecc. che tu
attraverso la funzione Dlookup vai a prelevare di volta in volta nella
tabella...
ciao e spero di esserti stato utile

 fai un modulo così
Mi pare tu abbia interpretato diversamente la richiesta....!
La domanda era a riguardo dello spostamento nello schermo e non al Blocco
Modifiche o Aggiunte o ecc....
In ogni caso la Routine è utile.....
@Alex. 
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @Alex.
:-)
Ciao, Simone

 Sib
Ciao Sib, ho provato a riportare in A97 la Procedura, ma con scarsi risultati,
mi si impalla Access.
Se ti capita di metterci mano con risultati più confortanti ti sarei grato
potessi aggiornarci.....


potessi aggiornarci.....
Eh, eh ... sapevo io...
Il metodo che ho proposto è rozzo ma funzionana benone ;-))
Ciao, warp


Ciao Warp, peccato solo che non ho XP nè tanto meno A2000, allora cosa ho
deciso di fare.....??
Sbattere la testa e trovare la soluzione, vedrai che funzionerà, prima o
poi......!!!
Sono un sentimentale, legato ai vecchi sapori e alle vecchie glorie.......
In realtà è che dove lavoro non fanno aggiornamenti Software da anni, c'è
ancora la vecchia versine di SQL server.....
Non capisco ma mi adeguo....
Se ti venisse in mente qualche consiglio anche per chi come me è ancorato al
"VECCHIO" ben venga......
@Alex.

"VECCHIO" ben venga......
Beh, impostando la mascherina a "senza bordo" e con due o tre elementi grafici si ottiene il
risultato desiderato senza rischi.
Anzi, ti manderò un esempio in mail e non crederai ai tuoi occhi ;-D
Ciao, warp
P.S: quando sarà finito il tormentone delle n versioni di win in circolazione (e non manca molto
credo) potremo affidarci con + sicurezza all'API.