Главная страница
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
6-1097571834
Andrews
2004-10-12 13:03
2004.12.26
WNetAddConnection2 и WinXP


14-1102335385
Привет!!!!
2004-12-06 15:16
2004.12.26
И как лечить вирус? (не конкретная ситуация а в целом)


14-1101477178
Красная Майка
2004-11-26 16:52
2004.12.26
Очередное предновогоднее ММР


4-1100327202
ддд
2004-11-13 09:26
2004.12.26
service & tray icon


1-1102682085
xman
2004-12-10 15:34
2004.12.26
TImage