Вниз
Скачать: CL | DM;

Record в class   Найти похожие ветки 

← →
bns   (2006-11-02 15:01) [0]

В моем классе присутствует record:
-------------------------------------
type TMyRecord = record
 str : string;
 int : integer;
end;

type TMyClass = class
 public
   myrecord : TMyRecord;
 end;
-------------------------------------

Нужно ли после созданиия класса mc:=TMyClass.Create создавать record New(mr)?
В тестовом примере, что я делал - не нужно, myrecord создается сама. Почему это происходит?

Освобождается ли память от TMyRecord после mc.Free или нужно делать Dispose( mr )?

Спасибо.


← →
Сергей М. ©   (2006-11-02 15:09) [1]


> Нужно ли после созданиия класса mc:=TMyClass.Create создавать
> record New(mr)?


Не нужно. Да и компилятор даст тебе по мозгам за такие дилетантские потуги.
(*)


> Освобождается ли память от TMyRecord после mc.Free или нужно
> делать Dispose( mr )?


см. (*)


← →
DevilDevil ©   (2006-11-02 15:16) [2]

> Нужно ли после созданиия класса mc:=TMyClass.Create создавать record New(mr)?

Нет

> Почему это происходит?

Начнём с того, что New и Dispose работают с указателями. Переменная типа TMyRecord - это не указатель, а полноценная переменная. А вот если бы ты объявил
public
  myrecord : ^TMyRecord;

, то переменная являлась бы указателем на неизвестно какую область в памяти. Поэтому и существует New: сначала динамически выделяется память, потом твоя переменная становится указателем на эту выделенную память. Но так лучше не делать...

> Освобождается ли память от TMyRecord после mc.Free

Да. Физически myrecord находится в памяти, которая была выделена под класс TMyClass. При освобождении TMyClass, освобождается myrecord.

> Спасибо.

Пожалуйста



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
2-1162238869
Evo
2006-10-30 23:07
2006.11.19
ошибка блин


1-1160032506
DVM
2006-10-05 11:15
2006.11.19
OnShow у TFrame как сделать?


2-1162315461
Ivolg
2006-10-31 20:24
2006.11.19
Пакеты


11-1136725971
Grom PE
2006-01-08 16:12
2006.11.19
Почернение контролов в Design-Time


2-1162377933
gaval
2006-11-01 13:45
2006.11.19
FastReport




   Наверх