Почему запрос работает медленно

[_SERGEYX_]

Всем привет. Вопрос такой:
Делаю два запроса

Oborotform.QTemp.Close;
Oborotform.QTemp.SQL.Clear;
Oborotform.QTemp.SQL.Add('Select sum(summa) from fin_oper  Where (debet = "' + Oborotform.QBuh_BegNUM_SCH.Text + '") And (data >= "' + dStartStr + '") And (data <= "' + dEndStr + '")');
Oborotform.QTemp.Open;
summaD := Oborotform.QTemp.Fields[0].AsFloat;

Oborotform.QTemp.Close;
Oborotform.QTemp.SQL.Clear;
Oborotform.QTemp.SQL.Add('Select sum(summa) from fin_oper  Where (kredit = "' + Oborotform.QBuh_BegNUM_SCH.Text + '") And (data >= "' + dStartStr + '") And (data <= "' + dEndStr + '")');
Oborotform.QTemp.Open;
summaK := Oborotform.QTemp.Fields[0].AsFloat;

Если эти два запроса объединить в один...

Oborotform.QTemp.Close;
Oborotform.QTemp.SQL.Clear;
Oborotform.QTemp.SQL.Add('Select sum(a.summa), sum(b.summa) from fin_oper a, fin_oper b Where (a.debet = "' + Oborotform.QBuh_BegNUM_SCH.Text + '") and (b.kredit = "' + Oborotform.QBuh_BegNUM_SCH.Text + '") And (data between "' + dStartStr + '" And "' + dEndStr + '")');
Oborotform.QTemp.Open; 
summaD := Oborotform.QTemp.Fields[0].AsFloat;
summaK := Oborotform.QTemp.Fields[1].AsFloat;

... то он выполняется в несколько раз медленнее. Почему?

[mihali4]

Понятно почему - идет "параллельное" выполнение фактически двух запросов и они друг другу просто мешают, ведь условия WHERE постоянно сменяют друг друга.
Если позволите, Сергей, парочку замечаний-советов:
1. Вам не кажется, что две строки

Oborotform.QTemp.SQL.Clear;
Oborotform.QTemp.SQL.Add('.....

заменяются на одну:

Oborotform.QTemp.SQL.Text:='......

2. Чтобы не высчитывать номер поля (summaD := Oborotform.QTemp.Fields[0]...) чуть-чуть усовершенствуем ваши запросы:
Select sum(summa) as sum1...
Теперь можно обращаться к полю по имени, а не по номеру. (представьте себе, что будет, если выходной набор данных содержит десятки полей...)