Πώς να σχηματίσουν παράτυπες

Αυτή τη φορά θέλω να σας δείξω πώς να δημιουργήσει τη φόρμα μας στη Visual Basic καθαρό. να έχουν μια εντελώς διαφορετική εμφάνιση στα οποία έχουμε συνηθίσει, για παράδειγμα, όπως φαίνεται στο παρακάτω σχήμα:

Το πρώτο πράγμα που χρειαζόμαστε είναι να δημιουργήσουμε την εικόνα που χρησιμοποιούν ως βάση για το ταμείο. Σε αυτό το παράδειγμα, χρησιμοποιήστε μια εικόνα σε μορφή PNG, επειδή μπορεί να έχει ένα διαφανές φόντο. Μπορείτε να χρησιμοποιήσετε οποιοδήποτε πρόγραμμα για να δημιουργήσει την εικόνα (προτιμώ Photoshop).

Αν κάνετε κλικ στην παρακάτω εικόνα, μπορείτε να το κατεβάσετε για χρήση για την πρακτική.

Ανοίξτε ένα έργο του Visual Studio και μια μορφή παράθυρα και να διαμορφώσετε τις παρακάτω ιδιότητες:

BackgroundImage: εικόνα PNG μας
ControlBox: Λάθος
FormBorderStyle: Κανένας
StartPosition: CenterScreen
BackgroundImageLayout: Κανένας
BackColor: Goldenrod
TansparencyKey: Goldenrod

Στη συνέχεια προσθέτετε τα υπόλοιπα χειριστήρια, στην προκειμένη περίπτωση 4 ετικέτας, textbox 4 και 1 κουμπί. Δεδομένου ότι αυτό το παράδειγμα είναι μόνο η αισθητική του εντύπου δεν θα θέσει τα γεγονότα στο κουμπί Αποθήκευση ή χωρίς επικύρωση σε πλαίσια κειμένου.

Θα παρατηρήσετε ότι με αυτή τη ρύθμιση δεν έχουμε τη γραμμή τίτλου και τα κουμπιά miminizar conseguiente, μεγιστοποίηση και το κλείσιμο. Αντ 'αυτού έχω προσθέσει μια εικόνα για να κλείσετε τη φόρμα. Για να λειτουργήσει αυτό θα προστεθεί ένα πάνελ με διαφανές χρώμα φόντου στο κόκκινο Χ και το προγραμματισμένο συμβάν κλικ του πίνακα για να κλείσετε τη φόρμα.

Ένα σημαντικό μέρος για να εξετάσει (η secreo για ένα μέρος της φόρμας για να γίνει σαφές) είναι ότι η TransparentKey BackColor και το έντυπο πρέπει να είναι ακριβώς το ίδιο. Σας προτείνουμε να χρησιμοποιείτε ένα χρώμα που δεν χρησιμοποιούνται στην εικόνα ή χρησιμοποιώντας τα στοιχεία ελέγχου στην εφαρμογή.

Εάν έχετε ήδη ολοκληρωθεί η εφαρμογή μπορεί να τρέξει και να δοκιμάσει τη νέα εμφάνιση του με τη μορφή ...

...

...

και;

...

ναι, εγώ πέρασε. Είναι πολύ καλό, αλλά δεν έχει γραμμή τίτλου και στη συνέχεια, δεν μπορώ να κινηθώ ...

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

 WM_NCHITTEST Const As Integer = & H84
 HTCLIENT Const As Integer = & Η1
 Const HTCAPTION As Integer = & Η2
 Προστατευόμενες Παρακάμπτει Sub WndProc (ByRef μ. Όπως System.Windows.Forms.Message)
     Επιλέξτε m.Msg υπόθεση
         WM_NCHITTEST υπόθεση
             MyBase.WndProc (m)
             Αν m.Result = HTCLIENT Τότε m.Result = HTCAPTION
         Υπόθεση Else
             MyBase.WndProc (m)
     Επιλέξτε Τερματισμός
 Sub End

