Visual Basic 6.0

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Rayden — Fri, 07 Jul 2006 19:16:16 GMT

Private Const latin As String = "ABGDEZHUIKLMNJOPRSTYFXCV"

Private Const greek As String = "ΑΒΓΔΕΖΗΘΙΚΛΜΝΞΟΠΡΣΤΥΦΧΨΩ"

Private sub EnglishtoGreek(result as string) as string

For x = 1 To Len(latin)

For g = 1 To Len(result)

If UCase(Mid(result, g, 1)) = Mid(latin, x, 1) Then

Mid(result, g, 1) = Mid(greek, x, 1)

End If

Next g

Next x

Englishtogreek = result

end sub

Μια απλή ρουτίνα που μετατρέπει απο λατινικούς χαρακτήρες σε ελληνικούς περνωντάς παράμετρο το string που θές να μετατρέψεις σε vb6.

Αν το pc δεν έχει εγκατεστημένη την ελληνική γλώσσα το μόνο που μπορείς να κάνεις είναι να χρησιμοποιήσεις ελληνική γραμματοσειρα (Shape Font File) και όχι True Type font για να εμφανίζει ελληνικό χαρακτήρα χρησιμοποιώντας keyascii απο US-English Codepage.

Απ: Απορίες για σύλληψη πληκτρολογήσεων

kps — Fri, 12 May 2006 03:52:01 GMT

Πίσω από ένα ΤextΒox ( διόρθωσε το Text1 στο όνομα του δικού σου ) επικόλησε τον παρακάτω κώδικα και δοκίμασε να γράψεις Ελληνικά.

Ο κώδικας είναι νομίζω απλός και κατανοητός και ελπίζω να σε βοηθήσει.

Private Sub Text1_KeyPress(KeyAscii As Integer)

Dim st As String, num As Integer

KeyAscii = Asc(UCase(Chr(KeyAscii)))

st = "ΣΕΡΤΥΘΙΟΠΑΣΔΦΓΗΞΚΛΖΧΨΩΒΝΜ`~!@#$^&()_=?<>;'[]{}"

num = InStr(st, Chr(KeyAscii))

If num > 0 Then
KeyAscii = 0
MsgBox "ΔΕΝ ΕΠΙΤΡΕΠΕΤΑΙ Η ΧΡΗΣΗ ΕΛΛΗΝΙΚΩΝ ΧΑΡΑΚΤΗΡΩΝ ΚΑΙ ΣΥΜΒΟΛΩΝ", vbCritical, "Ελεγχος πληκτρολόγησης"
End If

End Sub

Απ: Απορίες για σύλληψη πληκτρολογήσεων

imanos — Wed, 08 Feb 2006 18:42:30 GMT

Μπορείς νά εξηγήσεις λίγο καλλύτερα το τι ακριβώς θέλεις να κάνεις.

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Michelle — Wed, 08 Feb 2006 17:54:08 GMT

