[lmikle]

Канеч, ломается. Скобку то хто закрывать бу?

Код:

If (DBComboBoxEh4.Text<>'') Or  (DBComboBoxEh5.Text<>'') Then
begin
  f.SQL.Add('and (');
  if DBComboBoxEh4.Text<>'' then f.SQL.Add('FRUKT like'+#39+DBComboBoxEh4.Text+#39);
  if DBComboBoxEh5.Text<>'' then 
    begin
      if DBComboBoxEh4.Text<>'' then f.SQL.Add('or');
      f.SQL.Add('FRUKT like'+#39+DBComboBoxEh5.Text+#39);
    end;
  f.SQL.Add(')');
end;

как-то так...