powered by simpleCommunicator - 2.0.34     © 2025 Programmizd 02
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Нулевая дата
41 сообщений из 41, показаны все 2 страниц
Нулевая дата
    #40135086
svnvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть функция:
Код: pascal
1.
2.
3.
4.
5.
6.
function SaveStatusTimeline(var AStatusTime: TDateTime): integer;
begin
if AStatusTime <> 0 then    // 30.12.1899
      q.SetDate('status_time', AStatusTime)  // идет сюда - почему??
    else
      q.SetDate('status_time', Now);



В коде программы вызывается эта функция, и в нее передается переменная, которая не инициализирована, соответственно, там нулевая дата (30.12.1899), это же подтверждается при трассировке.
Однако внутри функции выполнение идет по первой ветке. Хотя при наводке мыши на AStatusTime отображается 30.12.1899.
Почему так??
...
Рейтинг: 0 / 0
Нулевая дата
    #40135090
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
потому что сравнение вещественных чисел
...
Рейтинг: 0 / 0
Нулевая дата
    #40135095
svnvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DimaBr
потому что сравнение вещественных чисел

Т.е. один раз оно может совпасть, а в другой раз не совпасть, и непредсказуемо, когда это случится?
...
Рейтинг: 0 / 0
Нулевая дата
    #40135097
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
DimaBr
потому что сравнение вещественных чисел

Т.е. один раз оно может совпасть, а в другой раз не совпасть, и непредсказуемо, когда это случится?
Когда у тебя в стеке ненулевой мусор будет, где переменная объявлена - тогда и не совпадёт. Тут дело не в сравнении вещественных. Ноль хорошо сравнивается обычно.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135110
svnvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuRock
svnvlad
пропущено...

Т.е. один раз оно может совпасть, а в другой раз не совпасть, и непредсказуемо, когда это случится?
Когда у тебя в стеке ненулевой мусор будет, где переменная объявлена - тогда и не совпадёт. Тут дело не в сравнении вещественных. Ноль хорошо сравнивается обычно.

Там не мусор, трассировка показывает 30.12.1899
...
Рейтинг: 0 / 0
Нулевая дата
    #40135115
GunSmoker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
Там не мусор, трассировка показывает 30.12.1899

Это не означает, что там 0. Сделай побайтовый дамп, удивишься.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135116
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
Там не мусор, трассировка показывает 30.12.1899

...
Рейтинг: 0 / 0
Нулевая дата
    #40135117
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну у меня не совсем НОЛЬ
...
Рейтинг: 0 / 0
Нулевая дата
    #40135124
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
YuRock
пропущено...
Когда у тебя в стеке ненулевой мусор будет, где переменная объявлена - тогда и не совпадёт. Тут дело не в сравнении вещественных. Ноль хорошо сравнивается обычно.

Там не мусор, трассировка показывает 30.12.1899
Как же не мусор, коль ты сам говорил, что переменная не инициализируется.
Это значит, что иногда ноль, а иногда - и не ноль, или не совсем ноль.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135157
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
переменная, которая не инициализирована, соответственно, там нулевая дата
Нет. В переменной, которая не инициализирована лежит любой мусор
DimaBr
потому что сравнение вещественных чисел
Кстати, у меня такой код отлично работает. Но я никогда не передаю в функцию вычисленное значение. Т.е. если даты у меня нет, то я предварительно пишу
Код: pascal
1.
D := DATE_NULL;
...
Рейтинг: 0 / 0
Нулевая дата
    #40135168
s62
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_Vasilisk_
Нет. В переменной, которая не инициализирована лежит любой мусор

Если переменная глобальная - она автоматически инициализируется нулем. То же самое, если переменная - поле класса, в его конструкторе поля инициализируются нулями. Если локальная, то да, неизвестно, что там.
Так что тут смотря какая переменная, может быть, что как раз у ТС в сравнении чисел с плавающей запятой дело.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135449
svnvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_Vasilisk_
svnvlad
переменная, которая не инициализирована, соответственно, там нулевая дата
Нет. В переменной, которая не инициализирована лежит любой мусор
DimaBr
потому что сравнение вещественных чисел
Кстати, у меня такой код отлично работает. Но я никогда не передаю в функцию вычисленное значение. Т.е. если даты у меня нет, то я предварительно пишу
Код: pascal
1.
D := DATE_NULL;


