Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
1-1105482753
Creating
2005-01-12 01:32
2005.01.23
В каком месте лучшe ставить inherited ? До своего кода, после


3-1103263891
Frozzen
2004-12-17 09:11
2005.01.23
Проблемы работы с Tdbf!


14-1104290969
gn
2004-12-29 06:29
2005.01.23
Россия: отпечатки пальцев сдаст каждый


1-1104914188
tintiuc@hotmail.com
2005-01-05 11:36
2005.01.23
Как извлечь рисунок (если это возможно)


4-1101982956
Alex_Petr
2004-12-02 13:22
2005.01.23
Получение "C: Documents and Settings".




   Наверх