Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Perl\Tk Arabic %100 Support Almost There !by Swalif (Scribe) |
on Sep 05, 2009 at 21:58 UTC ( [id://793726]=perlquestion: print w/replies, xml ) | Need Help?? |
Swalif has asked for the wisdom of the Perl Monks concerning the following question:
Good day Monks, There was a lot of discussion regarding Arabic support in Tk, e.g : Re: Tk Characters right to left Tk text widget Tk Characters Perl/TK unicode font problem http://www.linuxac.org/forum/linuxac51/thread14580.html Maybe it was the wrong way we approached the problem, there was no need for encoding and decoding which could get words correct but not sentences , it was just a problem of text font and by changing the font to an Arabic one everything worked great even labels, buttons, even the title bar. Use utf8, was a most though. And there came the last obstacle the entry widget the first thing I did is to justify it to right and it worked great. Now we can say that building an Arabic application in Perl Tk is a possible thing and gives a workable program with little effort. One thing is still missing, it is the cursor.. Please see this image: http://dheeb.wordpress.com/files/2009/09/1.jpg You can notice the cursor is still in the far right side of the widget although it is supposed to go with flow of the text towards left. This problem is also not a big deal but see the next picture please: http://dheeb.wordpress.com/files/2009/09/2.jpg Here you can see that the selection with mouse doesn’t select properly unless all of the text is selected. I don’t know maybe there is a problem with indexing or something. As you can see this is a very usable application and many other applications will work perfectly, in fact many users I gave the application didn’t notice anything because they didn’t used selection. So, Perl\Tk now is very reasonable choice for developing Arabic apps except for applications that depend heavily on user selection like text editing. I came across these two articles but I didn’t understand them, please see them if they are in any help: http://wiki.tcl.tk/1126 http://wiki.tcl.tk/699
Back to
Seekers of Perl Wisdom
|
|