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

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

Передать в UDF TimeStamp [D6, Firebird]

S@shka ©   (2008-01-21 16:05:00) 

Не могу понять, ... надо передать в UDF TimeStamp (время),
какой тип должен быть объявлен в UDF ?

pocedure uIn ( ????

---

Desdechado   (2008-01-22 12:24:00) [1]

procedure uIn ( x: P_ISC_TIMESTAMP )

При необходимости процедуры упаковки и распаковки можно найти в инете, например, в FreeUDFLib

---

Desdechado   (2008-01-21 22:51:00) [2]

 {--- тип TIMESTAMP в InterBase ---}
 T_ISC_DATE = LongInt;
 T_ISC_TIME = DWord;
 T_ISC_TIMESTAMP = record
   timestamp_date: T_ISC_DATE;
   timestamp_time: T_ISC_TIME;
 end;
 P_ISC_TIMESTAMP = ^T_ISC_TIMESTAMP;
 {--- распакованный для удобства TIMESTAMP ---}
 T_UNPACKED_TIMESTAMP = record
   fraction: DWord;         // доля секунды
   second:   Word;          // 0..59
   minute:   Word;          // 0..59
   hour:     Word;          // 0..23
   day:      Word;          // 1..31
   month:    Word;          // 0..11
   year:     SmallInt;      // calendar year minus 1900
 end;
 P_UNPACKED_TIMESTAMP = ^T_UNPACKED_TIMESTAMP;


---

Наверх