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

Вниз

Ссылки   Найти похожие ветки 

 
VasRog   (2004-12-11 18:01) [0]

Подскажите, пожалуйста,
1:  У меня определено:

   type
   Tcountarray = array [0..255] of longword;
   Pcountarray = ^Tcountarray;

Т.е. масив ссылок.  Можно ли не определяя (инициализируя) массив типа Tcountarray.  Написать так:

var
counts: Pcountarray;
begin
for ii:= 0 to 255 do
 counts^[ii]:= 0;
end;

2.  Как можно создать массив ссылок на уже существующий динамический массив.

type
pixelightness = array of byte;
Ppointerpixelightness = ^pixelightness;

var
lightness: pixelightness;
links: Ppointerpixelightness;

begin
а как дальше ?


 
begin...end ©   (2004-12-11 18:09) [1]

> VasRog   (11.12.04 18:01)

1. Так писать нельзя. Нужно вначале либо выделить участок памяти, на первый байт которого будет указывать переменная Counts (с помощью процедуры New), либо присвоить этой переменной адрес статической переменной типа TCountArray.
2. Я не понял. К тому же, переменная динамического массива - это уже указатель.


 
VasRog   (2004-12-11 18:21) [2]

либо присвоить этой переменной адрес статической переменной типа TCountArray

Вот это то,  что нужно,  но как это сделать. Т.е. мне нужно для статического массива создать массив указателей на него.  Для динамического из 2. я уже понял.


 
begin...end ©   (2004-12-11 18:30) [3]

> [2] VasRog   (11.12.04 18:21)

> Вот это то,  что нужно,  но как это сделать.

Адрес переменной можно получить с помощью оператора @ или функции Addr. Поэтому можно написать, например, так:

var
 MyArray: TCountArray;
 pMyArray: PCountArray;

begin
 pMyArray := @MyArray
end.


> Т.е. мне нужно для статического массива создать массив указателей
> на него.

А зачем Вам НЕСКОЛЬКО указателей на ОДИН И ТОТ ЖЕ статический массив?


 
VasRog   (2004-12-12 00:57) [4]

Все.  Спасибо.  Разобрался.
> А зачем Вам НЕСКОЛЬКО указателей на ОДИН И ТОТ ЖЕ статический
> массив?

Это просто я глючу. :)



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

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

Наверх




Память: 0.47 MB
Время: 0.045 c
14-1102009718
Piter
2004-12-02 20:48
2004.12.26
Помогите справиться с Windows Media Player


1-1102706736
kirilllius
2004-12-10 22:25
2004.12.26
Привязка ПО к CD


14-1102491925
cyborg
2004-12-08 10:45
2004.12.26
Новость


3-1101712572
Rule
2004-11-29 10:16
2004.12.26
Чегото не могу подключится через FB embeded к базе


10-1072286014
Mozg
2003-12-24 20:13
2004.12.26
Переход с Delphi5 + Visibroker 3 на Delphi 7 + Visibroker4