VPF::В чем разница - Форум программистов

Ravend

Дата 26.8.2005, 14:08 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 91
Регистрация: 19.7.2005

Репутация: нет
Всего: 1

Привет, All!

в чем разница между:

TSomeClass(TSomeObject)

и

TSomeObject as TSomeClass

Спасибо.

_hunter

Дата 26.8.2005, 14:21 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98

в первом случае вызывается конструктор и создается новый объект
во втором случае приводится уже существующий объект

--------------------

Tempora mutantur, et nos mutamur in illis...

markowww

Дата 26.8.2005, 14:28 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 27.2.2003
Где: В Вологде-где

Репутация: нет
Всего: нет

Получается, что когда мы пишем, к примеру,

Код


TSomeClass(TSomeObject).Name:= 'Name';

мы редактируем свойство Name не у TSomeObject, а у некоего нового объекта?

Illusion Dolphin

Дата 26.8.2005, 15:17 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1198
Регистрация: 3.5.2003

Репутация: 36
Всего: 63

Цитата

в первом случае вызывается конструктор и создается новый объект

Ну неправда! Создаём новый проект и пишем:

Код


procedure TForm1.FormCreate(Sender: TObject);
var
 i : integer;
begin
 i:=integer(self);
 inc(i);
 TForm(i-1).caption:='Ух ты!';
 (i as TForm).caption:='Ух ты!';//не пройдёт
 (Sender as TForm).Top:=0;//Пройдёт
end;

Дело в том, что TSome(TSomeElse) - это приведение чего угодно к чему угодно, даже не будет выполнена проверка на принадлежность к какому-либу типу, можно даже так писать:

Код


TForm1.FormCreate...;
var
  form : TForm;
begin
 i:=integer(self);
 inc(i);
 form:=TForm(i); //тут чёрти знает что
 Dec(Integer(form)); //отнимаем 1 и получаем нашу форму =)
 form.caption:='Ух ты!';

А в TSomeObject as TSomeClass проверяется пинадлежность к классам и применимо только к классам. IMHO, можете поправлять.

Это сообщение отредактировал(а) Illusion Dolphin - 26.8.2005, 15:26

--------------------

В мире всего две бесконечности: вселенная и человеческая глупость... На счёт вселенной я не уверен.
Шифрование и организация фотографий - Photo Database 4.5

_hunter

Дата 26.8.2005, 16:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98

мда... привык к сям smile

а все этот синтаксис, делфийский, дурацкий...

--------------------

Tempora mutantur, et nos mutamur in illis...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »