Newsgroup: it.comp.appl.access
Titolo: A97 - Attivazione Pulsante

Ciao a tutti,
vorrei sottoporVi un piccolo quesito.
Ho creato una TblModelli e sulla relativa maschera ho messo un pulsante 
"DettagliAssociati"...come posso fare per rendere attivo o inattivo il 
pulsante a seconda se sono presenti o meno record associati?
Grzie per il vostro aiuto
Gianni
P.s.: qui si muore dal freddo!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1 

 ha scritto nel messaggio
news:t0xLd.9426$QG6.1...@twister2.libero.it...

Su Evento Load e Current io inserirei:
Me.NomePulsante.Enabled=Me.RecordSetClone.Recordcount>0
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:41fea004$0$6297$5fc...@news.tiscali.it...

Ho provato a fare come dici tu ma c'è un problema...
Quando apro la maschera e visualizzo un "record con dettagli" il pulsante
diventa attivo (tutto OK)...MA se passo ai record successivi  quando
ricarico il "record con dettagli" mi lascia inattivo il pulsante.
Ho provato a riscrivere il codice anche in altre posizioni ma....niente, non
funziona!
Hai qualche idea?
Ciao e grazie per l'aiuto
Gianni
Ps. :siccome ad un record esiste un solo dettaglio ho riscritto:
 Me.NomePulsante.Enabled=Me.RecordSetClone.Recordcount=1
diversamente non  succedeva niente

 diversamente non  succedeva niente
MMmmm hai messo il codice che ti ho indicato anche su EVENTO CURRENT..???
A quanto dici no.
Ciao
-- 
@Alex (Alessandro Baraldi)



Acc....... l'ho messo su:
form_Load( ) e su form_Current( )
ma nn funziona, cosa facciamo?
Ciao e grazie ;)

 Ciao e grazie ;)
Ricapitoliamo:
Hai una Form con SubForm giusto...?
Nella Form vuoi che se nella SubForm(Dettagli) non ci
sono Record venga disabilitato il comando...??
Dim State as Boolean
State=Me!NomeSubForm.Form.RecordSetClone.Recordcount>0 Or Me.NewRecord
Me.NomePulsante.Enabled=State
Se invece il Pulsante deve sentire se nella Form non ci sono Record:
Dim State as Boolean
State=Me.RecordSetClone.Recordcount>0 Or Me.NewRecord
Me.NomePulsante.Enabled=State
Vediamo de và...!
Ciao
-- 
@Alex (Alessandro Baraldi)


 ha scritto nel messaggio 
news:41ffc9ab$0$6299$5fc...@news.tiscali.it...

Alex non funziona....provo a rispiegarti il problema:
ho una maschera "modelli" molto complessa e, su tale maschera, ho una serie 
di campi,subform, strutture a schede con: codicemodello,cliente, 
tipomodello, tipolega...etc,etc e nel pièdipagina della form ho messo un 
pulsante "schedafotografica".
La relazione tra il modello e la scheda fotografica è 1:1 (cioè ogni 
IDmodello ha una sola scheda fotografica).
Siccome le schede fotografiche non esistono (per ora) per tutti i modelli, 
vorrei che durante lo scorrimento dei record il pulsante "schedafotografica" 
sia attivo o inattivo.
Spero di essermi spiegato bene...
Ciao e grazie ancora
Gianni
Ho notato che mettendo il valore:
Dim State as Boolean
 State=Me.RecordSetClone.Recordcount>1 Or Me.NewRecord
 Me.NomePulsante.Enabled=State
anzichè =0
il programma gira a dovere.....ma passando al record successivo per poi 
ritornare indietro...non aggiorna il pulsante!!!!!!!
Esempio
passo1) record N° 10 con scheda fotografica presente
passo2) vado al record N°10.....PULSANTE ATTIVO
passo3) vado al record N°11 con scheda fotografica assente....PULSANTE 
INATTIVO
fino a qui tutto OK
passo4) TORNO al record N°10....PULSANTE INATTIVO (non mi ha aggiornato il 
pulsante?????...perchè?????) 

 pulsante?????...perchè?????)
[Considerazione]
Se la relazione è 1-1 stai sbagliando ad usare una SubForm per la scheda
Fotografica
ma è una mia opinione di Normalizzazione.
Ora secondo me il RecordCount non serve a nulla per come l'hai impostata.
Prova così:
Me.NomePulsante.Enabled=Not Me.NewRecord


 ha scritto nel messaggio 
news:42011bfd$0$32333$5fc...@news.tiscali.it...
