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

Вниз

Динамическое создание массива   Найти похожие ветки 

 
NOD ©   (2003-10-11 00:06) [0]

Может вопрос не по теме, но нужно в ТР7 создать динамический массив. Вот мой код, но там куча ошибок- я уже с этими указателями в конец запутался, но суть такая

uses crt;
type
ar=array[0..0] of integer;
a=^ar;
var
p:pointer;
begin
getmem(p,7);
a(p^)[3]:=333;
writeln(a(p^)[3]);
freemem(p,7);
write(maxavail);
readln;
end.


 
Ломброзо Цезарь ©   (2003-10-11 01:08) [1]

Это на Delphi, но под паскаль должно подойти

type
TLargeArr = array[0..$FFFF] of integer;
PLargeArr = ^TLargeArr;
var
ppArr: PLargeArr;
begin
GetMem(ppArr, 1000 * sizeof(integer)); (* в TP - 1000 * 2 *)
ppArr^[100] := 2;
Writeln(ppArr^[100]);
FreeMem(ppArr);
readln;
end.


 
Е-Моё имя ©   (2003-10-11 01:19) [2]


> Ломброзо Цезарь ©

гм...
а почему здесь? ;))


 
Ломброзо Цезарь ©   (2003-10-11 01:28) [3]

Хобби, знаете ли...
Не все ж с поц иентами беседовать...


 
Е-Моё имя ©   (2003-10-11 01:33) [4]

;-))))
затейник, однако...



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
3-74076
3APA3A
2003-10-01 23:02
2003.10.23
Почему не открывается?


3-74071
gedd
2003-10-01 19:45
2003.10.23
Проблема с выборкой в Access


1-74189
dimm
2003-10-13 17:37
2003.10.23
Как перехватить событие копирования в буфер обмена и вставка


1-74128
Igor Mish
2003-10-11 04:40
2003.10.23
Про пароль


1-74136
KDel
2003-10-10 22:36
2003.10.23
Редактирование ресурсов в exe