Steema Issues Database

Note: This database is for bugs and wishes only. For technical support help, if you are a customer please visit our online forums;
otherwise you can use StackOverflow.
Before using this bug-tracker we recommend a look at this document, Steema Bug Fixing Policy.



Bug 2334 - PolarContourSeries values
Summary: PolarContourSeries values
Status: CONFIRMED
Alias: None
Product: VCL TeeChart
Classification: Unclassified
Component: Series (show other bugs)
Version: unspecified
Hardware: PC Windows
: --- enhancement
Target Milestone: ---
Assignee: Steema Issue Manager
URL:
Keywords:
Depends on:
Blocks:
 
Reported: 2020-05-28 05:41 EDT by Roman
Modified: 2020-09-29 11:40 EDT (History)
2 users (show)

See Also:
Chart Series: Polar
Delphi / C++ Builder RAD IDE Version:

Attachments
line values on the normal series, how to draw them on the polar? (33.09 KB, image/jpeg)
2020-05-28 05:41 EDT, Roman 		Details
View All Add an attachment (proposed patch, testcase, etc.)

Note You need to log in before you can comment on or make changes to this bug.
Description Roman 2020-05-28 05:41:16 EDT 
Created attachment 938 [details]
line values on the normal series, how to draw them on the polar?

Dear TeeChart team,

Is there a way how to get the same feature as shows in the attachment but for the polar series? Thanks.
Comment 1 marc meumann 2020-09-29 11:40:37 EDT 
We don't plan to add this feature just yet, a way of arriving at line locations and values could be with this type of code:

procedure TForm1.Chart1AfterDraw(Sender: TObject);
var x1, y1, idx1, x2, y2, idx2, midx, midy : Integer;
begin
  idx1 := 3;

  x1:=Series1.CalcXPos(idx1);
  y1:=Series1.CalcYPos(idx1);

  idx2 := 4;

  x2:=Series1.CalcXPos(idx2);
  y2:=Series1.CalcYPos(idx2);

  Chart1.Canvas.Font.Color := clWhite;

  //info
  //Chart1.Canvas.TextOut(x1,y1,'first point ' + IntToStr(idx1));
  //Chart1.Canvas.TextOut(x2,y2,'next point ' + IntToStr(idx2));

  midx := x1 + (x2 - x1) div 2;
  midy := y1 + (y2 - y1) div 2;

  Chart1.Canvas.Pen.Color := clWhite;
  Chart1.Canvas.Ellipse(Rect(midx-1,midy-1,midx+1,midy+1));
  Chart1.Canvas.TextOut(midx,midy,'mid val');
  //or RotateLabel .. need to calculate angle.
end;