Απενεργοποίηση πλήκτρου & Μερικό Κλείδωμα

[Free_Ghost]

Αρχική Δημοσίευση από Giorgos

Καλημερα Free_Ghost

όσο αφορα το 1ο ερώτημα δεν έχω καταλάβει τη ακριβώς 8ες...

Γιώργος

Καταρχάς σε χαιρετώ φίλε μου...
Το πρόβλημα είναι πώς κάνω κλικ στο πλήκτρο εκτελή την εργασία και συνεχίζει να παραμένει πατημένο... δεν έρχεται στην προηγούμενη θέση προ του πατήματος....

Αρχική Δημοσίευση από Giorgos

Καλημερα Free_Ghost
στο 2ο τώρα =date() η now() τις έχει δοκιμάσει..?
Γιώργος

Το =date() και το now() δοκίμασα να τα βάλω στις ιδιότητες του ημερολογίου και δεν παίρνει τίποτα απο αυτά...

Αρχική Δημοσίευση από Giorgos

Καλημερα Free_Ghost
και στο 3ο
Εγώ σε αυτό το κοματι χρισιμοποιώ μια ετικέτα στο χρώμα της φόρμας.. την βάζω σε ένα πονηρό σημείο και που δεν φένετε αφού έχει ακριβός το χρώμα τις φόρμας.. και με την εντολή cklik κάνει κάποια πράγματα..!!
Γιώργος

Ακρίβως αυτή η εντολή click ?????

[amy]

Αρχική Δημοσίευση από Free_Ghost

Καταρχάς σε χαιρετώ φίλε μου...
Το πρόβλημα είναι πώς κάνω κλικ στο πλήκτρο εκτελή την εργασία και συνεχίζει να παραμένει πατημένο... δεν έρχεται στην προηγούμενη θέση προ του πατήματος....



Το =date() και το now() δοκίμασα να τα βάλω στις ιδιότητες του ημερολογίου και δεν παίρνει τίποτα απο αυτά...



Ακρίβως αυτή η εντολή click ?????

"παίζεις" με τα enable, visible κλπ

[Jim]

Private Sub Ονομα_AfterUpdate()
Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �.Locked = True
End Sub

Private Sub ΟνομΠεδίου_DblClick(Cancel As Integer)
Forms!Ονομαφόρμας!ΟνομαΠεδίο� �.Locked = False
End Sub

Επιλέγεις το πεδίο που θέλεις να κλειδώσεις πας Ιδιότητες , Συμβάν , Μετά από ενημέρωση Βάζεις Διαδικασία Συμβάντος πατάς το κουμπάκι με τις τελίτσες
Και κολλάς τον κώδικα τον 1ο Στον δεύτερο κώδικα γιά ξεκλείδωμα το ίδιο πάλι αλλά στο DblClick
Αν και νέος προχθές το έμαθα οφείλω να το μεταδώσω ξέρω τι είναι να περιμένεις Στην αναμονή
Φιλικά Δημήτρης

[Free_Ghost]

Αρχική Δημοσίευση από Jim

Private Sub Ονομα_AfterUpdate()
Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �.Locked = True
End Sub

Private Sub ΟνομΠεδίου_DblClick(Cancel As Integer)
Forms!Ονομαφόρμας!ΟνομαΠεδίο� �.Locked = False
End Sub

Επιλέγεις το πεδίο που θέλεις να κλειδώσεις πας Ιδιότητες , Συμβάν , Μετά από ενημέρωση Βάζεις Διαδικασία Συμβάντος πατάς το κουμπάκι με τις τελίτσες
Και κολλάς τον κώδικα τον 1ο Στον δεύτερο κώδικα γιά ξεκλείδωμα το ίδιο πάλι αλλά στο DblClick
Αν και νέος προχθές το έμαθα οφείλω να το μεταδώσω ξέρω τι είναι να περιμένεις Στην αναμονή
Φιλικά Δημήτρης

