POPUP ANOMALO - Gestione dimensioni - Layout dividi maschera

Anonimo

Non sono in grado di dimensionare nel modo corretto questo tipo di maschera.

Ho RAVANATO tutti i parametri disponibili ma, niente.

Ho cercato informazioni ma, sembra un mistero.

Anche se la maschera e' circa 20 cm, mi copre l'intero schermo.

Potrebbe dipendere dalla tabella in basso che ha parecchi campi.

(Impostazioni: popup SI - dimensioni automatiche NO - adatta allo schermo NO)

Se qualcuno.........

Grazie a tutti.

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti

Risposta accettata dall'autore della domanda

Anonimo

Ciao M.Z.

dunque... credo che il problema sia dovuto alla proprietà "Visualizzazione predefinita" impostata su "Dividi Maschera"

propongo 3 workaround distinti

Cambia "Visualizzazione predefinita" in "Maschera Singola" rinunciando alla lista a piede maschera

oppure

Imposta la proprietà "A scelta obbilaga" = No mantenendo PopUp a Sì

oppure

Elimina il pulsante "Chiudi" e fai chiudere la maschera dalla "X"

Sono soluzioni che implicano la rinuncia ad altre opzioni ma al momento non mi viene altro in mente.

Visto che hai eliminato il database da Skydrive, ne ho creato uno semplice semplice che ha lo stesso comportamento, così diamo la possibilità ad altri partecipanti di verificare l'anomalia e di proporre eventuali soluzioni.

Il database è qui: ProvaPopUp

ps. Non ti preoccupare di sdebitarti, personalmente partecipo al forum per imparare e oggi con il tuo post ho imparato qualcosa di nuovo quindi sono a posto così

:-)

Giorgio Rancati

0 commenti

40 risposte aggiuntive

Anonimo

2012-06-10T13:38:19+00:00

(Comunque ho deciso per il momento di abbandonare LE POPUP)
La risposta è stata utile?

0 commenti Nessun commento
Anonimo

2012-06-10T13:03:37+00:00

Mi rispondo da solo.

Cercando ho letto un post di Giorgio dove pubblicava un esempio.

Su skydrive c'e' l'esempio.

Mancava un SET.

GRAZIE A TUTTI.

(Comunque ho deciso per il momento di abbandonare form-tabella)
La risposta è stata utile?

0 commenti Nessun commento
Anonimo

2012-06-10T12:17:54+00:00

Scusate,

Sto provando :

____________________________________________________________________________________

Private Sub Form_Open(Cancel As Integer)

Dim varx As String

Me.CLIENTI_sottomaschera_TB_clienti.Form.Recordset = Me.Recordset '(*QUESTA NON FUNZIONA *)

varx = DCount("[nome ditta]", "TB-clienti", "[nome ditta] = " & (Chr(34)) & Me![Nome ditta] & (Chr(34)))

If varx <> 0 Then

Me.Pulsante.Enabled = True

Else

Me.Pulsante.Enabled = False

End If

Forms![Clienti]![Modifiche].BackColor = RGB(255, 0, 0)

Me.AllowEdits = False 'non permette la modifica dei dati

Me.AllowAdditions = False 'vieta l'aggiunta di record

End Sub

____________________________________________________________________________________

Non mi funziona!

Operazione non supportata per questo tipo di oggetto (errore 3521)

Grazie a TUTTI!
La risposta è stata utile?

0 commenti Nessun commento
Anonimo

2012-06-10T10:38:54+00:00

Ciao M.Z.

occorrerebbe gestire l'evento filter della maschera principale in questo modo:

Private Sub Form_Filter(Cancel As Integer, FilterType As Integer)

    Me.Sottomaschera.Form.Filter = Me.Filter

    If Me.FilterOn Then

        Me.Sottomaschera.Form.FilterOn = True

    Else

        Me.Sottomaschera.Form.FilterOn = False

    End If

End Sub

Qui trovi delucidazioni sul momento in cui viene attivato l'evento.

Se togli la proprietà popup e tenti di utilizzare il filtro in base a maschera ottieni però un messaggio di errore in quanto l'origine record della sottomaschera è basata su un oggetto recordset.

L'unico modo in cui sono riuscito a farlo andare è utilizzando il filtro/Ordinamento avanzato che alla fine però consiste nel filtrare il recordset della maschera principale e di conseguenza (per l'associazione fatta) quello della sottomaschera.

A questo punto puoi simulare il filtro variando l'origine record della maschera principale da:

select * from tuatabella

in

select * from tuatabella where tuocampo = xxx

la modifica ti verrà riflessa sulla sottomaschera. Con un pulsante interruttore potrai gestire l'applicazione del filtro e la sua disapplicazione (reimpostando l'origine record della maschera principale senza la clausola where):

Private Sub Interruttore_AfterUpdate()

    If Me.Interruttore Then

        Me.RecordSource = "Select * from Clienti where id = " & Me.ID 'per esempio

    Else

        Me.RecordSource = "Select * from Clienti"

    End If

    Set Me.Sottomaschera.Form.Recordset = Me.Recordset

End Sub

David
La risposta è stata utile?

0 commenti Nessun commento