trichview.support
Re: Carries of lines in RVEdit |
Author |
Message |
Sergey Tkachenko |
Posted: 07/07/2005 23:11:21 ... for n:=0 to rve4.ItemCount-1 do begin if (n>0) and rve4.IsFromNewLine(n) then text := text + #10#13; if (rve4.GetItemStyle(n)=rvsBullet) then text:=text+GetSmile(GetBulletImageIndex); else if rve4.GetItemStyle(n)>=0 then text:=text+rve4.GetItemTextA(n); end; rv3.AddTextNL(text,0,0,0); rv3.Format; |
Powered by ABC Amber Outlook Express Converter