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

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

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

Копирование массива рекордов?

Cemen © (2007-01-12 03:33:00)
Надо обязательно поэлементно копировать?

evvcom (2007-01-12 15:51:00) [1]
> [7] DevilDevil © (12.01.07 12:34)
> FastMemCPY

И чем он отличается от стандартного Move? Только отсутствием проверки на направление копирования? :-))
А [5] читал?

DevilDevil (2007-01-12 12:34:00) [2]
type
TMyRecord = record ... end;
PMyRecord = ^TMyRecord;

var
RecArr1 : array of TMyRecord;
RecArr2 : array of TMyRecordl

procedure FastMemCPY(Dest, Src : PMyRecord; CountBytes : integer);
asm
push esi
push edi

mov edi, eax
mov esi, edx
mov eax, ecx

shr ecx, 2
jz @Bytes

rep movsd

@Bytes:
and eax, 3
jz @end_p
mov ecx, eax
rep movsb
@end_p:
pop edi
pop esi
end;

//*********************

procedure SomeProc();
begin
. . .
FastMemCPY( @RecArr1[n1], @RecArr2[n2], RecsCount *sizeof(TMyRecord) );
. . .
end;

Джо (2007-01-12 07:56:00) [3]
> [5] Cemen (12.01.07 07:55)
> А если содержат, то как лучше?

В цикле.

Cemen (2007-01-12 07:55:00) [4]
А если содержат, то как лучше?

Alx2 (2007-01-12 04:41:00) [5]
>SergP © (12.01.07 04:36) [3]

Да, точно. Не учел.

SergP (2007-01-12 04:36:00) [6]
> [2] Alx2 © (12.01.07 03:50)
> >Cemen (12.01.07 03:33)
>
> Не обязательно. Можно за одно присваивание, если объявлен
> как отдельный тип. Для динамических массивов - свои функции
> есть. В любом случае, можно аккуртано воспользоваться процедурой
> move

ну это если рекорды не одержат динамических структур.

Alx2 (2007-01-12 03:50:00) [7]
>Cemen (12.01.07 03:33)

Не обязательно. Можно за одно присваивание, если объявлен как отдельный тип. Для динамических массивов - свои функции есть. В любом случае, можно аккуртано воспользоваться процедурой move

Германн (2007-01-12 03:43:00) [8]

>
> Cemen (12.01.07 03:33)
>
> Надо обязательно поэлементно копировать?

А вопрос то где?

Наверх

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