Не сравнивает значение поля dbgrid и строку

@SuperSanchous · Регистрация: 02.06.2015

Студворк — интернет-сервис помощи студентам

Здраствуйте, помогите пожалуйста. В Delphi посредством запроса берутся данные из таблицы в базе данных с паролем, логином и группой пользователя. При входе программа сравнивает группу пользователя со строкой 'Администраторы' и если все верно, то вкладка main menu становится видимой. Но сравнения не происходит, я даже в label выводил значение поля, оно равно 'Администраторы'.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
dm.qryProverka.SQL.clear;
dm.qryProverka.sql.add('SELECT Код_пользователя,Логин_пользователя,Пароль_пользователя,пользователей,Ответ_на_контрольный_вопрос FROM Ïîëüçîâàòåëè WHERE Логин_пользователя='+''''+string(edt1.Text)+''''+ ' and Пароль_пользователя='+''''+string(edt2.Text)+'''');
dm.qryProverka.Active:=true;
global:=dbgrd1.Columns[0].Field.AsInteger;
s:=DBGrd1.DataSource.DataSet.FieldByName('Группа_пользователей').value;
trim(s);
if(s='Администраторы')  then
//form1.N22.Visible:=true
showmessage('Да')
else begin
//form1.N22.Visible:=false;
showmessage('Нет');
end;

Не сравнивает значение поля dbgrid и строку

Это форма приложения

@SuperSanchous · 18.06.2017, 17:35 **[ТС]**

Я так понял, что он считывает строку с большим числом пробелом, трим вроде работать должен. Эххх, зачем мне этот монолог...

@Пытливый · 18.06.2017, 17:46

1. 6 строка компилятором проигнорирована т.к. Trim функция, а не процедура.
2. Я не понимаю смысла 1-3 строк, ведь вы результат проверки вроде не используете.
3. В запросе похоже потерялось правильное название поля Группа_пользователей, остался только кусок.

@SuperSanchous · 18.06.2017, 18:00 **[ТС]**

1.Понял, подскажите нормальный код для удаления пробелов в строке.
2.1-3 запуск запроса для dbgrid, ибо датасурс.
3.Запрос написан правильно, т.к. он выводит значение поля и ошибку не вбрасывает.

@D1973 · 18.06.2017, 18:02

Сообщение от SuperSanchous

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

Delphi
1
s := Trim(s);

Но это касается только начальных и конечных пробелов. Пробелы в середине текста не учитываются...

@SuperSanchous · 18.06.2017, 18:04 **[ТС]**

Все, спасибо. Решение нашлось. Тему можно закрывать.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .

@SuperSanchous 0 / 0 / 0 Регистрация: 02.06.2015 Сообщений: 20
	18.06.2017, 17:35 [ТС]
	Я так понял, что он считывает строку с большим числом пробелом, трим вроде работать должен. Эххх, зачем мне этот монолог... 0

@Пытливый 3763 / 2267 / 705 Регистрация: 29.05.2013 Сообщений: 9,622
	18.06.2017, 17:46
	1. 6 строка компилятором проигнорирована т.к. Trim функция, а не процедура. 2. Я не понимаю смысла 1-3 строк, ведь вы результат проверки вроде не используете. 3. В запросе похоже потерялось правильное название поля Группа_пользователей, остался только кусок. 1

@SuperSanchous 0 / 0 / 0 Регистрация: 02.06.2015 Сообщений: 20
	18.06.2017, 18:00 [ТС]
	1.Понял, подскажите нормальный код для удаления пробелов в строке. 2.1-3 запуск запроса для dbgrid, ибо датасурс. 3.Запрос написан правильно, т.к. он выводит значение поля и ошибку не вбрасывает. 0

@SuperSanchous 0 / 0 / 0 Регистрация: 02.06.2015 Сообщений: 20
	18.06.2017, 18:04 [ТС]
	Все, спасибо. Решение нашлось. Тему можно закрывать. 0