Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.23;
Скачать: CL | DM;

Вниз

Использование LIKE при формировании SQL запроса   Найти похожие ветки 

 
RRA   (2004-12-17 12:26) [0]

Как правильно задать условие частичного совпадения значения с помощью LIKE при формировании SQL запроса? Код, который ниже, отрабатывает правильно, когда данные поля и введенного значения абсолютно идентичны, а если ввести первые несколько символов, то ничего не находит. При чем точно известно, что эти первые символы введенного значения точно соответствуют первым символам в поле таблицы. (Delphi6/dBase тип поля - Character, поле ввода - TEdit)
В чем может быть казус?
Процедура:
procedure TmForm.Action_StartSearchExecute(Sender: TObject);
 begin
   mForm.Table1.Active := True;
   case MForm.RadioGroup_TS1.ItemIndex of
     0 :
        ............
     1 :
        ............
     2 :
        begin
          with mForm.Query1 do
            begin
              Query1.Close;
              Query1.SQL.Clear;
              Query1.SQL.Add("Select *");
              Query1.SQL.Add("FROM "DB_Drawing.dbf"");
              Query1.SQL.Add("WHERE NameObj LIKE "" + mForm.Edit_NameObj.Text +"" ");
              Open;
            end;
        end;
     3 :
        ............
     4 :
        ............
   end; // case

   if mForm.Query1.RecordCount = 0
      then MessageDlg("Ничего не найдено!", MtWarning, [mbOk],0)
      else
        begin
          mForm.TabSheet_Result.TabVisible := True;
          mForm.SM_Search_Result.Enabled := True;
          mform.PageControl.ActivePage := mForm.TabSheet_Result;
        end;
 end; //procedure


 
ЮЮ ©   (2004-12-17 12:30) [1]

LIKE [* | %] <SomeText> [* | %]
* или % - зависит от движка


 
Александр Иванов ©   (2004-12-17 12:32) [2]

Еще ? и кроме того регистр.


 
ЮЮ ©   (2004-12-17 12:32) [3]

Например, LIKE "коро%"


 
Johnmen ©   (2004-12-17 12:34) [4]

1. LocalSQL.hlp
2. В общем случае неверно
  >if mForm.Query1.RecordCount = 0  
  Надо if mForm.Query1.IsEmpty then


 
RRA   (2004-12-17 12:36) [5]

Понял, спасибо!



Страницы: 1 вся ветка

Текущий архив: 2005.01.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.048 c
3-1103550189
/glokk
2004-12-20 16:43
2005.01.23
FIBPlus (backup/restore)


1-1105539217
NeDum
2005-01-12 17:13
2005.01.23
ProgressBar


3-1103522844
Layner
2004-12-20 09:07
2005.01.23
Господа, посоветуйте по EhLib, как в нем сделать


1-1104847433
BoAlSe
2005-01-04 17:03
2005.01.23
Деактивация


1-1105452842
saNat
2005-01-11 17:14
2005.01.23
Выделенный пункт в ListBox