Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14

Проблема с кодом поиска и сортировки

27.05.2021, 19:16. Показов 1583. Ответов 28
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
У меня появилась проблема:
Пишу я код для поиска данных моей АИС, программа ругается на несоответствие.
Вот перед вашими глазами код SQL:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm2.Edit1Change(Sender: TObject);
begin
 help1:='%'+Form2.Edit1.Text+'%';
 help2:=QuotedStr(help1);
    with Form2.ADOQuery1 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('SELECT * FROM Клиенты WHERE FIO = ID_klient LIKE'+help2+'OR ID_klient LIKE'+help2+'OR Class_klient LIKE'+help2+'ORDER BY ID_klient');
      Open;
    end;
end;
end
Я уже старался как мог, но проблема до сих пор не решена. Можете мне с этим помочь? Буду очень благодарен.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
27.05.2021, 19:16
Ответы с готовыми решениями:

Проблема с кодом. Выдает ошибку, я не могу понять в чем проблема
Работаю первый раз с Maple. Установлен версии 2015 года. Выдает ошибку я не могу понять в чем проблема Вот код: restart: ...

Алгоритм бинарной сортировки с кодом. Java
Объсните, пожалуйста, как работает этот код и как контролируется выход за пределы массива. for (int i = length - 1; i >= 0; i--) { ...

Реализация поиска по заштрихованной матрице(вар.2,6,10). Проблемы с кодом:с
#include <iostream> #include <conio.h> #include <clocale> #include <cstring> using namespace std; int main() { setlocale...

28
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14
29.05.2021, 14:43  [ТС]
Студворк — интернет-сервис помощи студентам
Спасибо вам огромное.
Но есть одно "но". Что мне делать с сортировкой DBCheckBox?
0
561 / 230 / 88
Регистрация: 11.07.2015
Сообщений: 817
29.05.2021, 14:52
Цитата Сообщение от Matteos124 Посмотреть сообщение
сортировкой DBCheckBox?
Что сортировать будем.
0
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14
29.05.2021, 14:55  [ТС]
Ту же таблицу DBGrid, т.е по порядку или же по имени.
0
561 / 230 / 88
Регистрация: 11.07.2015
Сообщений: 817
29.05.2021, 15:06
Я так понял должен отработать код на Button1. DBCheckBox, он не для этого, заменяем на обычный CheckBox и
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm2.Button1Click(Sender: TObject);
begin
  if CheckBox1.Checked then
  begin
    help1 := '%' + Form2.Edit1.Text + '%';
    help2 := QuotedStr(help1);
    with Form2.ADOQuery1 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('SELECT * FROM Клиенты WHERE ID_klient LIKE' + help2 + 'OR FIO LIKE' + help2 + 'OR Class_klient LIKE' + help2 + 'ORDER BY FIO');
      Open;
    end;
  end;
end;
0
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14
29.05.2021, 15:08  [ТС]
Не, именно для DBCheckBox'а.
0
561 / 230 / 88
Регистрация: 11.07.2015
Сообщений: 817
29.05.2021, 15:10
Цитата Сообщение от Matteos124 Посмотреть сообщение
Не, именно для DBCheckBox'а.
Я тебе ищё раз говорю он не для этого, он отображает из базы поля типа Boolean.
0
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14
29.05.2021, 16:26  [ТС]
В любом случае, спасибо вам огромное!
Программа работает как надо.
0
561 / 230 / 88
Регистрация: 11.07.2015
Сообщений: 817
29.05.2021, 16:34
Почитал я Ваш диплом. За описание действий - двойка. Компаненты DBEdit, DBCheckBox и т. д. не для организации поиска. Они отображают данные из связанных с ними полей базы. Их можно применять для редактирования данных.
0
0 / 0 / 0
Регистрация: 19.08.2020
Сообщений: 14
29.05.2021, 16:45  [ТС]
Это старый диплом. Сейчас я переделываю всё как надо.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
29.05.2021, 16:45
Помогаю со студенческими работами здесь

Реализация поиска по заштрихованной матрице(вар.2,6,10). Проблемы с кодом:с
#include <iostream> #include <conio.h> #include <clocale> #include <cstring> using namespace std; int main() { setlocale...

Проблема с кодом
Здравствуйте кто смотрит эту тему. Я только начал изучать Qt и пытаюсь создать свой калькулятор, но в процесе реализации у меня появилась...

Проблема с кодом
#include "stdafx.h" #include <iostream> #include "cmath" #include <string> #include <array> int main() { char * ps = new...

Проблема с кодом
Задание таково: нужно открыть файл syslog командой less, при этом используя команду exec. Вроде всё правильно, но не понимаю почему не...

Проблема с кодом
есть такой код &НаСервере Procedure Cooficent(Роботник, Итого, Ованс) Коофицент = 1; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
29
Ответ Создать тему
Новые блоги и статьи
Нейросеть на алгоритме "эстафета хвоста" как перспектива.
Hrethgir 06.05.2026
На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
Асинхронный приём данных из COM-порта
Argus19 01.05.2026
Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .
попытка написать игровой сервер на C++
pyirrlicht 29.04.2026
попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .
Контроль уникальности выбранного документа-основания при изменении реквизита
Maks 28.04.2026
Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание
Maks 24.04.2026
У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru