Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.14;
Скачать: CL | DM;

Вниз

Ссылка?   Найти похожие ветки 

 
qadeveloper2   (2007-09-20 22:51) [0]

Нет сейчас delphi, что бы проверить.

type
 TMyArrays = record
    str: array of string;
    int: array of Integer;
 end;

 TMyType = array of TMyArrays;

var
 MyType1: TMyArrays;
 MyType2: TMyArrays;
begin
 SetLength(MyType1, 10);
... тут любые операции по заполнению MyType1.
...
 MyType2 := MyType1;


Что происходит при последнем присваивании: копируется Type1 в Type2, или у Type2 будет просто ссылаться на Type1?

Если это будет ссылка, то как избежать появления ссылки, сделать MyType2 независимым источником?


 
homm ©   (2007-09-20 22:56) [1]

вызывается @DunArrayAsg, а в нем, судя по количеству выплненых инструкций, копирование ссылки.


 
homm ©   (2007-09-20 22:57) [2]

В общем тебе классы нужны, с полной обработкой создания и уничтожения, и перекрытием Assign.

> var
> MyType1: TMyArrays;
> MyType2: TMyArrays;

Кстати, здесь ты наверное имел ввиду
var
MyType1: TMyType;
MyType2: TMyTypes;


 
Anatoly Podgoretsky ©   (2007-09-20 23:03) [3]


> Что происходит при последнем присваивании: копируется Type1
> в Type2, или у Type2 будет просто ссылаться на Type1?

Копируется ссылка и увеличивается счетчик.
Для создания копии надо вручную копировать данные из структуры.
Подумай над [1]


 
qadeveloper2   (2007-09-21 08:34) [4]

Спасибо. Т.е. все же получается, что единственный способ сделать отдельную копию - это вручную?

Может и бред, а если запись объявить, как packed а потом сделать move для массива?


 
qadeveloper2   (2007-09-21 08:52) [5]

По поводу класса, не понял: что лучше сделать класс под хранение этой информации?



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

Текущий архив: 2007.10.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
2-1190314315
qadeveloper2
2007-09-20 22:51
2007.10.14
Ссылка?


15-1189477252
Slider007
2007-09-11 06:20
2007.10.14
С днем рождения ! 11 сентября 2007 вторник


2-1190379982
Kolan
2007-09-21 17:06
2007.10.14
Почему Free не делает nil объекту?


15-1188316241
Vlad Oshin
2007-08-28 19:50
2007.10.14
критерии научности


4-1172569970
DevilDevil
2007-02-27 12:52
2007.10.14
Поток. Как "убить себя" ?