Код:
Query2.SQL.Add('select sum(Kolichestvo_fact) from Naryd where '+Table1.Filter);
Query2.Open;
F:= Query2.SQL.Add('select sum(Kolichestvo_fact) from Naryd where '+Table1.Filter);
Edit2.Text:=intToStr(F);
И у вас это код проходит без ошибок? А мне казалось, что при открытом Query2 править для него свойство SQL нельзя. Да и вообще мне честно говря непонятно, что вы в F пытаетесь получить таким макаром?