VPF::Параметры унаследованные классом не совпадают

MozgZombi

Дата 3.8.2013, 23:20 (ссылка)

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

Загрузка ...

Шустрый

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

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

Я создал свой класс и добавил ему одну переменную. (У родителя было 6 переменных, а мне нужно было 7)

Код


type TMyRect = class(TRect)
public
Floor: integer;
end;

И я думал у моего класса будут те же переменные и плюс одна моя, но почему-то получилось так, что у него очень много разных посторонних процедур и функций, и даже нету изначальных переменных. Как мне создать идентичный класс, но с добавлением одной переменной?

Illusion Dolphin

Дата 3.8.2013, 23:37 (ссылка)

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

Загрузка ...

Эксперт

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

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

Цитата

type TMyRect = class(TRect)

Как бы TRect - это record а не класс, и с него нельзя унаследоваться. Унаследывайтесь от класса или в классе объявите все нужные поля из TRect.

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

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

northener

Дата 4.8.2013, 02:48 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1361
Регистрация: 2.9.2010

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

Код


type TMyRect = class(TRect)

И что. Такое может скомпилироваться?

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

Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!

Чучмек

Дата 4.8.2013, 10:59 (ссылка)

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

Загрузка ...

НЭТ БИЛЭТ

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

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

Цитата(northener @ 4.8.2013, 02:48

)

И что. Такое может скомпилироваться?

Нет. Я даже проверил. smile

Но список свойств, для экземпляра такого "класса", раскрывается.

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

умную мысль держи при себе, а дурной - поделись с другими

Poseidon

Дата 5.8.2013, 09:31 (ссылка)

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

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

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

Код


type TMyRect = record
  Rect: TRect;
  Floor: integer;
end;

Это сообщение отредактировал(а) Poseidon - 5.8.2013, 09:31

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

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

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