How to Assign a Font to a Constant Line ???

[User (Legacy)]

Hello everybody, 

I am drawing a constant line like this: 

   ChartFX1.OpenDataEX(COD_CONSTANTS,1,0); 

   L := StrToFloat(AdvStringGrid8.Cells[4,AdvStringGrid8.Rowcount-1]); 

   ChartFX1.ConstantLine[0].Value := L; 

   ChartFX1.ConstantLine[0].LineColor := 

LblLaatsteKoersLijnKleurVoorbeeld.Font.Color; 

   ChartFX1.ConstantLine[0].Axis := AXIS_Y; 

   ChartFX1.ConstantLine[0].Label_ := 'Laatste Koers'; 

   ChartFX1.ConstantLine[0].LineWidth := 

StrToInt(EdtLaatsteKoersLijnDikte.Text); 

   ChartFX1.CloseData(COD_CONSTANTS); 

Now I want to change the font properties of the constant line Label. 

I have tried some things taken from the examples like: 

   {assign font properties for the text labels of the constant lines} 

   ChartFX1.Fonts[CHART_FIXEDFT] := CF_BOLD Or CF_ARIAL Or 12; 

   {assign text color for the labels of the constant lines} 

   ChartFX1.RGBFont[CHART_FIXEDFT] := RGB(0, 128, 128); 

But what I really want is to choose a font and its properties with a 

FontDialog and then assign the FontDialog.Font property to the constant line 

label. 

I hope someone can tell me if this is possible and how to perform this. 

Regards, 

Maurice Wasbauer