А что за значение DATE_NULL?
...
Рейтинг: 0 / 0
Нулевая дата
    #40135543
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
А что за значение DATE_NULL?
Не помню. Или 0, или -1. Но у меня сделано так
Код: pascal
1.
2.
3.
4.
5.
Fld := DataSet.FieldByName(...);
if not Fld.IsNull then
  Result := Fld.AsDate
else
  Result := DATE_NULL;

Т.е. никаких значений по умолчанию. Все присваивается явно.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135625
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_Vasilisk_
Не помню. Или 0, или -1.

Оба значения странные, мягко говоря. Вообще, нулевая дата это (-DateDelta);
...
Рейтинг: 0 / 0
Нулевая дата
    #40135632
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey
_Vasilisk_
Не помню. Или 0, или -1.

Оба значения странные, мягко говоря. Вообще, нулевая дата это (-DateDelta);
Ну так требуется же не нулевая дата, а незаполненная (неизвестная) дата.
Тут ноль подходит вполне.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135638
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuRock
Ну так требуется же не нулевая дата, а незаполненная (неизвестная) дата.

Отлично. Почему бы для этой цели не использовать корректное значение нулевой даты?
...
Рейтинг: 0 / 0
Нулевая дата
    #40135653
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey
YuRock
Ну так требуется же не нулевая дата, а незаполненная (неизвестная) дата.

Отлично. Почему бы для этой цели не использовать корректное значение нулевой даты?
Может, потому, что нулевая дата - это корректное значение даты?
...
Рейтинг: 0 / 0
Нулевая дата
    #40135655
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuRock
Может, потому, что нулевая дата - это корректное значение даты?

Нет.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135665
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey
YuRock
Может, потому, что нулевая дата - это корректное значение даты?

Нет.
Если знаете ответ, зачем спрашивать? Лучше поделитесь.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135666
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuRock
Если знаете ответ, зачем спрашивать? Лучше поделитесь.

Так я уже поделился .
...
Рейтинг: 0 / 0
Нулевая дата
    #40135667
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Нулевая дата
    #40135684
Мимопроходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DimaBr, это творчество ДевиантАрта, а не Борманда.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135747
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мимопроходящий
DimaBr, это творчество ДевиантАрта, а не Борманда.

Да я вроде в курсе, специально сделал скрин, чтобы было видно название модуля.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135912
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
s62Если переменная глобальная - она автоматически инициализируется нулем.
совершенно ни к чему быть столь самоуверенным.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135931
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kdv
совершенно ни к чему быть столь самоуверенным.

Да, нужно просто читать доку:
https://docwiki.embarcadero.com/RADStudio/Rio/en/Variables_(Delphi) If you do not explicitly initialize a global variable, the compiler initializes it to 0.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135942
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey,

лучше перебдеть. Тем более что не всем глобальным переменным нужен 0.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135949
Гаджимурадов Рустам
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kdv> Тем более что не всем глобальным переменным нужен 0.

C этого места поподробнее. Каким нужен не 0?
И если не 0, то что 42 или -1 или что?
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
Нулевая дата
    #40135952
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kdv
лучше перебдеть.

Предлагаю и значение присваивать дважды, чтобы уж наверняка.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135961
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гаджимурадов Рустам
kdv> Тем более что не всем глобальным переменным нужен 0.

C этого места поподробнее. Каким нужен не 0?
И если не 0, то что 42 или -1 или что?

Полагаю, что имелось ввиду, что некоторым глобальным переменным устанавливаются иные значения инициализации.
Например
Код: pascal
1.
2.
3.
4.
g_n1: Integer = 42;
g_n2: Integer = -1;
g_strDefaultUser: String = 'guest';
g_strDefaultLang: String = 'ru';


Ну и чтобы в общем стиле всё выглядело, и для наглядности, и нули для тех, кому ноль нужен, тоже можно ставить, и будет красиво.
Тем более, я уверен, что это оптимизируется, и при установке нуля просто ничего не происходит (хотя не проверял, но это выглядит простым и логичным).
...
Рейтинг: 0 / 0
Нулевая дата
    #40135972
bk0010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey
kdv
лучше перебдеть.

Предлагаю и значение присваивать дважды, чтобы уж наверняка.
В Lotus Notes так приходилось делать иногда.
...
Рейтинг: 0 / 0
Нулевая дата
    #40135988
Гаджимурадов Рустам
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
bk0010> В Lotus Notes так приходилось делать иногда.

Серьёзно? А почему, баг / фича?
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
Нулевая дата
    #40135989
svnvlad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DimaBr

