Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.02.2009, 19:31   #41
TaTT DoGG
Форумчанин
 
Аватар для TaTT DoGG
 
Регистрация: 25.04.2008
Сообщений: 476
По умолчанию

посмотри плз исходник...
дело в том, что другие запросы, например UPDATE работают... после запроса refresh использую и записи обновляются... а вот с Select такая вот фигня
Life if about choices
Make the right choice
TaTT DoGG вне форума Ответить с цитированием
Старый 20.02.2009, 19:34   #42
maladoy
delphi-ст!
Форумчанин
 
Аватар для maladoy
 
Регистрация: 02.01.2009
Сообщений: 825
По умолчанию

Цитата:
Сообщение от TaTT DoGG Посмотреть сообщение
посмотри плз исходник...
дело в том, что другие запросы, например UPDATE работают... после запроса refresh использую и записи обновляются... а вот с Select такая вот фигня
вопрос где его взять? a update и insert работают потому что сама таблица изменяется а select это просто выборка!!!
вступлю в команду разработчиков ПО на Delphi
maladoy вне форума Ответить с цитированием
Старый 20.02.2009, 19:46   #43
TaTT DoGG
Форумчанин
 
Аватар для TaTT DoGG
 
Регистрация: 25.04.2008
Сообщений: 476
По умолчанию

исходник тремя сообщениями выше ))
Life if about choices
Make the right choice
TaTT DoGG вне форума Ответить с цитированием
Старый 20.02.2009, 19:58   #44
maladoy
delphi-ст!
Форумчанин
 
Аватар для maladoy
 
Регистрация: 02.01.2009
Сообщений: 825
По умолчанию

чего то невижу номер поста скажи !!!
вступлю в команду разработчиков ПО на Delphi
maladoy вне форума Ответить с цитированием
Старый 20.02.2009, 20:00   #45
TaTT DoGG
Форумчанин
 
Аватар для TaTT DoGG
 
Регистрация: 25.04.2008
Сообщений: 476
По умолчанию

http://rapidshare.com/files/200421285/sql.rar.html
Life if about choices
Make the right choice
TaTT DoGG вне форума Ответить с цитированием
Старый 20.02.2009, 20:20   #46
maladoy
delphi-ст!
Форумчанин
 
Аватар для maladoy
 
Регистрация: 02.01.2009
Сообщений: 825
По умолчанию

Код:
 procedure TForm1.Button1Click(Sender: TObject);
begin
  with ADOQuery1 do begin
    Close;
    with SQL do begin
      Clear();
      Add('SELECT Дата, Наименование, Цена, [Кол-во/Вес], Стоимость');
      Add('FROM Продукты');
      Add('WHERE (Дата>=#1/12/2009# AND Дата<#2/12/2009#)');
    end;
	active:=true; // а query кто активировать будет!!!
    ExecSql;
  end;
datasource1.DataSet:=ADOQuery1; // и у компонента query свойство datasource сделай пустым
end;
я тебе в 40 посте про это писал!
вступлю в команду разработчиков ПО на Delphi

Последний раз редактировалось maladoy; 20.02.2009 в 20:25.
maladoy вне форума Ответить с цитированием
Старый 20.02.2009, 20:35   #47
TaTT DoGG
Форумчанин
 
Аватар для TaTT DoGG
 
Регистрация: 25.04.2008
Сообщений: 476
По умолчанию

Цитата:
datasource1.DataSet:=ADOQuery1; // и у компонента query свойство datasource сделай пустым
вот этого мне и не хватало
спасибо
Life if about choices
Make the right choice
TaTT DoGG вне форума Ответить с цитированием
Старый 20.02.2009, 21:37   #48
RaMoNeZz
Пользователь
 
Регистрация: 13.09.2008
Сообщений: 16
По умолчанию

Цитата:
Сообщение от TaTT DoGG Посмотреть сообщение
столбец типа дата!
мой запрос выполняется в access'e а тут он выполняется но не обновляется таблица
у меня тоже в аксессе! заходишь в конструктор столбец дата формать fkData а не Текст или что то другое.. и соответсвенно если там они отображаються как 1/12/2009 то и поиск такой же если там 1.12.2009 то и в поиске 1.12.2009...
попробуй так
Add('WHERE Дата between DATEVALUE("1/12/2009")And DATEVALUE("2/12/2009")');


смотрю я опоздал но лишним не будет

Последний раз редактировалось RaMoNeZz; 20.02.2009 в 21:42. Причина: опоздал:)
RaMoNeZz вне форума Ответить с цитированием
Старый 20.02.2009, 22:01   #49
TaTT DoGG
Форумчанин
 
Аватар для TaTT DoGG
 
Регистрация: 25.04.2008
Сообщений: 476
По умолчанию

да, я использовал between )
спасибо и тебе
Life if about choices
Make the right choice
TaTT DoGG вне форума Ответить с цитированием
Старый 28.03.2009, 19:04   #50
Vova20years
Пользователь
 
Регистрация: 27.03.2009
Сообщений: 12
По умолчанию

ребята у меня та же проблема что и в начале этого поста, ваши коды не работают!! т.е. мне по числовому коду надо чтобы отображались все записи, например:
запись1 1288
запись2 1233
запись3 132

я ввожу 1--выходят все 3 записи, добавляю 2 (12)--уже 2 записи остаются!!

взял самый простенький пример, мне регистр как вы понимаете не важен! :-)
Код:
procedure TForm1.ADOTable1FilterRecord(DataSet: TDataSet;
  var Accept: Boolean);
begin
   accept:=(pos(Edit1.Text,DataSet.Fields[0].AsString)<>0) or (Edit1.Text='');

end;

procedure TForm1.Edit1Change(Sender: TObject);
begin
ADOTable1.Filtered:=false;
ADOTable1.Filtered:=true;
end;
Vova20years вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Фильтрация Felonalex БД в Delphi 4 24.10.2008 20:09
Фильтрация записей с помощью Grid'а. Repz БД в Delphi 1 02.05.2008 04:55
Счетчик записей в таблице John_chek Общие вопросы Delphi 2 01.03.2007 11:36
Параметр TTAble определяющий кол-во одинаковых записей в таблице Таня84 БД в Delphi 4 09.02.2007 14:51