SQL hjælpppp

Hey

Jeg side lige og fixer med et skole projekt men jeg kan ikke få det lort her til at virker

for X := 0 to visnyordre.StkList.Count-1 do
begin
with main.Query1 do
  begin
  close;
  SQL.Clear;
  sql.add(\'SELECT * from produkt\');
  RichEdit1.Lines.Add(visnyordre.StkList[X] + \' stk af type \' + typelist[X] + \' \' + main.Query1.FieldByName(\'varenavn\').AsString + \' a kr. pr stk \' + inttostr(main.Query1.FieldByName(\'pris\').AsInteger));
  SQL.Add(\'Where varenummer := \'+ visnyordre.typelist[X]);
    end;
  end;

men det virker ikke den siger \"Query1: Field \'Varenavn\' not found\"
men hvorfor f..... gør den det nå jeg bruger
select * from

<MB>