anchor.diff:    FOptions    := [];
     FHeaderStyle := ghsButton;
     FBorderStyle := ebsDefault;
  -  FMargin     := GetClientRect.Left;
   
     FFont       := fpgGetFont('#Grid');
     FHeaderFont := fpgGetFont('#GridHeader');
  
positive.code:   colresize: boolean;
    cLeft: integer;
    c: integer;
  begin
    inherited HandleMouseMove(x, y, btnstate, shiftstate);
    
  
negative.code: 
    pcol := FFocusCol;
    prow := FFocusRow;
    borders := fpgStyle.GetControlFrameBorders;
  
    // searching for the appropriate character position
    if ShowHeader then
  