Chart - segredos de programacao

Top  Previous  Next

// Chart - Details

 

 

 

// para travar o valor máximo e minimo do gráfico:

// 1º habilitar ou não o AutomaticMaximum, Minimum

Chart1.LeftAxis.AutomaticMinimum := AutoMinimoCheck.Checked;

Chart1.LeftAxis.AutomaticMaximum := AutoMaximoCheck.Checked;

 

// depois é só setar o valor... 

if NOT AutoMinimoCheck.Checked then Chart1.LeftAxis.Minimum := MinimoSpin.Value;

if NOT AutoMaximoCheck.Checked then Chart1.LeftAxis.Maximum := MaximoSpin.Value;

 

// Enable/Disable aparencia 3D

Chart1.View3D := True/False;

 

// Engrossando a linha de todas as series

for I := 0 to Chart1.SeriesList.CountActive-1 do

  Serie[I].LinePen.Width := 2;

  

// mostrar as caixinhas flutantes (hints) com valoes ou não

for I := 0 to Chart1.SeriesList.CountActive-1 do

begin

  Serie[I].Marks.Visible := True/False;

  Serie[I].Marks.Style   := smsValue;

end;

 

// setando titulo

Chart.Title.Text[0] := 'Gráfico de Custos';

 

// setando cores do degrade

Chart1.Gradient.EndColor   := clBlue;

Chart1.Gradient.StartColor := clWhite;

 

// copiando para clipboard

Chart1.CopyToClipboardBitmap;

 

// tirar serie do chart 

Chart1.RemoveSeries( Serie[S] );

 

// adicionar

Chart1.AddSeries(Serie[S]);