null-значение параметра процедуры/функции с типом Variant

← →
AlexWlad © (2006-09-13 19:40) [0]

В d5 спокойно прокатывало. D7 - ругается. Как преодолеть?

← →
umbra © (2006-09-13 19:44) [1]

самое очевидное - не передавать параметров с этим значением.

← →
AlexWlad © (2006-09-13 19:53) [2]

Код достался по наследству. Переделывать - долго и нудно (и лениво).

← →
umbra © (2006-09-13 20:03) [3]

а исключение какое получается?

← →
AlexWlad © (2006-09-13 20:08) [4]

В принципе не компилит. Ругается на неизвестный тип.

← →
umbra © (2006-09-13 20:10) [5]

кстати, у меня вот такое вот

function TForm1.dummy(mynull: Variant): integer; begin Result := 0; end; procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(IntToStr(dummy(Null))); end;

спокойно показывает табличку, никаких исключений.

и предупреждений тоже :)

Да, сейчас дома попробовал такой-же пустой код - работает. На работе - нет. Правда на работе поставил RxLib, мож там где перекрывает. "Будем искать."

uses Variants;

null-значение параметра процедуры/функции с типом Variant Найти похожие ветки