Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сравнение массивов [D6]

Timur © (2009-03-12 19:55:00)
Здраствуйте, скажите как можно быстро сравнить массив относительно другого.
При полном совпадении данных возвратить true.

Например:
type
Ar = array of double;
function DifArray(A:ar, sizeA:integer, B:ar, bSize:integer):boolean;
-6 -6
55 55
12 12
-5 -5
-45 -45
-6 2
return false

Спасибо.

Медвежонок Пятачок (2009-03-16 10:42:00) [1]
а CompareMem будет сравнивать именно адреса.

Ну массивы-то при этом все равно формально разные, если содержат ссылки на разные адреса, даже если по разным ссылкам случайно лежат одинаковые данные

Sapersky (2009-03-12 20:50:00) [2]
Длина динамического массива (в байтах) сидит в его заголовке.

В элементах. Впрочем, размер элемента можно получить через TypeInfo или способом Паладина.

Все бы ничего, да вот тип элементов может оказаться дин.типом с управляемым временем жизни

Решаемо:
http://sapersky.narod.ru/files/TypInfoEx.rar(CompareData)

Не имеет значения.

Имеет. Например, две длинные строки могут содержать одинаковые данные, но иметь разные адреса, а CompareMem будет сравнивать именно адреса.

Сергей М. (2009-03-12 20:49:00) [3]

> Юрий Зотов © (12.03.09 20:41) [8]

> Если элемент умер

Причем здесь смерть, если элементами массива могут быть не сами данные, а указатели на данные ? Вариант с единственным CompareMem при этом не выдержит никаких корректирующих "пардонов"

Юрий Зотов (2009-03-12 20:41:00) [4]
> Сергей М. © (12.03.09 20:36) [7]

Не имеет значения. Если элемент умер, ссылка на него в массиве все равно осталась. То есть, не изменилась ни длина массива, ни его содержимое.

Сергей М. (2009-03-12 20:36:00) [5]

> Длина динамического массива

Все бы ничего, да вот тип элементов может оказаться дин.типом с управляемым временем жизни

Юрий Зотов (2009-03-12 20:34:00) [6]
> вот тогда будет вселенский "пардон"

Не будет. Длина динамического массива (в байтах) сидит в его заголовке.

Сергей М. (2009-03-12 20:30:00) [7]
Короче, сейчас выяснится, что тип array of Double был указан только для примера, а на самом деле подразумевался любой произвольный массив произвольной типоразмерности - вот тогда будет вселенский "пардон"))

Palladin (2009-03-12 20:25:00) [8]
пардон

Result := (Length(A) = Length(B)) and CompareMem(@A[0], @B[0], Length(A)*SizeOf(a[0]));

:)

фыва (2009-03-12 20:22:00) [9]
пардон

Result := (Length(A) = Length(B)) and CompareMem(@A[0], @B[0], Length(A)*SizeOf(double));

:)

Сергей М. (2009-03-12 20:18:00) [10]
пардон

Result := (Length(A) = Length(B)) and CompareMem(@A[0], @B[0], Length(A)*SizeOf(Integer));

Сергей М. (2009-03-12 20:05:00) [11]
Result := (Length(A) = Length(B)) and CompareMem(@A[0], @B[0], Length(A));

> sizeA

> bSize

Это вообще выкинь к лешему, ибо пятое колесо телеге

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »