Einzelnen Beitrag anzeigen

Tommy1988
(Gast)

n/a Beiträge
 
#3

Re: Kleines Memo/SchleifenProblem

  Alt 23. Jun 2007, 19:43
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.
  Mit Zitat antworten Zitat