[lmikle]

Ну так и собирай!!!

Код:

var
  I : Integer;
  S : String;
begin
  S := 'SELECT * FROM ' + YourTableName + #13#10;
  For I := Low(AMyControls) To High(AMyControls) Do
    Begin
      If I <> Low(AMyControls) Then S := S + ' AND ';
      S := S + AMyControls.ALabel.Caption + ' = ''' +  AMyControls.AEdit.Text + '''';
    End;

Собирает условие по 'равно'. Нет проверки на пустое значение. Рассматривает все поля как текстовые. Все это доделаешь сам.