Kleines Memo/SchleifenProblem

[Tommy1988]

Leider noch ein Problem:

Delphi-Quellcode:

  Form1: TForm1;
  i : Integer;
  x : Extended;

implementation

{$R *.dfm}

procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
x := JvSpinEdit1.Value; // das JvSpinEdit.Value ist EXTENDET (?!?!)
end;

procedure TForm1.JvXPButton1Click(Sender: TObject);
begin
for i := 1 to x do // Fehler hier
 begin
  JvMemo1.Lines.Add('abc('+#39+JvEdit1.Text+#39+','+#39
  +JvEdit2.Text+#39+','+#39+JvMemo1.Text+#39+')');
 end;
end;

[Fehler] Unit1.pas(46): E2010 Inkompatible Typen: 'Integer' und 'Extended'

Extended in Integer umwandeln oder eine andere Lösung gibts dafür nicht oder?

Ich möchte nur ungern das normale SpinEdit verwenden.