Показать сообщение отдельно
  #9  
Старый 03.04.2007, 11:10
Holy Holy вне форума
Новичок
 
Регистрация: 31.07.2006
Сообщения: 55
Репутация: 10
По умолчанию

Код:
SQLStr := 'select * from Employers ';
if (Edit1.Text <> '') and (Edit2.Text <> '') and (Edit3.Text <> '') then
begin
  SQLStr := SQLStr  + ' where ';
  
  if Edit1.Text <> '' then
  begin
     SQLStr := SQLStr  + ' Name = ' + QuotedStr(Edit1.Text);
  end;
  
  if Edit2.Text <> '' then
  begin
     SQLStr := SQLStr  + ' Post = ' + QuotedStr(Edit1.Text);
  end;
  
  if Edit3.Text <> '' then
  begin
     SQLStr := SQLStr  + ' Patronymic = ' + QuotedStr(Edit1.Text);
  end;
end;
Ответить с цитированием