RichEdit строки различным цветом програмно

← →
dolmat © (2003-04-10 17:23) [0]

Ситуация такая иду по двум базам и сравниваю начисления в RichEdit отображаю превышает либо не превышает
как програмно не превышает сделать красным

← →
MBo © (2003-04-10 17:28) [1]

свойства Sel***

← →
dolmat © (2003-04-10 17:41) [2]

>MBo ©
а поточнее можно?
if Table1OPL.asfloat<=Table2NACIS.asfloat then begin
st:=Table1SCET.asstring+" не превышает ";
if Table1VID.AsInteger>Table2CLEN.AsInteger then st:=st+Table1VID.Asstring+">"+Table2CLEN.asstring;
Memo1.Lines.Add(st) end
else begin
st:=Table1SCET.asstring+" превышает "+Table2NACIS.asstring+" ";
if Table1VID.AsInteger>Table2CLEN.AsInteger then st:=st+Table1VID.Asstring+">"+Table2CLEN.asstring;
Memo1.Lines.Add(st);
end;

← →
Dms (2003-04-10 17:42) [3]

XXX.SelStart:=x;
XXX.SelLength:=y;
XXX.SelAttributes.Color:=clRed;

Memo1 это точно TRichEdit? хехе

RichEdit строки различным цветом програмно Найти похожие ветки