Скачать: CL | DM;

RxRichEdit   Найти похожие ветки 

← →
Aga ©   (2003-08-28 13:03) [0]

вобщем там отступ слева оочень большой мне нужно сделать его как в блокноте... делаю так :
RichEdit1.Perform(EM_SETRECT,0,LParam(@r));
ShowMessage(IntToStr(r.Left));
где r: TRect; r.Left := 0; но получается что текст слишком приближен к границе...
нужно на пол мм дальше...

---

← →
aga ©   (2003-08-28 14:29) [1]

Интересно что вышеописаный код работае отличительно от этого:

var Rect: TRect;
begin
SendMessage( RichEdit1.Handle, EM_GETRECT, 0, LongInt(@Rect));
Rect.Left:= 3;
SendMessage(RichEdit1.Handle, EM_SETRECT, 0, LongInt(@Rect));
RichEdit1.Refresh;

end;

даже если в первом сделать r.Left := 3;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.024 c