Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Поиск в Locate с учетом регистра 
:(
    Опции темы
HloR09
Дата 15.1.2015, 13:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 15.1.2015

Репутация: нет
Всего: нет
Добрый день. Облазил вроде весь поиск но ничего толком и не нашел, может кто поможет. Суть проблемы, имеется БД Access подключена через ADO использую поиск в базе через Locate. Почему-то перестал распознавать регистр, раньше стоял параметр loCaseInsensitive т.к. была необходимость не учитывать регистр. После того как убрал параметр все равно не учитывает. В чем может быть проблема.
Пример кода:
Код

procedure Tsecurity.btInputClick(Sender: TObject);
  begin
     if DataModule1.ADOTable1.Locate('User_name',edUserName.text,[]) then
      begin
        showmessage('Пользователь существует');
      end
     else
      begin
        showmessage('Пользователя не существует');
      end;
PM MAIL   Вверх
superVad
Дата 15.1.2015, 14:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 3
Всего: 15
HloR09, как вариант, попробуй заменить TADOTable на TADODataSet. А так, даже не знаю.

Добавлено через 1 минуту и 7 секунд
Ну или ищи пользователя отдельным запросом.
PM MAIL   Вверх
HloR09
Дата 16.1.2015, 13:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 15.1.2015

Репутация: нет
Всего: нет
Замена TADOTable на TADODataSet не прокатила.
Думал что может обойтись малой кровью,но все таки придется переписывать этот участок кода.
PM MAIL   Вверх
kami
Дата 16.1.2015, 14:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1806
Регистрация: 25.8.2007
Где: Санкт-Петербург

Репутация: 3
Всего: 72
Цитата(HloR09 @  15.1.2015,  13:19 Найти цитируемый пост)
После того как убрал параметр все равно не учитывает. 

Я, возможно, ничего не понимаю в колбасных обрезках, но... (по крайней мере в D2010) параметр loCaseInsensitive вообще не используется в TCustomADODataSet.Locate (и вызываемой из нее LocateRecord).
Соответственно - что он есть, что его нет - все равно.

Это сообщение отредактировал(а) kami - 16.1.2015, 14:44
PM MAIL WWW   Вверх
HloR09
Дата 17.1.2015, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 15.1.2015

Репутация: нет
Всего: нет
Цитата(kami @  16.1.2015,  14:44 Найти цитируемый пост)
(по крайней мере в D2010) параметр loCaseInsensitive вообще не используется в TCustomADODataSet.Locate (и вызываемой из нее LocateRecord).
Соответственно - что он есть, что его нет - все равно.


Наверно ты прав.

Больше в голову ничего не пришло сделал вот так

Код

procedure TSecurity.btInputClick(Sender: TObject);
  begin
   if (DataModule1.ADOTable1.Locate('User_name', edLogin.Text,[])) and
      (LowerCase(self.edLogin.text) = LowerCase(DataModule1.ADOTable1.Fields[1].text)) and
      (edPassword.text = DataModule1.ADOTable1.Fields[2].text) then
     begin
      showmessage ('Вход');
     end
   else
    begin
      showmessage ('Ошибка');
    end;
  end;
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0430 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.