Chart Diagramm probleme

[Foxi1896]

Sorry, das ich mit so einer hoffenltich Simplen Frage komme.
Habe heute mit Delphi angefangen.

Was kann ich gegen die Fehlermeldung: Divison durch 0 machen?
Und wie kann ich es machen das M auf der x Achse angezeigt wird. Eigentlich sollten I und n geraden sein und eta eine kurve.

Danke schonmal für Hilfe.

http://forum.delphi-treff.de/index.p...824#post433824

var
Form1: TForm1;

const
Pi=3.14159;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);

var
R, C, U, M_r : Real;
I, M, M_i, eta : Real;
n : Integer;

begin


R :=StrToFloat(Edit1.Text);
C :=StrToFloat(Edit2.Text);
U :=StrToFloat(Edit3.Text);
M_r:=StrToFloat(Edit4.Text);

Series1.Clear;
Series2.Clear;
Series3.Clear;

for n:=0 to 100 do
begin

{Stromberechnung}
I:= (1/R) * (U-(C*n));

{Momentberechnung}
M_i:= I * (C/2*Pi);
M := M_i - M_r;

{Wirkungsgradberechnung}
eta:= (M*2*Pi*n) / (U*I);

{Kennlinien}
Series1.AddXY(M,I,'',clRed);
Series2.AddXY(M,(n),'',clBlue);
Series3.AddXY(M,eta,'',clGreen);

end;

end;

end.