каким образом циклом можно...

← →
STALKER © (2004-08-10 12:40) [0]

перегрузить данные одного массива в другой?

← →
Smithson © (2004-08-10 12:41) [1]

...поэлементно

← →
@Lex © (2004-08-10 12:43) [2]

procedure Move(const Source; var Dest; Count: Integer);

← →
jack128 © (2004-08-10 12:47) [3]

объединяя [1] + [2]

for i := Low(SourceArr) to High(SourceArr) do
Move(SourceArr[i], DestArr[i], SizeOf(SourceArr[i]));

:-))

← →
@Lex © (2004-08-10 12:50) [4]

> jack128
!!!-)

← →
VMcL © (2004-08-10 14:19) [5]

>>jack128 © (10.08.04 12:47) [3]

Зачем два цикла?

обычные
Move(SourceArr[Low(SourceArr)], DestArr[Low(DestArr)], SizeOf(DestArr[Low(DestArr)]) * Length(DestArr));

динамические
DestArr := Copy(SourceArr);

← →
jack128 © (2004-08-10 14:23) [6]

> >>jack128 © (10.08.04 12:47) [3]
>
> Зачем два цикла?
Это типа шутка была ;-)

← →
ghg © (2004-08-10 15:18) [7]

>VMcL © (10.08.04 14:19) [5]
ээээ
про динамические уточнить охота

не важно какого типа данные хранятся в этом массиве или функция copy будет работать только для определенных ттипов данных?
по-моему второе

← →
VMcL © (2004-08-11 02:09) [8]

>>ghg © (10.08.04 15:18) [7]

Не важно.

> А каким образом это можно сделать без цикла?!

Можно.
Dest[1]:=Source[1]; Dest[2]:=Source[2]; Dest[3]:=Source[3]; Dest[4]:=Source[4];

2 GuAV © (11.08.04 02:27) [10]
Да, это я что-то торможу 8) Слишком давно не делал такой фигни. 8)
Даже не помню - делал ли?

В своих прогах я так точно нет, а сюда выложить - д...а не жалко :)

каким образом циклом можно... Найти похожие ветки