Текущий архив: 2005.03.27;
Скачать: CL | DM;
Вниз
Приведение типа Variant Найти похожие ветки
← →
Быстрый Шу (2005-03-17 15:13) [0]Доброе время суток!
Вопрос таков:
Есть у меня функция, возвращающая тип Variant:
function SomeFunction(SomeParams:String):Variant;
var
SomeObject : TSomeObjectType;
begin
Result := SomeObjectType;
end;
Так вот, он мне ругается:
Incompatible types: "Variant" and "TSomeObjectType"
Как мне указать, что в Result должен быть объект типа TSomeObjectType ?
← →
jack128 © (2005-03-17 15:19) [1]Result := Integer(SomeObject);
Обратно: SameObject := TSameObjectType(Integer(VariantValue));
← →
Быстрый Шу (2005-03-17 15:24) [2]Спасибо. Вроде работает.
Страницы: 1 вся ветка
Текущий архив: 2005.03.27;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.048 c
