Главная страница
    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.038 c
14-1104765928
Piter
2005-01-03 18:25
2005.01.23
Быстрый способ вырезать строку


1-1105604589
LML
2005-01-13 11:23
2005.01.23
Иконки из PNG


1-1104926082
zt50
2005-01-05 14:54
2005.01.23
Переименовать файл


1-1104998124
Кодер
2005-01-06 10:55
2005.01.23
Курсор в RichEdit


14-1104900231
ms
2005-01-05 07:43
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский