Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Для новичков > Выбор данных из таблицы по параметрам


Автор: k05tmb 30.11.2008, 19:32
Как в Delphi организовать выборку данных из таблицы по нескольким параметрам???

В таблице есть сведения о стадии обработки (черновая/чистовая), материале детали, диаметрах заготовок, надо выбрать по этим параметрам подачу... (см. рисунок)

user posted image

Я написал это не работает:

Код

procedure Podacha;
begin
  s1:=0;
  //черновая обработка
  if Form1.ComboBox1.ItemIndex=0 then
  begin
    //диаметр от 0 до 2
    if ((t>0) and (t<=2)) then
    begin
      //материал сталь углеродистая
      if Form1.ComboBox4.ItemIndex=0 then
      begin
        if ((D>0) and (D<=18)) then s1:=0.21;
        if ((D>=19) and (D<=50)) then s1:=0.45;
        if ((D>=51) and (D<=180)) then s1:=0.83;
      end;
      //материал сталь легированная
      if Form1.ComboBox4.ItemIndex=1 then
      begin
        if ((D>0) and (D<=18)) then s1:=0.18;
        if ((D>=19) and (D<=50)) then s1:=0.22;
        if ((D>=51) and (D<=180)) then s1:=0.26;
        if ((D>=181) and (D<=500)) then s1:=0.36;
      end;
    end;
  end;
  Form1.Edit5.Text:=FloatToStr(s1);
end;



Можно это как-нибудь по другомы сделать, т.е. не вложеннами IFами???

Автор: Данкинг 30.11.2008, 20:12
1. В чём заключается "не работает"?
2. Где в твоём примере выборка из таблицы? А она, кстати, осуществляется обычным SQL-запросом.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)