указатель на массив

← →
malyar (2007-04-03 21:10) [0]

привет народ
подскажите как передать из одной процедуры в другую массив байт(по указателю)?

из процедуры m1 надо передать в процедуру m2 массив buff тока не сам масиив а указатель на него как это делается?

procedure Tform1.m2(......)
begin
а здесь идет обработка массива ссылаясь на его указатель
end;

//----------------------------
procedure Tform1.m1 ;
var buff:array of byte;
begin
...
m2(buff)
end;

← →
Джо © (2007-04-03 21:13) [1]

Переменная диню массива собственно уже и есть указатель. Ничего не нужно выдумывать с лишними указателями.
Определяешь тип:

type TByteArray = array of byte;

И указываешь параметры нужного типа:

procedure m2 (arr: TByteArray);

А, ну и

procedure Tform1.m1; var buff: TByteArray;

указатель на массив Найти похожие ветки