New line rule changed in TsHTMLLabel?

Viewing 4 posts - 1 through 4 (of 4 total)
  • Author
    Posts
  • #56005
    Support
    Keymaster

      Hello, Dick

      This is a mistake, I will fix it very soon.

      Quote:
      PS: Have a good 2017 for you and your family.

      Thank you, you too.

      #56006
      HeDiBo
      Participant
        'Support' wrote:

        Hello, Dick

        This is a mistake, I will fix it very soon.

        I assume the HTMLText procedure in sHtmlParse.pas needs an extra parameter: RealHtml: boolean. If true it would change the procedure as follows:

        Code:
        #$D: if not RealHtml then begin
        if CurPos > LastPos then
        ShowCut(CurPos, LastPos);

        LastPos := CurPos;
        if CurrentRowHeight = 0 then
        CurrentRowHeight := acTextHeight(Bitmap.Canvas, 'Yy');

        NewRow;
        end;

        #$A:
        if not RealHtml then CurX := Area.Left;

        RealHtml would be True if hint and label have the HTMLMode (sAlphaHints) and the UseHtml properties set. If that's the way it should work, I can make a temporary patch.

        #56007
        Support
        Keymaster

          Yes, you can make this changing.

          #56144
          HeDiBo
          Participant

            Thing are OK in 11.25 a3.gif

          Viewing 4 posts - 1 through 4 (of 4 total)
          • You must be logged in to reply to this topic.