[angvelem]

Измени описание:

Код:

  function TGlobFunc.wait_data_answer(Myid : Integer; var Mybuffer: TMyBuffer) : Boolean;
  begin
    SetLength(MyBuffer, in_data[1]); - увеличиваем массив до нужного размера
    Move(in_data[2], Mybuffer[0], in_data[1]);
  end;