TABS TRichViewEdit V1.9.23.1

[cwenet]

Hi,

how can I add tabs while runtime. I have to set 4 tabs.
This is the first.

Code: Select all

RVStyle1.ParaStyles[0].Tabs[0].Align := rvtaLeft;
RVStyle1.ParaStyles[0].Tabs[0].Leader := '.';
RVStyle1.ParaStyles[0].Tabs[0].position := 60;

topedit.ApplyParaStyle(0);

But there is an item maximum error.

Please help, thanks

regards
Christoph

[cwenet]

Ok, I have solved:

Code: Select all

var ParaStyle: TParaInfo;
begin
paraStyle := TParaInfo.Create(nil);
  parastyle.Tabs.Clear;

  with paraStyle.Tabs.Add do begin
    align := rvtaLeft;
    leader := '.';
    position := 120;
    end;

Christoph