:( Kαι πως θα το κάνω να δείχνει ελληνικά;
Ας μην ξεχνάμε οτι να διαβάσουν ελληνικά μπορούν σε ιστοσελίδες...

Απ: Απορίες για σύλληψη πληκτρολογήσεων

imanos — Wed, 08 Feb 2006 17:23:02 GMT

Πάντως βλέποντας λίγο πιό προσεκτικά το ερώτημά σου εάν δέν έχει εγκατεστημμένα ελληνικά στο pc δέν ξέρω αν θα παίξει το παραπάνω σωστά γιατί

values in the ANSI character set above 127 are determined by the code page specific to your operating system.
Δηλαδή άν το code page του pc δεν είναι ελληνικό η αντιστοίχιση δέν θα παίζει σωστά

Απ: Απορίες για σύλληψη πληκτρολογήσεων

imanos — Tue, 07 Feb 2006 21:37:34 GMT

Μπορεί νά είναι ένα array όπως αναφέρεις ή μπορεί να είναι και ένα xml αρχείο η ακόμα και κάποιο text delimited αρχείο.
Για array π.χ. θά μποούσες νά δηλώσεις
dim myArray(1 to 2,1 to 10) όπου ή πρώτη τιμή έιναι το ελληνικό KeyAscii και ή δεύτερη το αγγλικό.
myArray(1,1)=225
myArray(2,1)=97
.....κλπ
Κατόπιν στο event toy KeyPress να δημιουργήσεις ένα loop
for i=lbound(myArray,2) to Ubound(myArray,2)
if KeyAscii=myArray(1, i) then
KeyAscii=myArray(2,i)
exit sub
end if
next
Εάν δέν βρεί καμμιά αντιτοίχιση το παραπάνω θα τυπωθεί στο textbox αυτό που πληκτρολόγησε ο χρήστης

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Michelle — Tue, 07 Feb 2006 21:25:48 GMT

Εεε, εεε, τσαπρρρ!! Μην τα ρίχνεις έτσι απότομα και έχω και καιρό να πιάσω vb! Με φρικάρεις τη γυναίκα! :P
Τι είναι το map table? Πως το κάνω? Κανονικό array ή τίποτα περίεργο?

Απ: Απορίες για σύλληψη πληκτρολογήσεων

imanos — Tue, 07 Feb 2006 21:20:09 GMT

Κοίταξε να δείς τι θα κάνεις θά βάλεις Debug.Print στο event σου δοκίμασε όλες τις πληκτρολογήσεις σέ αγγλικούς χαρακτήρες και δές το KeyAscii που σου επιστρέφει ,κάνε το ίδιο και για τα ελληνικά ακόμα και αυτούς που έχουν τόνο σου γυρίζει διαφορετικό KeyAscii π.χ γιά το ά=220 ενώ το α=225 επίσης το ίδιο και για τα κεφαλαία και φτιάξε ένα δικό σου map table.
Κατόπιν φτιάξε μέσα στο event μιά διαδικασία η οποία θα κοιτάει αυτό το map table και θα σου επιτρέφει αυτό το KeyAscii που πραγματικά χρειάζεσαι.

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Michelle — Tue, 07 Feb 2006 21:06:42 GMT

Nαι αλλά το α το έχει σαν ειδικό χαρακτήρα το ASCII table, δεν έχει όλους τους ελληνικούς (http://www.lookuptables.com/)
Αν κάνω λάθος διόρθωσε με...

Σε ένα τόσο απλό προγραμματάκι τι μειονεκτήματα έχει η vb6 αλήθεια;

Απ: Απορίες για σύλληψη πληκτρολογήσεων

imanos — Tue, 07 Feb 2006 20:33:28 GMT

Αυτό που θέλεις μπορεί να το πάρεις στο KeyPress event του textbox εκεί θά κοιτάξεις το KeyAscii που σου έρχεται κατά το την εκτέλεση του event και άν αυτό αντιστοιχεί σέ ελληνικό χαρακτήρα του στέλνει το αντίστοιχο KeyAscii σε αγγλικό.
π.χ. Όταν πληκτρολογείς το γράμμα α το KeyAscii είναι 225 όπότε άν του πείς μέσα στο event ότι το KeyAscii είναι 97 που είναι το αντίστοιχο a στα αγγλικά τότε αυτό θα γραφτεί στο textbox.

If KeyAscii = 225 Then KeyAscii = 97 (ουσιαστικά θα πρέπει πρωτα να υλοποιήσεις άνα mapping των KeyAscii τιμών που έρχονται άπό την πληκτρολόγηση σέ ελληνικά μέ τα αντίστοιχα σέ αγγλικά )

Όσο για το δεύτερο ερώτημα κατά την ταπεινή μου γνώμη καλά θα κάνεις όπως αναφέρουν και οι υπόλοιποι νά μεταβείς σε .ΝΕΤ περιβάλλον και σε γλώσσες όπως η C# η VB

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Panagiotis Kefalidis — Tue, 07 Feb 2006 05:20:09 GMT

Σωστόστ..

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Mitsaras — Tue, 07 Feb 2006 05:15:49 GMT

Γράφω πολύ συγκεκριμένα: "κατά κανόνα αντίο pointers". Γιατί, κατά κανόνα κάποιος δε θα χρειαστεί να δουλέψει με pointers, εκτός αν έχει πολύ συγκεκριμένες ανάγκες από κάτι (πχ ταχύτητα σε bitmap processing).

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Panagiotis Kefalidis — Tue, 07 Feb 2006 05:13:24 GMT

Mitsaras wrote:
Η σύνταξη και η εμφάνιση γενικότερα της C# πλησιάζει πάρα πολύ σε αυτήν την C++, με ορισμένες σημαντικές διαφορές:

1) Έχει καθαρότερη και σαφέστερη σύνταξη (δεν επιτρέπονται όλα τα implicit conversions, πχ if (int tade=1), κατά κανόνα αντίο pointers, και άλλες μικρότερες λεπτομέρειες)
2) Είναι λιγότερο εύκολο να εμφανιστούν συγκεκριμένα προβλήματα, πχ memory leaks λόγω του ότι ξέχασες να κάνεις dispose ένα object.

Ωστόσο αυτά είναι μια περιληπτική περίληψη της περίληψης. Μπορείς να ρωτήσεις το google για τις σημαντικότερες διαφορές: http://www.google.com.gr/search?q=c%2B%2B+to+c%23&start=0&ie=utf-8&oe=utf-8&client=firefox-a&rls=org.mozilla:en-US:official

Eεε, όχι και αντίο pointers.. μέχρι και manual memory management μπορείς να κάνεις.. έχει "pointers" αλλά "κρυμμένους"..
(βλέπε unsafe κώδικας,memory pinning κλπ κλπ)

Πάντως είναι δύσκολο να ξεκινήσεις με C++.. καλύτερη ξεκίνησε απο VB.Net, και μετέπειτα πέρασε σε C#..Εκτός αν θέλεις απλά να πειραματιστείς και να μάθεις σιγα σιγα, όποτε ξεκίνησε και με C# κατευθείαν!

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Mitsaras — Tue, 07 Feb 2006 01:14:41 GMT

Η σύνταξη και η εμφάνιση γενικότερα της C# πλησιάζει πάρα πολύ σε αυτήν την C++, με ορισμένες σημαντικές διαφορές:

1) Έχει καθαρότερη και σαφέστερη σύνταξη (δεν επιτρέπονται όλα τα implicit conversions, πχ if (int tade=1), κατά κανόνα αντίο pointers, και άλλες μικρότερες λεπτομέρειες)
2) Είναι λιγότερο εύκολο να εμφανιστούν συγκεκριμένα προβλήματα, πχ memory leaks λόγω του ότι ξέχασες να κάνεις dispose ένα object.

Ωστόσο αυτά είναι μια περιληπτική περίληψη της περίληψης. Μπορείς να ρωτήσεις το google για τις σημαντικότερες διαφορές: http://www.google.com.gr/search?q=c%2B%2B+to+c%23&start=0&ie=utf-8&oe=utf-8&client=firefox-a&rls=org.mozilla:en-US:official

Απ: Απορίες για σύλληψη πληκτρολογήσεων

Michelle — Mon, 06 Feb 2006 23:06:04 GMT

Τι είναι η managed C++? Πως συνδυάζεται η κλασική C++ με το net framwork?
Η C# είναι πολύ διαφορετική απο τη C(++)?