Grid, accent and drawText

[Nicola Gorlandi]

Hi,

I want do draw in a cell of a TDBGrid some content so a write this code

Code: Pascal  [Select][+][-]

1.    s:=field.asString;
2.   r:=rect;
3.   inflaterect(r,-1,-1);
4.   r.right:=r.right-getsystemmetrics(SM_CXVSCROLL);
5.   drawtext(canvas.handle,pchar(s),-1,r,DT_WORDBREAK or DT_NOPREFIX);  

well the issue is that if the content is something like "più" in the cell it is display pi and some strange char. The other strange think is that if a write
  drawtext(canvas.handle,'più',-1,r,DT_WORDBREAK or DT_NOPREFIX);

everything works fine.
I use a Sqlite database.

Many thanks

[Blaazen]

I got older Lazarus 1.7 trunk (r.51976) and both ThemeServices.DrawText() methods expect string as a parameter. Maybe they expected PChar in the past, I'm not sure now. Anyway, try to replace "pchar(s)" with simply "s".

[Nicola Gorlandi]

I am using Lazarus 1.6 (official release). the drawtext procedure does not allow me to use directly s but only a pointer, the drawtext that I am using is in redef.inc.

Anyway, I finally solved changing the code as below

Code: Pascal  [Select][+][-]

1.    s:=field.asWideString;
2.   r:=rect;
3.   inflaterect(r,-1,-1);
4.   r.right:=r.right-getsystemmetrics(SM_CXVSCROLL);
5.   drawtextw(canvas.handle,pwidechar(s),-1,r,DT_WORDBREAK or DT_NOPREFIX);  
6.  

Thanks