Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.015 c
15-1189604306
wvalera
2007-09-12 17:38
2007.10.14
FastMM


2-1189617829
Kley
2007-09-12 21:23
2007.10.14
Чистка БД от задвоек


15-1189433083
УАув
2007-09-10 18:04
2007.10.14
Посоветуйте литературу по решению подобных задач.


15-1190012820
Layner
2007-09-17 11:07
2007.10.14
Владельцы MS Vista! Запустите прогу Utils, отработает ли у вас


15-1189682335
de.
2007-09-13 15:18
2007.10.14
С ++




   Наверх