anchor.diff:    if not InRange(I, 0, fCount - 1) then Exit;
   
     fLines[I].Visible := not fLines[I].Visible;
  +
  +  UpdateMaxValue;
   end;
   
   
  
positive.code:   SetLength(fLines, 0);
    fMaxValue := 0;
  end;
  
  
  procedure TKMGraph.MouseUp(X, Y: Integer; Shift: TShiftState; Button: TMouseButton);
  
negative.code:     end;
      fMaxLength: Word;
      fMaxValue: Word;
      procedure UpdateMaxValue;
    public
      constructor Create(aParent: TKMPanel; aLeft,aTop,aWidth,aHeight: Integer);
  
  