anchor.diff:      property OnDrawVisualCell;
     end;
   
  -
   procedure Register;
   
   implementation
  
positive.code:         Top := 8;
          Width := 25;
          Height := 25;
          Caption := #9198;
          OnClick := PageNavigationClick;
          Tag := PAGE_NAVIGATION_FIRST;
        end;
  
negative.code:     FPageCount:=LResult.PageCount;
  
      FAllRecordsCountLabel.Visible := LResult.TotalDataCount >= 0;
      FAllRecordsCountLabel.Caption:=Format('Total: %d', [LResult.TotalDataCount]);
  
      FPageIndex := LResult.PageIndex;
  
  