Date = Null - КАК ???

[delphicoding]

Я охреневаю над этой проблемой, что Дата не может быть пуста в Delphi... это ужас какой-то, что делать хз...
Вот есть таблица в БД, есть там данные, вот с данными происходит некоторое событие - устанавливаем в соответствующее поле результат событий, а в соседнее поле - дату событий. Потом вдруг понадобилось очистить предыдущее действие - поле результата событий очищается без проблем, но как очистить дату?! ведь передать Date=null через Delphi никак не получается!
PS Чтобы не было воплей "дата не может быть null" - откройте БД, посмотрите сами - там чётко поле пустое или в спецрадкторах типа IBExpert написано NULL!

Так как же очистить дату в БД (передать из Delphi в Firebird пустое значение даты, которое сможет затереть предыдущее значение даты) ?!

[ZuBy]

в делфи не используется NULL, используется nil

[chertovich]

в Базах данных используют специальный маркер, null значение для того, чтобы если б мы не ввели информацию то поле этой записи имело пустое значение.
Представте себе такую ситуацию, когда мы заполняем данные о чем нить и у нас нет определенной ситуации, то как нам помечать пустоту значения, например для даты?
Для делфи, поскольку дата это Integer, то пустое значение нет возможности предоставить. Если нужно, то можно создать свой тип данных, у которого в качестве маркера пустоты будет использовано булевое поле.

[delphicoding]

ZuBy
Врядли получится использовать nil:

vat DataSobitya:Tdate;
   DataSobitya:=nil;
[DCC Error] uBForm.pas(29): E2010 Incompatible types: 'TDate' and 'Pointer'

chertovich

Представте себе такую ситуацию, когда мы заполняем данные о чем нить и у нас нет определенной ситуации, то как нам помечать пустоту значения, например для даты?

Подобные вопросы просто поражают! Ответ прост - никак! Есть тело файла БД, там указываются спец символы, есть спец символы обрамляющие значения типа {значение} - ну так просто не писать там НИХРЕНА! Это невероятно сложно?!

Короче ппц какой-то - как очищать поле даты в БД ?!

[chertovich]

DataSet.FieldByName('FieldName').Clear

Если после этого, функция DataSet.FieldByName('FieldName').Is Null возвращает False, то удалите свои компоненты БД. Я вам сразу сказал в чем ошибка, еще в др. теме.

[delphicoding]

Да нет же, нельзя это сделать!

Есть ФормаА с таблицей с данными. Нажали кнопочку ОК - вызывается специальная процедура обработки из ФормыБ в которую передаётся значение "1,2,3,4,ДАТАСЕГОДНЯ", процедура в программе вызывает хранимую процедуру в БД и передаёт туда значения, значения записываются в БД. Всё ок.
Нажали кнопку ОТМЕНА в той же ФормеА - вызывается ТА ЖЕ процедура обработки из ФормыБ в которую надо передать значение "1,2,3,4,null", процедура в программе вызывает процедуру в БД и передаёт туда значения, чтобы в БД поле стало NULL!
Ошибка возникает при попытке вызвать из ФормыА в ФормеБ процедуру с атрибутами "1,2,3,4,null"...

[Serge_Bliznykov]

Сообщение от ZuBy

в делфи не используется NULL, используется nil

Путаете. используется.
смотрите, например,
модуль System:

var
  Unassigned: Variant;    { Unassigned standard constant }
  Null: Variant;          { Null standard constant }

delphicoding, к словам chertovich добавлю.
А ещё можно так присвоить:

  Adoquery1.FieldByName('ВашеПоле').Value := null;

Дык, в Delphi, если нужно передавать NULL в качестве параметра,
используйте тип Variant

[chertovich]

Я уже написал, что передавать значение поля через тип TDate нельзя. Необходимо создать свой тип данных с маркером либо попробывать передавать тип TField.
А вообще, зачем передавать данные через процедуру, если можно добавить форму, содержащую компонент БД в uses формы и использовать данные сразу из записи?

[delphicoding]

А вообще, зачем передавать данные через процедуру, если можно добавить форму, содержащую компонент БД в uses формы и использовать данные сразу из записи?

Затем, что я сильно упростил пример, в реальности на каждом шаге происходит сложная обработка, поэтому прямой post в БД невозможен.

Дык, в Delphi, если нужно передавать NULL в качестве параметра, используйте тип Variant

Ура, заработало! Только я никогда не смогу понять логику разработчиков Delphi, которые решили упразднить для переменных классов Date,Integer,итд значение <ПУСТО> - имхо это свинство и ихняя халява - им так проще - либо чётко проверять integer на число, либо юзай variant мы его вообще проверять не будем никак... глупое решение с их стороны конечно, данная тема тому пример.

[Пепел Феникса]

Только я никогда не смогу понять логику разработчиков Delphi, которые решил упразднить для переменных классов Date,Integer,итд значение <ПУСТО> - имхо это свинство и ихняя халява - им так проще - либо чётко проверять integer на число, либо юзай variant мы его вообще проверять не будем никак... глупость конечно, данная тема тому пример

напишите свой универсальный тип, получите тоже самое.