Арабский формат ввода текста в Memo или RichEdit.

← →
JohnKorsh (2008-07-04 10:56) [0]

Извините, не подскажет ли кто как заставить memo или richedit вводить текст справо на лево, как в арабоязычных странах?

← →
Правильный-Вася (2008-07-04 11:09) [1]

Alignment + арабский виндовз

← →
JohnKorsh (2008-07-04 11:20) [2]

Надо в англоязычной XP.

← →
Правильный-Вася (2008-07-04 11:23) [3]

?кат апит ьтсе от
или
вот так?

← →
JohnKorsh (2008-07-04 11:35) [4]

верхняя строка - именно то, что надо.

← →
Правильный-Вася (2008-07-04 11:41) [5]

> верхняя строка - именно то, что надо.

поверни моник задом к себе и приставь к нему зеркало
:)

на англ вряд ли получится

← →
ЮЮ © (2008-07-04 11:47) [6]

а вводить арабские символы или английские?

← →
ЮЮ © (2008-07-04 11:59) [7]

> на англ вряд ли получится

Да неужели?

procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
Memo1.SelStart := Memo1.SelStart - 1;
end;

По функцоналу уже практически то, только каретка не там стоит. Естественно надо строить не на обработчике OnKeyPress стандартного TMemo, а на наследнике с реализвцией нужного функционала в его методах

← →
JohnKorsh (2008-07-04 12:04) [8]

Спасибо, ЮЮ. Очень по-делу, полегчало.

← →
Правильный-Вася (2008-07-04 12:06) [9]

> а на наследнике с реализвцией нужного функционала в его
> методах

ну так это нето, что автор хочет
он хочет без танцев с бубнами

← →
JohnKorsh (2008-07-04 12:39) [10]

Да нет, вполне нормально - есть направление, чтобы думать.

Арабский формат ввода текста в Memo или RichEdit. Найти похожие ветки