Вниз
Скачать: 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.026 c
14-1105013539
Чеширский_Кот
2005-01-06 15:12
2005.01.23
Blindmаn


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


3-1103354594
Dell3r
2004-12-18 10:23
2005.01.23
Неизвестная


1-1105216331
WhiteGuy
2005-01-08 23:32
2005.01.23
ExtToStr


1-1105475979
vladimir24
2005-01-11 23:39
2005.01.23
работа в Delphi




   Наверх