27 απαντήσεις σε "Πώς να σχηματίσουν παράτυπες"

  1. Bitacoras.com λέει:

    Πληροφορίες Bitacoras.com ...

    Τιμή στο Bitacoras.com: Αυτή τη φορά θέλω να σας δείξω πώς να δημιουργήσει τη φόρμα μας για να έχουν μια εντελώς διαφορετική εμφάνιση στα οποία έχουμε συνηθίσει, για παράδειγμα, όπως φαίνεται στο παρακάτω σχήμα: Πρώτα θα πρέπει .....

    • Pedrojdev λέει:

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

      ΕΥΧΑΡΙΣΤΩ ΓΙΑ ΤΗΝ ΕΙΣΟΔΟ.

  2. Joel λέει:

    Αυτό είναι εξαιρετικό από το συνηθισμένο

  3. Fluireemi λέει:

    Σας ευχαριστούμε!

  4. Sam λέει:

    και νομίζω ότι είναι ένα μεγάλο τέχνασμα, αλλά εγώ δεν πάω καλά και να τροποποιήσετε όλες τις ιδιότητες που αναφέρονται παραπάνω αλλά δεν παίρνουν το αποτέλεσμα της διαφάνειας, αλλά πάντα δείχνει το χρώμα του TansparencyKey BackColor ή που είναι το ίδιο με τη χρήση της Visual Basic. 05 και δεν λειτουργεί άλλο τρόπο για να ανοίξει ή δεν σας ευχαριστώ για την ιδέα και δεν veriguare ότι και αν μπορεί να βοηθήσει ευχαριστώ εκ των προτέρων

  5. Ελισσαιέ λέει:

    Σαμ, πριν από την παραγγελία σας, θα κάνουν τον κόπο να κάνει εκ νέου το παράδειγμα και να πάω στη λίστα με τις βήμα προς βήμα τι να κάνω για να προσπαθήσω ξανά.
    1 - μπορώ να δημιουργήσω μια φόρμα
    2 - Τοποθετήστε την εικόνα στην ιδιοκτησία BackgroungImage
    3 - BackgroundImageLayout = Nome
    4 - BackColor Σοκολάτα = (για παράδειγμα)
    5 - TransparencyKey Σοκολάτα = (πρέπει να είναι το ίδιο σημείο 4)
    6 - FormBorderStyle = Κανένας
    7 - ControlBox = False

    Όλες αυτές οι ιδιότητες είναι της μορφής.
    Στη συνέχεια, εκτελέστε την εφαρμογή και πηγαίνετε.

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

  6. Sam λέει:

    hey ΜΕΓΑΛΟ ΕΥΧΑΡΙΣΤΩ Ελισσαιέ συμβουλές για να ξεχάσουμε τη μορφή και το άλλο πήγε πίσω στην οπτική τελειότητα μερικές φορές νομίζω ότι παίρνει λίγο τρελό, αλλά provar στάση με την ίδια μορφή και δοκιμάστε ένα άλλο αν εργάστηκα siceramente πολλά ΕΥΧΑΡΙΣΤΩ σύντομα να .

  7. Sam λέει:

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

    Έχω μια μορφή που ονομάζεται form_principal principas και μια μορφή που ονομάζεται παιδί prueva

    η κατάσταση είναι Haci όταν καλώ τη μορφή με την ακόλουθη prueva κώδικα
    nombre_del_proyecto_que_estoy_haciendo.prueva.Show ()
    και με το παραπάνω κώδικας με οδηγεί όλα στην εντέλεια

    αλλά όταν έβαλα την φόρμα ως παιδί του form_principal prueva μπορώ να προσθέσω μία ακόμη γραμμή του κώδικα, αλλά αυτό εμποδίζει την επίδραση καλά τι είναι αυτή η προστιθέμενη

    nombre_del_proyecto_que_estoy_haciendo.prueva.MdiParent = I
    nombre_del_proyecto_que_estoy_haciendo.prueva.Show ()

    σαφές ότι η φόρμα έχει την ιδιότητα form_principal IsMdiContainer = true
    να λειτουργήσει ως contenidor

    και προφανώς αυτός ο κώδικας χρησιμοποιείται για να τοποθετήσει τη μορφή παιδιού είναι η πρόληψη prueva το αποτέλεσμα στην εργασία

    εάν το u μπορεί να βοηθήσει θα το εκτιμούσα και ευχαριστώ για τον χρόνο που αφιερώσατε για να διαβάσετε αυτό το post περιμένουν βοήθεια απολύονται SAM

  8. Ελισσαιέ λέει:

    Σαμ, δυστυχώς, αν δεν μπορείτε να διατηρούν αυτές τις ιδιότητες χρησιμοποιώντας το MdiParent ιδιοκτησίας. Οι περισσότεροι δεν είναι πιθανό.

  9. SAM λέει:

    και σας ευχαριστώ πάρα πολύ για να πάρει από μένα αμφιβολίας Έχω ψάξει πολύ και προφανώς δεν λειτουργεί με το propiedaf MdiParent

  10. JOSDAVIS λέει:

    Ειλικρινά δεν το παράδειγμα αυτό το βρείτε πουθενά εσείς πολύ καλός φίλος pasate παράδειγμα και ευχαριστίες για τη βοήθεια με αυτόν τον τρόπο

    salu2

  11. Alex λέει:

    Σας ευχαριστούμε για αυτό το υπέροχο παράδειγμα χαιρετισμούς

  12. JOHN λέει:

    γειά σου δεν είχα βρει μια θέση για να αφήσει ένα γενικό σχόλιο γι 'αυτό θα αφήσω εδώ και πρώτα απ' όλα ευχαριστώ για αυτό το παράδειγμα που βρήκα την ανάκαμψη, αλλά ότι είναι πολύ καλή και τράβηξε την προσοχή μου και πήγα αποδείξτε την τελειότητα, αλλά Έχω μια ερώτηση ελπίζω να με βοηθήσει puedad

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

    καλό να συλλάβει το βίντεο και έχω μια ιδέα για το πώς να το κάνω γιατί έψαξα πολύ στο διαδίκτυο και βρήκα πολλά παραδείγματα για το πώς να το κάνουμε, αλλά ακόμα δεν το έχω δοκιμάσει σε αυτό γιατί έχω μια κάμερα.

    nesecito anterion ξέρει πώς να με βοηθήσει και να μου δώσει κάποιες συμβουλές για το τι θα είναι το είδος της κάμερας θα πρέπει να πάρω για την εκτέλεση του έργου είναι, από τη λογική πρέπει να είναι μια φωτογραφική μηχανή που έχει την κίνηση posivilidad μέσω μικρών κινητήρων ή κάτι

    Εν ολίγοις πρέπει να κάνω είναι ότι, μέσω μιας μορφής μια κάμερα καταγραφής βίντεο κάμερα κινείται επάνω και κάτω αριστερά και δεξιά και τελικά ζουμ

    ευχαριστώ για το χρόνο που δίνεται για να διαβάσετε αυτό το post να πω αντίο

    salu2 όλους και ελπίζουμε ότι μπορούν να βοηθήσουν "Bob"

  13. Javier λέει:

    μια ερώτηση και κάνει όλα όσα είπατε, και θα τοποθετηθεί επιπλέον μια διαφανή πάνελ για την ελαχιστοποίηση εκεί εντάξει, αλλά όταν τόσο η μέγιστη πάνελ κοντά την ελαχιστοποίηση και την σειρά των μαύρων

  14. john λέει:

    Ελισσαιέ, πραγματικά λειτούργησε καλά γύρω μου, αλλά ήθελα να κάνω μια μεγάλη χάρη αν δεν σας πειράζει, γιατί θέλω να μάθω, θα ήθελα να ξέρω που μεταφράζει τις γραμμές του κώδικα για να θέσει το τέλος για να μετακινήσετε το έντυπο;, θα ήθελα να κατανοήσει τον κώδικα ...

    Σας ευχαριστώ.

  15. Ronald λέει:

    Πολύ καλό απλούστερη των λοβών που έκανα,,

    Έκανα κάτι παρόμοιο, αλλά εγώ έντυπα αυτά γίνονται στο photoshop .. και εικόνες από το τράβηγμα των πόρων ..

    biendo δρόμο σας είναι πιο απλό .. Νομίζω ότι περιπλέκουν τη ζωή ...

    μια καλή επιλογή για να κάνει κάτι καλό ...

  16. Pao λέει:

    Γεια σας, και πώς να κάνετε την διάταξη των πλήκτρων;

  17. Jader καρδιά λέει:

    είναι πολύ καλό .... αλλά πρέπει να ξέρω τον ορισμό των παράνομων μορφών με το ... porfa ayundenme

  18. Braulio λέει:

    Λοιπόν, είχα ήδη πειραματιστεί με αυτό το είδος του παραδείγματα ... αλλά πέρασα ότι δεν λειτουργούν στα XP. Λοιπόν το θέμα είναι ότι το χρώμα του φόντου είναι διαφανής ότι ήθελε να τοποθετηθεί η εικόνα και όχι η μορφή. Σας ευχαριστούμε για παράδειγμα, σας βοήθησε να λύσω το πρόβλημά μου : D

  19. Marisol λέει:

    Είναι υπέροχο! .. Σας ευχαριστώ πολύ ... Σας πέρασε = D lol!

  20. poncianux λέει:

    Σας ευχαριστούμε! Είναι κάτι που πάντα ήθελα να μάθω : D

  21. Patricia λέει:

    φίλος δεν λειτουργούν με τον κωδικό για να μετακινήσετε τη μορφή, το υπόλοιπο είναι εκπληκτικό

    • Χούλιο λέει:

      απλά να αντιγράψετε και να επικολλήσετε αυτό
      Δημόσια τάξη Φόρμα1
      WM_NCHITTEST Const As Integer = & H84
      HTCLIENT Const As Integer = & Η1
      Const HTCAPTION As Integer = & Η2
      Προστατευόμενες Παρακάμπτει Sub WndProc (ByRef μ. Όπως System.Windows.Forms.Message)
      Επιλέξτε m.Msg υπόθεση
      WM_NCHITTEST υπόθεση
      MyBase.WndProc (m)
      Αν m.Result = HTCLIENT Τότε m.Result = HTCAPTION
      Υπόθεση Else
      MyBase.WndProc (m)
      Επιλέξτε Τερματισμός
      Sub End

      Private Sub Form1_Load (ByVal αποστολέα Όπως System.Object, ByVal e Όσον System.EventArgs) Λαβές MyBase.Load

      Sub End
      Τέλος κατηγορίας

      αντικαταστήσει όλο τον κώδικα για το οποίο ξεκίνησε και θα λειτουργήσει

  22. Χούλιο λέει:

    για μένα αν εργάστηκα όλα αυτά τα θεαματικά χάρη για την ανταλλαγή αυτή την πληροφορία

  23. Horacio Espinosa, λέει:

    Πολύ καλό δωρεά μέσω αυτό που είχα δοκιμάσει χίλιους τρόπους, αλλά θα το rifaste εξήγησε καλά και με ένα κομμάτι του κώδικα που και ευχαριστώ και πάλι φίλος και θα ξέρετε πώς να ακούσετε ένα πίνακα είναι του ιδίου χρώματος καθώς και ο FormBorderStyle estahacho μια καρτέλα, όπως ο πατέρας θα ήταν τόσο πάγκο σχεδιασμό του προγράμματός μας θα ήταν πολύ όμορφη και κομψή εικόνα passeth σας για να ελέγξετε πάγκο έχει TabControl που είναι το ίδιο χρώμα με την άκρη του μοιάζει με τη μορφή
    http://s2.subirimagenes.com/privadas/previo/thump_1749069workbench.png~~V

  24. Chris Μαύρο λέει:

    Φίλος! Αυτό που κάνετε είναι υπέροχο ... ΕΥΧΑΡΙΣΤΟΥΜΕ =) εξαιρετικό, εξακολουθώ να είμαι ικανοποιημένος με την επιστροφή πολύ όμορφη.

  25. Chris Μαύρο λέει:

    Και πάλι μπορώ να σχολιάσω Hehehe ... Η ιδέα μου είναι να εξαχθούν τα κουμπιά στο κάτω μέρος και να δημιουργήσει προκαθορισμένες κουμπιά σε VB, με το κρυφό Εμφάνιση = False (για να δείτε την εικόνα), αλλά όταν κάνετε κλικ σε αυτό θα δώσει ή όχι estubieran, μια άλλη ιδιότητα να κάνω ό, τι χρειάζεται;

    Όσον αφορά ότι μπορώ να ανοίξετε ένα πρόγραμμα υπολογιστικών φύλλων και στη συνέχεια τα κύρια διαμονή sueltitos lol σαν να ήταν δικό μου XD εξαιρετική ιδέα έχω κουραστεί να πει είσαι φανταστική!

Σχόλιο