Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

In this Discussion

Share Me

  • Please share this topic with your friends. Click any of the icons below:
  • Twitter
  • facebook
  • reddit
  • email

TLMDListBox OnHeaderDrawSection event not fired

LMD-Tools 2017.0 (14-12-2016), Delphi 7, Win7

TLMDListBox has 4 header sections, style as hsOwnerDraw and LMDListBox has OnHeaderDrawSection defined as flollows:

with HeaderControl.Canvas do
  begin
    FillRect(Rect);
    if Pressed then // highlight pressed sections
      Font.Color := clRed else
      Font.Color := clWindowText;
    TextOut(Rect.Left + Font.Size, Rect.Top + 2, Section.Text + '*');
 end; //with HeaderControl.Canvas do

Event is not fired at all.



Comments

Sign In or Register to comment.