Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2005.01.23;
Скачать: [xml.tar.bz2];

Вниз

Использование 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.047 c
1-1105465566
Igor_thief
2005-01-11 20:46
2005.01.23
Как лучше?


4-1102088968
amsdev
2004-12-03 18:49
2005.01.23
Вопрос про CriticalSection


9-1096951394
Colt1978
2004-10-05 08:43
2005.01.23
Правильное освещение (GLScene)


14-1104986927
Чеширский_Кот
2005-01-06 07:48
2005.01.23
"Человек в лабиpинте" Роберта Силверберга


14-1104773912
Aldor_
2005-01-03 20:38
2005.01.23
Обособление интерфейсной части в программе. Способы.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский