Canvas FillText: особенности работы

[web_warp]

В этой теме я уже задавал вопрос, но, наверное, я просто ошибся разделом. Аккумулирую вопрос:

10.1 Berlin, C++, Win8, FMX. Интересует особенность работы Canvas->FillText(), вот код:

void __fastcall TTabbedForm::StringGrid1DrawColumnCell(TObject *Sender, TCanvas * const Canvas,
		  TColumn * const Column, const TRectF &Bounds, const int Row,
		  const TValue &Value, const TGridDrawStates State)
{
	// код...
	UnicodeString CT = TabbedForm->StringGrid1->Cells[Column->Index][Row];
	Canvas->FillText(Bounds, CT, false, 100,TFillTextFlags() << TFillTextFlag::ftRightToLeft, TTextAlign::taTrailing, TTextAlign::taTrailing);
}

В итоге наблюдаются совсем странные "фишки":

1. Разворот времени, хотя в FillText() текст передаётся правильный.

2. Если текст заканчивается на скобку, то скобка разворачивается и переносится в начало текста.

3. И, если есть и кириллица, и латиница, то текст просто не выводится)) (хотя есть подозрение, что это кавычки виноваты).

 

Кто сталкивался? Что делать? Есть альтернативы?

Изменено 22 октября, 2016 пользователем web_warp
Расставил картинки под пункты.

[Равиль Зарипов (ZuBy)]

если я правильно понял, вы используете написание текста справа-налево

TFillTextFlag.RightToLeft - этот параметр не нужно указывать, в делфи там ставится []

[web_warp]

В 22.10.2016 в 10:41, ZuBy сказал:

TFillTextFlag.RightToLeft - этот параметр не нужно указывать, в делфи там ставится []

Это С++, там на этих костылях весь фундамент держится. Изменение параметра RightToLeft <--> ftRightToLeft никакого эффекта не дают. (

Согласно документации (тык, тык) всё верно, но отрабатывает некорректно до ужаса.

Эти параметры не несут функционального смысла, у меня ничего не меняется:

enum class DECLSPEC_DENUM TFillTextFlag : unsigned int { RightToLeft, ftRightToLeft _DEPRECATED_ATTRIBUTE3("Use TFillTextFlag.RightToLeft")  = 0x0 };

Изменено 25 октября, 2016 пользователем web_warp

[web_warp]

Простите меня за мою же глупость. ) Разобрался, с горем-пополам.

Верная строка вот такая:

TabbedForm->StringGrid1->Canvas->FillText(Bounds,TabbedForm->StringGrid1->Cells[Column->Index][Row], false, 100,TFillTextFlags(), TTextAlign::taLeading, TTextAlign::taLeading);

Большинство артефактов удалось устранить.