Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.01.2015, 22:40
yuoras yuoras вне форума
Прохожий
 
Регистрация: 11.03.2014
Сообщения: 48
Версия Delphi: Delphi 7(4.453)
Репутация: 10
По умолчанию Ошибка varchar 4088__004 в int

Добрый вечер.
Прошу помощи у знатоков.
Хочу выполнить поиск в столбце "CustomerCode" (посмотрел в БД ,varchar(32)).
Когда выполняю в Dephi, ошибка varchar 4088__004 в int.
В БД действительно есть записи с нижними подчёркиваниями

Вот код
Код:
tims.Close;
tims.SQL.Clear;
tims.SQL.Add('and cp_EISPoints.CustomerCode= ('+Edit3.Text+')');
tims.Open;
Буду рад за помощь

Последний раз редактировалось yuoras, 04.01.2015 в 14:46.
Ответить с цитированием
  #2  
Старый 04.01.2015, 00:22
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

а если чуток изменить строчку?
Код:
tims.SQL.Add('and cp_EISPoints.CustomerCode= '''+Edit3.Text+'''');
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
Этот пользователь сказал Спасибо Страдалецъ за это полезное сообщение:
yuoras (04.01.2015)
  #3  
Старый 04.01.2015, 08:46
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

-свойство SQL есть published и сохраняется в dfm
-используй параметры для запроса:
pas:
Код:
  Query1.ParamByName('capital').AsString:=Edit1.Text;
  Query1.Open;
dfm:
Код:
  object Query1: TQuery
    DatabaseName = 'DBDEMOS'
    SQL.Strings = (
      'select * from country where capital=:capital')
    Left = 240
    Top = 240
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'capital'
        ParamType = ptUnknown
      end>
  end
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:33.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter