need help about TRxRichedit

[GTunlocker]

hi all

i have some problem

procedure Addlog(msg: string; Color: Tcolor; ReadLen: Boolean=false; bold: boolean= false;
begin
rxrichedit.sellatribute.color:= Tcolor;
if bold then rxrichedit.sellatribute.font:= [fsbold];
else rxrichedit.sellatribute.font:=[];
rxrichedit.seltext:=msg;
if readlen then rxrichedit.seltext:=#13#10;
rxrichedit.perform(EM_Scroolset,0,0);
end;

if uses Standart richedit good no prob
but using RxRichedit Problem

i want this log show
addlog('TEST',Clblack,true,true);
addlog('Test',Clred,false,false);

and show in richedit
TEST test = using richedit standart

TEST
test => using RxRichedit

help me
thanks
br

[nester261]

I am not sure how you got this code you posted to work with the Standard TRichEdit as just by looking at it I know it would not compile...

Change the code in your procedure, to this:

  rxrichedit.SelAttributes.Color := Color;
  if bold then
    rxrichedit.SelAttributes.Style := [fsbold]
  else
    rxrichedit.SelAttributes.Style := [];
  rxrichedit.seltext := msg;
  if ReadLen then
    rxrichedit.seltext := #13#10;
  rxrichedit.perform(EM_SCROLLCARET, 0, 0);

[GTunlocker]

Originally Posted by nester261

I am not sure how you got this code you posted to work with the Standard TRichEdit as just by looking at it I know it would not compile...

Change the code in your procedure, to this:

  rxrichedit.SelAttributes.Color := Color;
  if bold then
    rxrichedit.SelAttributes.Style := [fsbold]
  else
    rxrichedit.SelAttributes.Style := [];
  rxrichedit.seltext := msg;
  if ReadLen then
    rxrichedit.seltext := #13#10;
  rxrichedit.perform(EM_SCROLLCARET, 0, 0);

your code right but prob seltxt #13#10

if rxrichedit.seltext := #13#10; problem is text no show in rxrichedit
if Rxrichedit.lines.add(#13#10); all text lenght potition
like this

TEST: TRUETEST: TRUETEST: TRUETEST: TRUETEST: TRUE

and i want

TEST: TRUE
TEST: TRUE
TEST: TRUE
TEST: TRUE
TEST: TRUE

please

br

[nester261]

Just set your ReadLen variable to True!

Like this:

Addlog('TEST: TRUE',clRed,True,True);

[GTunlocker]

Originally Posted by nester261

Just set your ReadLen variable to True!

Like this:

Addlog('TEST: TRUE',clRed,True,True);

i have done
if RXrichedit1.seltext:='TEST'; not show in rxrichedit

i think problem is seltext

maybe i will upload my source

in original richedit its fine

addlog('TEST :',clblack,false,false);
addlog('TRUE,clred,true,true);
show in rich edit TEST: TRUE

thanks and best regard