Поиск:

Ответ в темуСоздание новой темы Создание опроса
> DBISAM-Даты, DBISAM 
V
    Опции темы
Lence
Дата 25.2.2007, 22:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3



нужно чтоб отобразились все записи которые попадают в промежуток дат
Пишу так 

Код

// Datefinding  - тип Дата
var
w: string;
begin
  w:=ExtractFilePath(paramstr(0));
  Query3.Close;
  Query3.SQL.Clear;
  Query3.SQL.Add('Select * From "'+w+'Data\Base" where (Datefinding) >= '+DateTimeEdit1.Text+' and (Datefinding) <= '+DateTimeEdit2.Text+' ' );
  Query3.Open;


кто знает как в DBISAM делается это ??? 

Это сообщение отредактировал(а) Lence - 26.2.2007, 01:05
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
Rodman
Дата 26.2.2007, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122



а так не пойдет???

Код

var
w: string;
begin
  w:=ExtractFilePath(paramstr(0));
  Query3.Close;
  Query3.SQL.Clear;
  Query3.SQL.Add('Select * From "'+w+'Data\Base" where DATEBETWEEN('+DateTimeEdit1.Text+','+DateTimeEdit1.Text+'); ' );
  Query3.Open;


PM MAIL WWW Skype GTalk YIM MSN   Вверх
Lence
Дата 26.2.2007, 01:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3



Цитата(Rodman @ 26.2.2007,  00:34)
а так не пойдет???

К сожалению  нет ...  smile  не работает ... ошибка выскакивает smile 
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
superVad
Дата 26.2.2007, 12:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 3
Всего: 15



а с параметрами нельзя?

Код

  w:=ExtractFilePath(paramstr(0));
  Query3.Close;
  Query3.SQL.Clear;
  Query3.SQL.Add('Select * From "'+w+'Data\Base" where (Datefinding) >=:par1  and (Datefinding) <=:par2' );
  Query3.ParamByName('par1').AsDateTime:=DateTimeEdit1.Value;
  Query3.ParamByName('par2').AsDateTime:=DateTimeEdit2.Value;
  Query3.Open;


PM MAIL   Вверх
Lence
Дата 26.2.2007, 13:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3



Цитата(superVad @ 26.2.2007,  12:15)
а с параметрами нельзя?


в DBISAM формат даты "гггг-мм-дд" 
уже функцию конвертации написал .... 
Но так вроде помогло

Код

  w:=ExtractFilePath(paramstr(0));
  Query3.Close;
  Query3.SQL.Clear;
  Query3.SQL.Add('Select * From "'+w+'Data\Base" where (Datefinding) >=:par1  and (Datefinding) <=:par2' );
  query3.Prepare;
  Query3.ParamByName('par1').AsDateTime:=DateTimeEdit1.Date;
  Query3.ParamByName('par2').AsDateTime:=DateTimeEdit2.Date;
  Query3.Open;


superVad, спасибо smile 


Rodman, спасибо за отклик
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "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.1372 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


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

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