Показать сообщение отдельно
  #3  
Старый 20.05.2011, 19:21
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Страдалецъ, вопрос был немгого другой

Генери селект в рантайме:
Код:
var
 Buf : String;
begin
  // Только для понимания что находится в ComboBox1.
  ComboBox1.Items.Clear;
  ComboBox1.Items.Add('Студент');
  ComboBox1.Items.Add('Группа');

  // Собственно код
  Query1,SQL.Clear;
  Buf := 'SELECT * FROM T WHERE ';
  If ComboBox1.ItemIndex = 0 
    Then Buf := Buf + 'Student'
    Else Buf := Buf + 'Group';
  Buf := Buf + ' = ''' + Edit1.Text + '''';
  Query1.SQL.Text := Buf;
end;
Ответить с цитированием