Вниз
Скачать: CL | DM;

Как объявить константу TDate   Найти похожие ветки 

← →
Андрусь ©   (2002-11-25 17:44) [0]

Привет всем! Вот такая непонятка!
Хочу объявить константу TDate.Но чего-то глюкаю.Подскажите как!
Баловался по-разному d=1.01.2000,d=1/01/2000- не выходит.


← →
Marcus   (2002-11-25 17:47) [1]

А это не подойдет

const
SDate = "31.12.2002";

NewYear := StrToDate(SDate);


← →
Андрусь ©   (2002-11-25 17:56) [2]

А напрямую нельзя,чтоб и не через флоат задавать(не видна истинная дата)и чтоб без ф-и юзать


← →
Marcus   (2002-11-25 18:15) [3]

А чем этот способ плох? Тем более, что StrToFloat можно один раз вызвать в секции initialization, а дату сохранить в var


← →
Edik Makhanko   (2002-11-25 18:15) [4]

А как Вы себе это представляете? Тип TDateTime - веществен., переводить строку в дату на этапе компиляции?


← →
McSimm ©   (2002-11-25 18:24) [5]

const
DDate = 37621.0; // Дата "31.12.2002";


Вот. И дата истинная видна, и функцию не надо вызывать. :-)


← →
Marcus   (2002-11-25 18:27) [6]

> McSimm ©

Снимаю шляпу! Все гениальное - ну сами знаете! :)))


← →
Андрусь ©   (2002-11-25 18:56) [7]

Хорошо,пойдём другим путём:как быстро пересчитать из TDate в float.


← →
Anatoly Podgoretsky ©   (2002-11-25 19:14) [8]

F7


← →
Юрий Зотов ©   (2002-11-25 20:53) [9]

> как быстро пересчитать из TDate в float

Никак не надо пересчитывать. Это одно и то же.


← →
Андрусь ©   (2002-11-25 20:57) [10]

я имел ввиду из привычного значения 1.01.1991 в..


← →
LongIsland ©   (2002-11-25 21:01) [11]

StrToDate


← →
Андрусь ©   (2002-11-25 21:04) [12]

Всё кончайте базар,а то балаган прямтаки какой-то


← →
Anatoly Podgoretsky ©   (2002-11-25 21:06) [13]

Вместе с тобой



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c
14-14725
Marser
2002-11-13 00:24
2002.12.05
What is the Delphi7?


3-14412
Назаров Евгений
2002-11-16 11:38
2002.12.05
Увеличить значение генератора


14-14746
dimonf
2002-11-14 09:00
2002.12.05
ОБРОЩЕНИЕ! Мастаки Delphi (или те кто так думает) города Кирова.


7-14843
hitek
2002-07-29 10:57
2002.12.05
Копирование файлов


3-14466
Sword-Fish
2002-11-19 00:27
2002.12.05
Работа с PickList




   Наверх