[SerginhoLD]

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

Код:

1 2 3 4 5 6 7 8

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

[lmikle]

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

Код:

1 2 3 4 5 6 7 8 9 10

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;