[fen]

Столкнулся недавно с проблемой, начал создавать программу, которая из некоторой базы MSSQL вытягивает скидку заказчика по номеру его дисконтной карты или фамилии. Всего скидок на материалы окола 7 типов: пвх-конструкции,алюминиевые,комплектующие,ролеты,подок онники и т.д. Чтобы определить скидку на любой 1 вид материала из перечисленных делаю через запрос Query, и потом весь результат помещаю в DBGridEh, тут всё нормально проходит.
Проблема: Я еще создал 6 штук label сбоку формы, и 6 запросов Query, как мне через нажатие на кнопку чтобы сразу результаты запросов помещались в label.caption.

[xchrom]

почитай http://www.delphisources.ru/forum/showthread.php?t=4729

[Appolon]

Ну к примеру можно так:

Код:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add('select count(zakupok), sum(Cena), avg(Cena), max(cena),         min(cena)  from pokupki;');
  Query1.Open;

  Label1.Caption:=Query1.Fields[0].AsString;
  Label2.Caption:=Query1.Fields[1].AsString;
  Label3.Caption:=Query1.Fields[2].AsString;
  Label4.Caption:=Query1.Fields[3].AsString;
  Label5.Caption:=Query1.Fields[4].AsString;
end;

Я не знаю какие Query 6 штук Вы создали, но я уверен, что их можно объединить в один.

[fen]

xchrom,Appolon - спасибо, всё работает.