Текущий архив: 2003.04.21;
Скачать: CL | DM;
Вниз
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;
← →
Palladin © (2003-04-10 17:48) [4]Memo1 это точно TRichEdit? хехе
Страницы: 1 вся ветка
Текущий архив: 2003.04.21;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
