[ darkog @ 18.08.2006. 12:46 ] @
Na formi imam (pored ostalih polja) jedan chek box i jedno komandno dugme koje otvara drugu formu.Kada je chek box "true" hocu da mi se prikaze ovo komandno dugme, a kada je false da ga nema. Ovo radi ali ima jednu manu: korisnik nakon cekiranja chek boxa mora kliknuti na next record obrasca da bi komandno dugme postalo vidljivo na istom.
Treba mi nesto kao refresh forme ili ...???
Evo koda obrasca:
Code:

Private Sub Form_AfterUpdate()
If Me.chkusluga = True Then
Me.cmdNormativ.Visible = True
Me.Requery
Else
Me.cmdNormativ.Visible = False
End If

End Sub

Private Sub Form_Current()
If Me.chkusluga = True Then
Me.cmdNormativ.Visible = True
Else
Me.cmdNormativ.Visible = False
End If
End Sub


[Ovu poruku je menjao darkog dana 29.08.2006. u 14:55 GMT+1]
[ Zidar @ 29.08.2006. 21:03 ] @
Probaj na AfterUpdate za chkusluga, nesto ovako:

Private Sub chkusluga_AfterUpdate()
If Me.chkusluga = True Then
Me.cmdNormativ.Visible = True
Me.Requery
Else
Me.cmdNormativ.Visible = False
End If
End Sub

Kod koji si napisao je OK, Current ti je potreban, AfterUpdate mozda i nije, ali ne smeta. Ovo sto sam ti predlozio ce otkriti/sakriti dugme posle cekiranja, pre Form_Update.

Posto se u sva tri slucaja vrti isti kod, mozes u okviru forminog modula da napravis proceduru pa je pozivas iz eventa.

Code:

'Procedura na frominom modulu:
Private Sub PokaziDugme() 
If Me!chkusluga = True Then
Me!cmdNormativ.Visible = True
Me.Requery
Else
Me.cmdNormativ.Visible = False
End If
End Function

'pozivamo funkciju iz event procedura:
Private Sub Form_AfterUpdate()
  Call PokaziDugme
End If

End Sub

Private Sub Form_Current()
  Call PokaziDugme
End Sub

Private Sub chkusluga_AfterUpdate()
  Call PokaziDugme
End Sub





[ darkog @ 02.09.2006. 18:09 ] @
Resio sam kako si rekao ali bez "Requery"i radi. sa Requery je nesto mnogo spor iako ima samo nekoliko probnih zapisa, a i stalno me vraca na prvi zapis posle cekiranja chkUsluga.
Imam i drugi problem stanjem Potrosnog materijala pa ako imas vremena pogledaj tema-problem sa stanjem magacina.
Hvala