TMemo set tab width (tab stops)

[FabDev 6]

Hello,

 

Like described here :

How to set tab stops in a TMemo

 

In a TMemo in VCL it's possible to set the tab width using such a code :

Memo1.Perform( EM_SETTABSTOPS, 1, LongInt(@lTabWidth)); 

or

 SendMessage(Memo1.handled, EM_SETTABSTOPS, 1, Longint(@lTabWidth));

 

But does it exist a way to do the same on FMX ?

Because if have tried this  :

{$IFDEF MSWINDOWS}
SendMessage(TWinWindowHandle(Memo1).Wnd, EM_SETTABSTOPS, 1, Longint(@lTabWidth));
{$ENDIF}

Off course only on Windows but it's doesn't work !

 

I find nothing in Memo1.model.

 

So does it exists a way to do it on all platforms (IOS, Android, MAcos etc..) ?