Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.26;
Скачать: CL | DM;

Вниз

Как сделать ссылку на массив   Найти похожие ветки 

 
ArhAngel2 ©   (2002-08-15 21:48) [0]

Подскажите как сделать ссылку на массив, чтобы работать с этой ссылкой как с обычным массивом...
Заранее благодарен.


 
Геннадий   (2002-08-15 22:54) [1]

type
Ar = array [1..3] of Byte;

var
A : Ar;
P : Pointer;

begin
A[1]:= 1;
A[2]:= 2;
A[3]:= 3;

P:= Addr(A);

Ar(P^)[1]:= 0; // здесь приведение типа

ShowMessage(IntToStr(A[1])); // высветит нолик
end;

То есть,
1) Объявлешь тип (массив)
2) Объявляешь переменную этого типа
3) Берешь её адрес
4) Делаешь приведение типа и работаешь с указателем как с массивом
5) Для красоты в конце можешь сделать P:= NIL :)



Это надо было?


 
BAY ©   (2002-08-15 22:59) [2]

Вообще-то переменная, объявленная как массив и есть ссылка на него.


 
ArhAngel2 ©   (2002-08-16 09:35) [3]

Спасибо, теперь разобрался



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
3-84861
Ильдар
2002-08-01 15:36
2002.08.26
ошибка: не могу открыть в эксклюзивном режиме


3-84864
sammy
2002-08-05 13:52
2002.08.26
DB -> Resource


3-84891
Radimir
2002-08-06 10:35
2002.08.26
Как подставить имя таблицы через Select


1-85044
Andrey Shakula
2002-08-14 11:06
2002.08.26
dsgnintf.pas


1-84978
Natali
2002-08-14 08:56
2002.08.26
Rasapi32.dll