AlphaHints stopped working

Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #58237
    HeDiBo
    Participant

    The problem occurs because this change in AcAlphaHints:

    Code:
    procedure TacCustomHintWindow.ActivateHint(Rect: TRect; const AHint: string);
    {$IFNDEF ACHINTS}
    var
    w, h: integer;
    p: TPoint;
    {$ENDIF}
    begin
    {$IFNDEF ACHINTS}
    if Assigned(Manager) and HandleAllocated then begin // This is changed
    Manager.State := hsInit;

    In my case, apparently HandleAllocated is false.

    #58239
    Support
    Keymaster

    Thank you for the demo, I will fix it.

    #58248
    HeDiBo
    Participant
    'Support' wrote:

    Thank you for the demo, I will fix it.

    It works great again a7.gif

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