Φίλε δημήτρη το πέταξες σαν κεραυνό...
Στο μύνημα σου φαίνονται μόνο οι δύο πρώτες γράμμες πήγα να κάνω παράθεση και ερώτηση και βγήκαν όλα κάτσε να τα μελετήσω...

[Jim]

roular88 at freemail in gr

[Tasos]

Αγαπητέ Χρήστο,
αν μπορείς, σέ ένα αντίγραφο της βάσης σου βάλε μερικές παραδειγματικές εγγραφές,
συμπίεσε το με ZIP και ανέβασε το εδώ στο φόρουμ για να δουμε τι συμβαίνει και να σε βοηθήσουμε καλύτερα.

Φιλικά

Τάσος

[Free_Ghost]

Φίλοι μου ευχαριστώ άλλη μια φορά για την βοήθεια σας.. τη να πώ..

Λοιπόν ώς προς το πρώτο θα είχα κάνει κάποια βλακεία στα κουμπιά (12) και δεν δούλευαν σωστά ...
Σβήνω το ένα και το αντικαθιστώ με ένα καινούργιο και μέσα από τον οδηγό της Access το καθοδηγώ να ανοίγει την συγκεκριμένη μακροεντολή και δούλεψε θαυμάσια.. Μάλλον κάποια χοντρή κοτσάνα είχα κάνει..

Όσο για το δεύτερο εύχαριστώ ιδιαιτέρως τον φίλο Δημήτρη γιατί μου έδωσε πολλές ιδέες σχετικά με κλειδώματα..
Πάς Ιδιότητες Συμβάν και εκεί επιλέγεις σε ποιά ενέργεια θα κλειδώνει.. (Ενημέρωση, Εστίαση, Αποθήκευση κ.τ.λ.) πάς στις τελίτσες δεξιά επιλέγεις δόμηση κώδικα και βάζεις το παρακάτω που είναι μετά από ενημέρωση.....

Private Sub Ονομα_AfterUpdate()
Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �.Locked = True
End Sub

Κατόπιν μπορείς πάλι στο ίδιο πεδίο να πάς Ιδιότητες Συμβάν και εκεί επιλέγεις με ποιά ενέργεια θα ξεκλειδώνει.. π.χ. με διπλό κλίκ.. πάς στις τελίτσες δεξιά επιλέγεις δόμηση κώδικα και βάζεις το παρακάτω..

Private Sub Κείμενο0_DblClick(Cancel As Integer)
Forms!F_Εισαγωγή_M!Κείμενο0.Locked = False
End Sub

Βέβαια μπορεί εμείς να θέλουμε με το που ανοίγει η φόρμα να είναι κλειδωμένα ορισμένα πεδία.. Τότε πάμε σε κάθε πεδίο ιδιότητες / δεδομένα και στο κλειδωμένο βάζουμε ναι..

Κατόπιν στο ξεκλείδωμα για να μην παίζουμε σε κάθε πεδίο βάζουμε ένα πλήκτρο σε μια παράξενη κρυφή θέση πάμε και σε αυτό στις ιδιότητές/συμβάν/διπλό κλίκ και επιλέγουμε δόμηση κώδικα εκεί βάζουμε τον ίδιο κώδικα για όσα πεδία έχουμε κλειδώσει..π.χ.

Private Sub Εντολή154_DblClick(Cancel As Integer)

Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �1.Locked = False
Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �2.Locked = False
Forms!ΟνομαΦόρμας!ΟνομαΠεδίο� �3.Locked = False

End Sub

Τέλος στο κουμπί πάμε Ιδιότητες/Μορφή/Διαφανές/Ναι
Για να μην το βλέπουν και μόνο εμείς να ξέρουμε που είναι...

Τέλος μου μένει ένα πρόβλημα η Ημερομηνία του ημερολογίου..
Πρέπει να την κάνω τουλάχιστον να συμβαδίζει με τον μήνα...
Help