Code: Select all
procedure TForm1.Series1GetImage(Sender: TCustomImagePointSeries;
ValueIndex: Integer; Picture: TPicture);
begin
ImageList1.GetBitmap(ValueIndex,Picture.Bitmap)
end;
Code: Select all
procedure TForm1.Series1GetImage(Sender: TCustomImagePointSeries;
ValueIndex: Integer; Picture: TPicture);
begin
ImageList1.GetBitmap(ValueIndex,Picture.Bitmap)
end;