Так что в итоге, инициализировать D := 0 или D := NullDate, что на самом деле -700000?
...
Рейтинг: 0 / 0
Нулевая дата
    #40135991
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гаджимурадов Рустам
Серьёзно? А почему, баг / фича?

На счёт лотуса не скажу, но вот при работе с аппаратурой напрямую иногда приходилось запись в ячейку зацикливать :)
...
Рейтинг: 0 / 0
Нулевая дата
    #40135995
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
svnvlad
DimaBr

Так что в итоге, инициализировать D := 0 или D := NullDate, что на самом деле -700000?

НОЛЬ, не означает Null. Например Date()-Date()=0 а не отсутствие даты.
Разработчики Девок выбрали для понятия NullDate значение -700000, лично вы может выбрать своё значение, причём ЛЮБОЕ.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136006
Фотография softwarer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kdv
лучше перебдеть.

Лучше писать хорошо. А хорошо - это коротко, чётко и без лишней воды.

YuRock
Тем более, я уверен, что это оптимизируется, и при установке нуля просто ничего не происходит (хотя не проверял, но это выглядит простым и логичным).

Там нечего оптимизировать. Можно ставить ноль, можно ставить не ноль, можно не ставить ноль - во всех случаях одинаково ничего не происходит.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136012
GunSmoker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YuRock
Тем более, я уверен, что это оптимизируется, и при установке нуля просто ничего не происходит (хотя не проверял, но это выглядит простым и логичным).

Логично, но не так.

В других компиляторах - возможно, но Delphi компилятору всё равно:
1. Если переменная не инициализируется в коде, то компилятор помещает её в секцию ZERO_INIT - она не занимает места в .exe файле, а при загрузке в память выделяется инициализированный нулями регион памяти.
2. Если переменная инициализируется в коде любым значением (ноль/не ноль - не важно), то компилятор помещает её в read-write секцию с заданными значениями, которая хранится в .exe файле "как есть", а при загрузке в память копируется.

Соответственно, разница между G1: Integer = 0 и G1: Integer = 1 только в том, что будет сохранено в секцию .exe файла, но сама структура останется одинаковой. В то время как разница между G1: Integer и G1: Integer = 0 существенна - эти переменные хранятся в разных секциях.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136018
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GunSmoker
YuRock
Тем более, я уверен, что это оптимизируется, и при установке нуля просто ничего не происходит (хотя не проверял, но это выглядит простым и логичным).

Логично, но не так.

В других компиляторах - возможно, но Delphi компилятору всё равно:
1. Если переменная не инициализируется в коде, то компилятор помещает её в секцию ZERO_INIT - она не занимает места в .exe файле, а при загрузке в память выделяется инициализированный нулями регион памяти.
2. Если переменная инициализируется в коде любым значением (ноль/не ноль - не важно), то компилятор помещает её в read-write секцию с заданными значениями, которая хранится в .exe файле "как есть", а при загрузке в память копируется.

Соответственно, разница между G1: Integer = 0 и G1: Integer = 1 только в том, что будет сохранено в секцию .exe файла, но сама структура останется одинаковой. В то время как разница между G1: Integer и G1: Integer = 0 существенна - эти переменные хранятся в разных секциях.
Спасибо за разъяснения.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136125
bk0010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гаджимурадов Рустам
bk0010> В Lotus Notes так приходилось делать иногда.

Серьёзно? А почему, баг / фича?
Баг. Народ сильно ругался, когда дошло.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136385
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Kazantsev Alexey
_Vasilisk_
Не помню. Или 0, или -1.

Оба значения странные, мягко говоря. Вообще, нулевая дата это (-DateDelta);

Дата, как непрерывная величина в обе стороны от нуля, любое значение теоретически имеет допустимым. Другое дело, что, к примеру, даты до предполагаемого образования Земли не имеют практического смысла и мб использованы как магическое значение "NULL". Или же это мб нижняя граница Double, для простоты только целая часть.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136397
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Fr0sT-Brutal
любое значение теоретически имеет допустимым

Нам не нужно теоретически, у нас есть вполне конкретные рамки обозначенные для TDateTime.
...
Рейтинг: 0 / 0
Нулевая дата
    #40136408
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Kazantsev Alexey
Fr0sT-Brutal
любое значение теоретически имеет допустимым

Нам не нужно теоретически, у нас есть вполне конкретные рамки обозначенные для TDateTime.

А, они лимит искусственно ввели
The maximal correct date supported by TDateTime values is limited to 12/31/9999 23:59:59:999
...
Рейтинг: 0 / 0
41 сообщений из 41, показаны все 2 страниц
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Нулевая дата
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]