[ Φόρμες ] Κλείδωμα πλαισίου κειμένου

[Free_Ghost]

Φίλοι μου αντιμετώπισα ένα παράξενο πρόβλημα.

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

Πήγα στις Ιδιότητες/Δεδομένα και στο κλειδωμένο βάζω ¨Ναι¨.

Κατόπιν με ένα πλήκτρο τα ξεκλειδώνω όταν θέλω να αλλάξω κάτι.

Το πρόβλημα είναι πώς μετά από μερικές χρήσεις και 2-3 μέρες απενεργοποιείτε το ¨Ναι¨ και την θέση του παίρνει το Όχι χωρίς να το θελήσω εγώ.

Για ποιο λόγω γίνεται αυτό, μήπως την έχει ξαναπάθει κάποιος χρήστης..

Υπάρχει άλλος τρόπος κλειδώματος ορισμένων πλαισίων με την εκκίνηση της εφαρμογής.

[Free_Ghost]

Φίλοι μου αφήστε το, ήταν μπροστά στην μύτη μου και δεν το έβλεπα...

Δεν πάω στο Πλαίσιο κειμένου και στις ιδιότητες του Πλαισίου, πηγαίνω στις ιδιότητες της Φόρμας και στη καρτέλα Συμβάν εκεί που λέει "Με τη φόρτωση" βάζω τον παρακάτω κώδικα..

Private Sub Form_Load()
Me.Ονομα πλαισίου.Locked = True
End Sub

Και αυτό ήταν με το που ξεκινάει είναι κλειδωμένο κατόπιν αναλαμβάνει το πλήκτρο να το ξεκλειδώσει..

[Tasos]

Καλησπέρα!

Χρήστο, αν ο χρήστης απενεργοποιήσει το κλείδωμα και με κάποιο τρόπο, είτε από κάποια μακροεντολή είτε
από το χρήστη (CTRL + S) αποθηκεύσει τη φόρμα, την επόμενη φορά που θα ανοίξει η φόρμα το πεδίο δεν θα είναι κλειδωμένο.

Θα πρέπει στο συμβάν "On Load" της φόρμας να προσθέσεις μια εντολή που να κλειδώνει τα πεδία που θέλεις
αν αυτά δεν είναι κλειδωμένα πχ.>If Not Me.Field1.Locked then Me.Field1.Locked = True.

Φιλικά

Τάσος

[Free_Ghost]

Τάσο ευχαριστώ για την απάντηση..

Η γράψαμε ταυτόχρονα ή δεν δουλεύει αυτό που έγραψα παραπάνω, το δοκίμασα όμως και μου φάνηκε πώς δουλεύει ?

[Tasos]

Γράφαμε ταυτόχρονα!

Χαίρομαι που βρήκες τη λύση!

Φιλικά

Τάσος