SQL Fehler

[Mackhack]

Hallo DPler,

ich habe hier ne kleine Test Procedure:

Delphi-Quellcode:

procedure TfoMain.LvwInfoSelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
var
  I: Integer;
  Index: Integer;
begin
  if ( Selected and (LvwInfo.ItemIndex > -1) ) then
  begin
    for I := 0 to LvwInfo.Items.Count do
    begin
      Index := StrToInt(LvwInfo.Items[I].Caption) + 1;
      with AdsQuery1 do
      begin
        Active := False;
        SQL.Text := 'SELECT * FROM Daten WHERE Index=' + IntToStr(Index);
        ShowMessage(SQL.Text);
        Active := True;
        EdtIndex.Text := FieldByName('Index').AsString;
        EdtBezeichnung.Text := FieldByName('Bezeichnung').AsString;
        EdtDatum.Text := FieldByName('Datum').AsString;
        EdtPreis.Text := FieldByName('Preis').AsString;
      end;
    end;
  end;
end;

Ich bekomme in der SQL.Text.. Zeile immer diese Fehlermeldung und kann mir absolut nicht erklaeren warum!

Zitat:

---------------------------
Sqldemo
---------------------------
AdsQuery1: Error 7200: AQE Error: State = 42000; NativeError = 2115; [Extended Systems][Advantage SQL Engine]Expected lexical element not found: identifier or expression -- Location of error in the SQL statement is: 33 There was a problem parsing the WHERE clause in your SELECT statement.
---------------------------
OK
---------------------------

Weis jemand von euch warum?