[SerginhoLD]

я хочу удалить элемент из динамического массива

Код:

procedure delElArray(var p: array of Integer; k:integer); // k - индекс элемента который я хочу удалить
var mx: integer;
begin
  mx:=high(p); // индекс послед. элем. массива
  swap_int(p[k],p[mx]); // меняем местами элементы
  setlength(p,mx); // ну и вот тут ошибка 
  [DCC Error] unitPlayoff.pas(104): E2008 Incompatible types
end;

[lmikle]

Попробуй так:

Код:

type
  TP = Array of Integer;

procedure delElArray(var p: TP; k:integer); // k - индекс элемента который я хочу удалить
var mx: integer;
begin
  mx:=high(p); // индекс послед. элем. массива
  p[k] := p[mx]; // меняем местами элементы
  setlength(p,mx); // ну и вот тут ошибка
end;