ваще че это за C0000005 она часто че-то вылетает в местах где раньше все работало
Добавлено через 3 минуты
Цитата:
Сообщение от alexteam
мне когдато дестр надавал по шапке за то что в стек хлама кучу ложу.. теперь пытаюсь везде где это критично передавать "4 байта"
если ты не хочешь каждый раз при изменении длинны массива передергивать память то сделай хотябы воттак
delphi Код:
type
PData = ^TData;
TData = packed record len:word; data: array[word] of byte; end;
procedure check(p:pdata);
begin
while someshitcounter < p^.len do
dosomeshit(p^.data[someshitcounter]);
end;
var
ar : tdata;
begin
check(ar, 100)
|
но ведь если передавать через const\var то идёт тоже самое, ну т.е. передается только поинтер или нет?
__________________
Начало.
Последний раз редактировалось supernewbie, 17.11.2011 в 22:02.
Причина: Добавлено сообщение
|