Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: 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 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
4-1098942649
Гость
2004-10-28 09:50
2004.12.12
Как сделать чтобы программа получала админские права при запуске


3-1100301804
Dik
2004-11-13 02:23
2004.12.12
Отмена сообщения об ошибке


1-1101161742
Bobby Digital
2004-11-23 01:15
2004.12.12
Listbox


3-1100012001
Bless
2004-11-09 17:53
2004.12.12
Как убрать эту удаленную запись из рекордсета


4-1098793495
sapsi
2004-10-26 16:24
2004.12.12
Переключение Alt+Tab