|
-
Jun 12th, 2013, 10:56 PM
#1
Thread Starter
Lively Member
[RESOLVED] Arabic Fonts in Textbox
Hi All,
How can i set arabic fonts to a textbox. I tried to set an arabic font to the textbox from properties. But, when I run my project and type something in that textbox it shows in English. I need the typed text to be shown in Arabic. Is there any way to get this done? If anyone knows, please do share with me.
-
Jun 12th, 2013, 11:34 PM
#2
Re: Arabic Fonts in Textbox
Perhaps Merri's UniText control might accomplish what you want.
If it does not, then you can also try the UniSuiteFree VB6 Unicode ActiveX Controls.
Or you may also want to see EditControls.
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
-
Jun 12th, 2013, 11:49 PM
#3
Re: Arabic Fonts in Textbox
As Bonnie implied, its a problem with controls in VB6. Most controls in VB6 weren't fashioned to work with Unicode strings which is why a custom control is necessary. Exotic texts like Arabic can only be represented by Unicode strings.
-
Jun 13th, 2013, 12:13 AM
#4
Thread Starter
Lively Member
Re: Arabic Fonts in Textbox
Thanks Bonnie. I tried UniSuiteFree VB6 Unicode ActiveX Controls. but still the text is showing in english only. is there any properties to set?
-
Jun 13th, 2013, 12:26 AM
#5
Re: Arabic Fonts in Textbox
Another alternative is to use the Richtextbox control.
-
Jun 13th, 2013, 12:37 AM
#6
Thread Starter
Lively Member
Re: Arabic Fonts in Textbox
RichTextBox???? But How? It will show in Arabic?
-
Jun 13th, 2013, 12:44 AM
#7
Re: Arabic Fonts in Textbox
I think you'll need to activate the Input Method Editor (IME). I'm not sure about this though because I've never used it before.
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
-
Jun 13th, 2013, 01:37 AM
#8
Thread Starter
Lively Member
Re: Arabic Fonts in Textbox
I tried it .. but its not working for me. I don't know whats wrong, may be I don't know how to set it..
I tried EditControls too. Should i register it? if i register, will that show in Reference?
-
Jun 15th, 2013, 12:59 AM
#9
Thread Starter
Lively Member
Re: Arabic Fonts in Textbox
None of these tricks worked for me Guys..
I found an alternative and it works fine for me.
I used a normal TextBox , set the font to an Arabic font and in the form load i changed its font.charset to 178
Then in the Textbox's got focus event i just changed the Keyboard language to arabic and in its lost focus event i changed the keyboard language back to English.
This works just fine for me. And, also i don't have any problem to save this text to my database and to retrieve it from there..
Thank you guys for the support!!
-
Jun 15th, 2013, 01:03 AM
#10
Re: Arabic Fonts in Textbox
Glad that you sorted it out and only using an ordinary textbox at that! You can now mark this thread as resolved then. =)
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|