Вниз
Скачать: CL | DM;

Подскажите по массивам   Найти похожие ветки 

← →
Руслана   (2004-11-25 18:26) [0]

Имеется массив
MyArray:Array[0..10] of byte;

создаю второй массив
TEMPArray:Array[0..10] of byte;

хочу скопировать один в другой
TEMPArray:=MyArray;
Возникает ошибка о несовместимости... Но ведь размер и типы массивов одинаковые? В чем тут дело и как сделать правильно.
И заодно - как в процессе выполнения программы создать массив?


← →
Плохиш ©   (2004-11-25 18:30) [1]

type
TMyArray = Array[0..10] of byte;

MyArray: TMyArray;

TEMPArray: TMyArray;


← →
begin...end ©   (2004-11-25 18:38) [2]

Или так:

MyArray, TempArray: array [0..10] of Byte


← →
Суслик ©   (2004-11-25 18:43) [3]


> И заодно - как в процессе выполнения программы создать массив?

использовать динамические массивы

var
  a: array of byte;
begin
  SetLengt(a, 100);
  a[0] := 111;
end;


← →
GuAV ©   (2004-11-25 18:49) [4]

Суслик ©   (25.11.04 18:43) [3]
SetLengt


SetLength
:-P


← →
Ega23 ©   (2004-11-25 19:00) [5]

Ну или совсем тривиально

for i:=0 to 10 do TempArray[i]:=MyArray[i];


:о)


← →
Суслик ©   (2004-11-25 19:05) [6]

можно еще move использовать


← →
begin...end ©   (2004-11-25 19:10) [7]

...а также CopyMemory.

Причём для копирования именно динамических массивов без Move или CopyMemory и проч. уже и не обойтись.



Страницы: 1 вся ветка

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



Память: 0.46 MB
Время: 0.033 c
4-1099071933
cerber1
2004-10-29 21:45
2004.12.12
Работает ли мышь? Как поределить програмно?


3-1100019083
Existas
2004-11-09 19:51
2004.12.12
Ошибка в SQL запросе (ADODataset) к нескольким таблицам... (+)


1-1101683635
Кто---то
2004-11-29 02:13
2004.12.12
Можно ли получить листинг своей программы ( экзэшника ) в таком


14-1100791925
Гарри Поттер
2004-11-18 18:32
2004.12.12
Помогите с составлением сметы на монтаж локальной сети


1-1101541575
Igor_thief
2004-11-27 10:46
2004.12.12
Хинт




   Наверх