Estimado Casimiro: éste es el código:
Código Delphi
[-]procedure TForm1.b4KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var i,k:integer;
a,b,paso,x,y1,y:real;
begin
if key=vk_return then begin
chart1.Series[5].clear;
chart1.Series[18].clear;
listbox7.Clear;
listbox8.Clear;
a:=strtoreal(a4.Text);
b:=strtoreal(b4.Text);
y:=strtoreal(mayor.Text)+10;
paso:=strtoreal(combobox5.text);
x:=strtoreal(menor.Text)-10;
repeat
x:=x+paso;
y1:=a*x+b;
listbox7.Items.Add(realtostr(x));
listbox8.Items.Add(realtostr(y1));
if (combobox4.Text='=') or (combobox4.Text='>=')or (combobox4.Text='<=') then
chart1.Series[5].addxy(x,y1) else chart1.Series[18].AddXY(x,y1);
until x>=y;
if key=vk_return then button8.SetFocus;
end;
end;
La series[5] es linea solida y la series[18] es punteada. Para evitar tener que duplicar las series 5 y 18. ¿cómo procedo para cambiar de sólido a punteada?
Gracias.
Carlos