Richedit-Soldan Satir Atlama

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Orhan
Üye
Mesajlar: 32
Kayıt: 09 May 2005 03:35
Konum: Almanya

Richedit-Soldan Satir Atlama

Mesaj gönderen Orhan »

Merhaba

Formu hazırlayıp emeği geçen tüm çalışanlarına kocaman bir teşekkür. Delphi hakkında yabancı dillerde yüzlerce sayfa varken kendi dilimde, pek fazla ön şart koşulmadan güzel bir sayfanın hazırlanıp delphi ile ilgilenenlere sunulması beni çok sevindirdi.

Uzun zamandır uğraşıp çözemediğim bir konuyu sizlerle paylaşmak istiyorum.

Konu: Richedit'in özelliğinin değiştirilmesi. Özel hazırladığım bir ''yazı harfleri''ni (Font) Richedit'te kullanmak istiyorum. Bunun için de Richedit'in satır atlama (WordWrap) özelliği sağdan değil soldan olması lazım. Yani Arapçada olduğu gibi sağdan sola doğru yazıp satırın sonuna gelindiğinde imleç (cursor) soldan satır atlayıp sağ başa geçmesi lazım.

Bu konuda Tastaturun özelliğinin (KeyBoard Layout) değişmesi yetmiyor. Richedit'in özelliğinin değişmesi lazım. Bu konuda örnek bir kod da bulamadım. Umarım bu konuda bana yardım eden çıkar.

Selamlar

Kod: Tümünü seç

procedure TForm1.Memo1Change(Sender: TObject);
var
   i:integer;
begin
i:=Memo1.tag;
form1.memo1.selstart:=i;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1.Alignment:=taRightJustify;
end;
end
Cevapla