Why can't I set members of TextStyle in TCanvas?
For example :

  Canvas.TextStyle.RightToLeft := True;

or

  Canvas.TextStyle.Layout := tlTop;

give :
Error: Argument can't be assigned to

Canvas.TextStyle is a replacement for Delphi's Canvas.TextFlags, isn't it?

http://wiki.freepascal.org/User_Changes_2.4.0#Treating_direct-mapped_properties_as_regular_fields

Regards,
Sven

Sven Barth wrote

http://wiki.freepascal.org/User_Changes_2.4.0#Treating_direct-mapped_properties_as_regular_fields

Ok, then this becomes an LCL issue. How to port Delphi code like
  Canvas.TextFlags := Canvas.TextFlags or ETO_RTLREADING
  Canvas.TextFlags := Canvas.TextFlags or LAYOUT_SUPERSCRIPT;

TextStyle was the closest thing to TextFlags I could find. If nobody knows the answer, I will continue my experiments. I know this is not a Lazarus list.

Regards,
Juha

I don't know what exactly TextStyle provides, but if it has fields similar to the flags of TextFlags the following would be the way to go:

=== code begin ===

var
   t: TextStyle;
begin
   t := Canvas.TextStyle;
   t.RtlReading := True;
   t.SuperScript := True;
   Canvas.TextStyle := t;
end;

=== code end ===

Regards,
Sven

Thanks. I will experiment with it.

Regards
Juha