TObject(Data) or (Data as TObject)

[=master=]

(Data as TSomeClass)
получим красивый exception

О еще один...
Где тут эксепшн увидели мил человек?

так что лучше везде использовать as.

Не надо глупости предлагать.

[RuVarez]

Люди поймите насчет ошибок я и так знаю! Обьясните в чем разница между самими конструкциями

[veniside]

> Где тут эксепшн увидели мил человек?

да вот же он:

{$APPTYPE CONSOLE }

uses
  SysUtils;

type
  myTestClass = class
    procedure foo();
  end;

  myOtherClass = class
    procedure foo();
  end;


{ myTestClass }

// --  --
procedure myTestClass.foo();
begin
end;


{ myOtherClass }

// --  --
procedure myOtherClass.foo();
begin
end;


// -- main --

var
  mc: TObject;
begin
  mc := myTestClass.create();
  try
    //
    try
      (mc as myOtherClass).foo();
    except
      writeln('Я кросивый exception!');
    end;
    //
    // а вот тут мы попадаем в любую точку программы, результат непредсказуем:
    myOtherClass(mc).foo();
    //
  finally
    mc.free();
  end;
end.

> Не надо глупости предлагать.

т.е. надо всегда надеятся на "авось, пронесёт"? это индусский подход

> Обьясните в чем разница между самими конструкциями

as выполняет проверку на то, что инстанс реально наследован от типизируещего класса, а конструкция вида TSomeClass(SomeInstance) ничего не проверяет, а тупо берёт истанс и использует его как инстанс класса TSomeClass.

[=master=]

да вот же он

Эьто совсем другая история.

это индусский подход

это у вас он индуский
например есть такое:
if ( o is TSomeObject)
тут по вашему надо все равно ( o as TSomeObject) ... индия!!
а я про авось даже и не намекал

[veniside]

if ( o is TSomeObject)

"Эьто совсем другая история."

[=master=]

(mc as myOtherClass).foo();

тут у вас валится после приведения, а тут

myOtherClass(mc).foo();

во время приведения, "почувствуйте разницу".

[veniside]

самое смешное, что myOtherClass(mc).foo(); никуда не валится, а исправно вызывает метод foo(); класса myOtherClass. И если в методе явно или неявно не используются self, то вобще никакой проблемы не будет, и код отработает верно (если foo() не виртуальный, конечно).

На самом деле я сам тоже пишу так:

  if (someobj is TSomeClass) then
    TSomeClass(someobj).somemethod();

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

[RuVarez]

veniside спасибо за обьяснение