Главная страница
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.023 c
2-1190362660
Анна
2007-09-21 12:17
2007.10.14
иконка в Tray


2-1190207865
AigizK
2007-09-19 17:17
2007.10.14
Как подключить файл


1-1185839798
Dr. Andrew
2007-07-31 03:56
2007.10.14
Как обрисовать выделенный регион штриховой (пунктирной) линией?


15-1189682596
iam
2007-09-13 15:23
2007.10.14
.NET Profiler: ANTF Profiled


15-1190128267
VirEx
2007-09-18 19:11
2007.10.14
Российская demoкратия (с)