BiDi text not displayed properly in Delphi 7 when using RTL BiDi mode? -

-

in delphi 7, drop tmemo on form , in form's oncreate handler enable rtl bidimode this:

  syslocale.middleeast := true;   application.bidimode := bdrighttoleft;

if load text file containing bidi text tmemo using lines.loadfromfile, text not displayed correctly.

let's have following text in text file (this proper way display it, example when displayed notepad++ or ms word):

!ד asd אב!ג text... text2...

here's how it's incorrectly displayed in tmemo:

אב!ג asd ד! ...text... text2

here's how text stored in text file:

21 e3 20 61 73 64 20 e0 e1 21 e2 0d 0a 74 65 78 74 2e 2e 2e 20 74 65 78 74 32 2e 2e 2e

here's visualization of how it's stored (the text never rendered way anywhere, illustration):

!ד asd ג!בא text... text2...

so, bidi text saved in alternating "blocks": (rtl block)(ltr block)(rtl block)(ltr block) etc. storing order of blocks left right same order of blocks way see them (from left right) when rendered. storing order of characters in every rtl block reverse of viewing order of characters in blocks when displayed (see alef, bet, exclamation mark, gimel block).

the text rendered when rtl bidimode not enabled (if value of syslocale.middleeast false or value of bidimode bdlefttoright).

this incorrect rendering happens in other controls tested (tlabel, tcheckbox, tradiobutton, etc.).

looking @ incorrectly displayed text in tmemo when rtl bidimode enabled, i'm seeing order of blocks reversed. also, leading neutral characters (like !, ?, ., etc.) become trailing ones , vice versa (e.g. 3 dots after text text2).

looking problem, believe issue lies in windows' drawtext function , dt_rtlreading flag used when bidi text rendered. if i'm not mistaken, function used render text in controls. indeed, if render bidi text on canvas using drawtext dt_rtlreading flag, rendered in same incorrect way, , if don't use dt_rtlreading, rendered correctly.

i made descendant class of tlabel, overriding it's paint procedure never use dt_rtlreading when rendering text , fix issue. however, fixing issue windows controls tcheckbox, tradiobutton, , tbutton not easy.

i tried using drawtextex - issue remains. tried using utf8 text file , ttntmemo (which uses drawtextw) - issue remains.

so, questions are: known issue? why happening? if is, there fix it? or doing wrong here?


Comments

Post a Comment

Popular posts from this blog

c# - Unity IoC Lifetime per HttpRequest for UserStore -

-
i'm trying clean default implementation of accountcontroller.cs comes out of box in new mvc5/owin security implementation. have modified constructor this: private usermanager<applicationuser> usermanager; public accountcontroller(usermanager<applicationuser> usermanager) { this.usermanager = usermanager; } also, have created lifetime manager unity looks this: public class httpcontextlifetimemanager<t> : lifetimemanager, idisposable { private httpcontextbase _context = null; public httpcontextlifetimemanager() { _context = new httpcontextwrapper(httpcontext.current); } public httpcontextlifetimemanager(httpcontextbase context) { if (context == null) throw new argumentnullexception("context"); _context = context; } public void dispose() { this.removevalue(); } public override object get...
Read more

Change the color of an oval at click in Java AWT -

-
i have draw ovals in java, , @ click change color. beginning tried change color after 20 ms, doesn't work. my code is: public class mycomponentnew extends frame { public graphics2d g2d; public mycomponentnew(string title) { super(title); setsize(400, 550); } @override public void paint(graphics g) { this.g2d = (graphics2d) g; this.g2d.setcolor(color.red); this.g2d.filloval(10, 55, 50, 100); } public void changecolor () { this.g2d.setcolor(color.blue); this.g2d.filloval(10, 55, 50, 100); } } and in class main method have: mycomponentnew m; m = new mycomponentnew("fereastra cu baloane"); m.setvisible(true); m.addwindowlistener(new windowadapter() { @override public void windowclosing(windowevent we) { system.exit(0); } }); try { thread.sleep(20); } catch(interruptedexception e) {} m.changecolor(); the color of oval remains red. ...
Read more

I am trying to solve the error message 'incompatible ranks 0 and 1 in assignment' in a fortran 95 program. -

-
i writing program in fortran find velocity of parachuting person in relation time. keep getting error can't fix. new programming , appreciated. the error is v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h) 1 error: incompatible ranks 0 , 1 in assignment @ (1) and program is program para integer :: real :: v(11) !velocity real :: q !initial velocity real :: h !time step real :: c !drag coefficient real :: m !mass ! gravity equal 32 ft/s^2 write (*,*)'enter time step' read(*,*)h write(*,*)'enter initial velocity' read(*,*)q write(*,*)'enter drag coefficient' read(*,*)c write(*,*)'enter mass' read(*,*)m i=1,10 ! 1 10, 1 being interval. end v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h) q=v(1) end program you cannot use [] normal parenthesis in expressions. array constructor, [ items ] means array items elements. end do should after line.
Read more