ADO, Access und das alles vergleichen

[motu]

Delphi-Quellcode:

begin
  SQLDurchmesser1 := Nutzdurchmesser.Value - (Nutzdurchmesser.Value*0.1);
  SQLDurchmesser2 := Nutzdurchmesser.Value + (Nutzdurchmesser.Value*0.1);

  SQLStatement1 := 'SELECT Probeglaeser.SollRadius, Probeglaeser.IstRadius, Probeglaskennzeichnung.Kennzeichnungsname, Probeglaeser.PGlasKonvex, Probeglaeser.PGlasKonkav, Probeglaeser.PruefdmKonkav, ';
  SQLStatement2 := 'Probeglaeser.PruefdmKonvex, Messart.Messartname, Probeglaeser.Pruefdatum, Probeglaeser.Pruefer, Probeglaeser.Bemerkungen, Probeglaeser.Passe, Probeglaeser.PHDifferenz FROM Probeglaeser, Messart, ';
  SQLStatement3 := 'Probeglaskennzeichnung WHERE Probeglaeser.IstRadius = DBIstRadius AND ((Probeglaeser.PGlasKonvex >= SQLDm1 AND Probeglaeser.PGlasKonvex <= SQLDm2) OR (Probeglaeser.PGlasKonkav ';
  SQLStatement4 := '>= SQLDm1 AND Probeglaeser.PGlasKonkav <= SQLDm2)) AND Probeglaeser.Kennzeichnung = Probeglaskennzeichnung.ID AND Probeglaeser.Messart = Messart.ID ORDER BY Messart.ID;';

  ADOQuery1.SQL.Text := 'SQLStatement1 + SQLStatement2 + SQLStatement3 + SQLStatement4';
  ADOQuery1.Parameters.ParamValues['SQLDm1'] := SQLDurchmesser1;
  ADOQuery1.Parameters.ParamValues['SQLDm2'] := SQLDurchmesser2;
  ADOQuery1.Open;

doch leider bekomm ich den unten angefügten fehler