anchor.diff:    end;
   
     StatusForm.FormStyle:= fsSystemStayOnTop;
  -  StatusForm.Color:= GetAppColor(apclListBg);
  -  StatusForm.Font.Name:= UiOps.VarFontName;
  -  StatusForm.Font.Size:= AppScaleFont(UiOps.VarFontSize);
  -  StatusForm.Font.Color:= GetAppColor(apclListFont);
  +  StatusForm.Color:= clInfoBk; //GetAppColor(apclListBg);
  +  StatusForm.Font.Name:= EditorOps.OpFontName;
  +  StatusForm.Font.Size:= AppScaleFont(EditorOps.OpFontSize);
  +  StatusForm.Font.Color:= clInfoText; //GetAppColor(apclListFont);
   
     if ASeconds<=0 then
     begin
  
positive.code:   if ASeconds>cMaxSeconds then
      ASeconds:= cMaxSeconds;
  
    StatusForm.Width:= Self.Width;
    StatusFormLabel.Caption:= AText;
    StatusForm.Height:=
      //StatusFormLabel.Height + 2*cSpacing;
      StatusFormLabel.Canvas.TextHeight('W') * (SFindCharCount(AText, #10)+1) + 2*cSpacing;
  
    case UiOps.AltTooltipPosition of
      0:
  
negative.code:         Dec(P.Y, NCellSize);
          if P.Y<=WorkRect.Top then
            Inc(P.Y, 2*NCellSize);
        end;
    end;
  
    P.X:= Min(P.X, WorkRect.Right-StatusForm.Width);
    P.Y:= Min(P.Y, WorkRect.Bottom-StatusForm.Height);
  
    StatusForm.Left:= P.X;
    StatusForm.Top:= P.Y;
  
  