Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ламерский вопрос

_saha_ © (2002-10-29 14:09:00)
Как нажимать кнопку f1 я знаю и этот пример я видел, меня интересует как сделать массив размером не 2048 или сколько-нибудь
а что-бы размер задавался динамически

_saha_ (2002-10-29 18:35:00) [1]
ss[0] - Inaccessible value

Anatoly Podgoretsky (2002-10-29 16:37:00) [2]
ss[0]

_saha_ (2002-10-29 16:33:00) [3]
ок, снкс,
но опять у меня те же грабли:
var ss:array of Char (или byte пробовал);
count:integer;
f:file;
begin
count:=20;
SetLength(ss,count);
assignFile(f,"sss.dat");
reset(f,1);
BlockRead(f,ss,count);
в этом месте хотелось бы как нибудь прочитать содержимое ss
но в ответ ругается Access violetion и т.д. на любую команду связанную с ss. Посмотрел на содержимое ss (в tooltip) - там какая-то ерунда (и явно не 20 )

_saha_ (2002-10-29 16:31:00) [4]
ок, снкс,
но опять у меня те же грабли:
var ss:array of Char (или byte пробовал);
count:integer;
f:file;
begin
count:=20;
SetLength(ss,count);
assignFile(f,"sss.dat");
reset(f,1);
BlockRead(f,ss,count);
в этом месте хотелось бы как нибудь прочитать содержимое ss
но в ответ ругается Access violetion и т.д. на любую команду связанную с ss. Посмотрел на содержимое ss (в tooltip) - там какая-то ерунда (и явно не 20 )

Anatoly Podgoretsky (2002-10-29 15:50:00) [5]
Сколько я спрашиваю в ГРАММАХ

F1 (2002-10-29 15:43:00) [6]
var
Arr:Array of Something;
begin
SetLength(Arr, "Скока вешать в граммах");
end;

_saha_ (2002-10-29 15:31:00) [7]
а можно пример

MBo (2002-10-29 14:16:00) [8]
F1 ;) Dynamic Arrays

еще см. указатели (pchar,pbyte) и функции выделения памяти
(для начала GetMem)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »