Re: Detecting Styles

Return to index

Author

Message

Sergey Tkachenko

Posted: 12/09/2002 16:13:56

A code like this "scales" spacebefore proportionally to the current screen

font size mode.

for i := 0 to RVStyle.ParaStyles.Count-1 do

begin

  RVStyle.ParaStyles[i].SpaceBefore :=

    Round(RVStyle.ParaStyles[i].SpaceBefore*Screen.PixelsPerInch/96);

  ...

end;

Editor.Format;

> -Yes.

> -Exists two possible configuration.

>

>

> ---

> He chequeado este email antes de enviarse.

> Checked by AVG anti-virus system (http://www.grisoft.com).

> Version: 6.0.422 / Virus Database: 237 - Release Date: 20/11/2002

>

>