Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование даты в число [D5, dBase, FoxPro]


Ameno ©   (2003-03-04 08:15:00) 

Доброе утро, мастера.
У меня такой вопрос, я подключаюсь из Делфи к DBF-нику через ADO используя Microfost DBase драйвер. Все прекрасно, пока не доходит до запроса на выборку по дате. Это зараза никак не хочет принимать дату в виде, например, "03.12.2003" или подобном, пробовал по-разному и перебрал все варианты - хрен!, ругается. Но принимает числовой вариант даты, например 4500. Дык вот, ссссно, вопрос, как мне преобразовать, например, дату "04.12.2002" к числовому ее значению???


altarasjuk   (2003-03-04 13:32:00) [1]

Есть методы:
function DateTimeToUnix(const AValue: TDateTime): Int64;
В секундах от January 1, 1970.
function UnixToDateTime(const AValue: Int64): TDateTime;
Обратная первой.
Юнит DateUtils.


Соловьев   (2003-03-04 09:14:00) [2]

Посмотри свои системные настройки, возможно у тебя первым идет месяц а потом число...
попробуй использовать DateSeparator и ShortDate


sniknik   (2003-03-04 08:46:00) [3]

преобразовать так (хотя врядли он "хочет принимать", скорее ты не так пишеш)
> все варианты //кроме правильного

CDate Function Example
This example uses the CDate function to convert a string to a Date. In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Use date literals and time literals, such as #2 /12 /1969# and #4:45:23 PM#, instead.

Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "February 12, 1969" " Define date.
MyShortDate = CDate(MyDate) " Convert to Date data type.

MyTime = "4:35:47 PM" " Define time.
MyShortTime = CDate(MyTime) " Convert to Date data type.


Наверх

Титульная страница Поиск, карта сайта Написать письмо