Массив как параметр по ссылке

[victorixx]

Здрасьте всем.
В коде программы необходимо во многих случаях удалять какой-то элемент дин. массива, при этом массивы разные и типы элементов в них, соответственно, тоже - как простые типы, так и ссылочные (объекты).
Решил вот написать такой метод:

type vArray=array of variant; 
............................................
procedure ArrayDelItem(index: Integer; var v: vArray);
var i:integer;
begin
if (index<0) or (index>high(v))
   then begin
   exit;
   end; //if
if index<high(v)
   then begin
   for i:=index to high(v)-1
      do begin
      v[i]:=v[i+1];
      end;//for
   end; //if
SetLength(v, length(v)-1);
end;

Вызываю этот метод с массивом ссылочного типа:

Type DBObject=class
............
end;
............
var DBObjects:array of DBObject;
..............
ArrayDelItem(index, DBObjects);

Ругается - говорит, тип формального параметра не соответствует действительному. Как быть?

[victorixx]

Здесь было сообщение, что проблема решена - похожую тему отыскал, но там другое. Так что тем по-прежнему актуальна (для меня)

[Человек_Борща]

Потому что vArray это variant а вы ему DBObject толкаете.

[Аватар]

var v: Variant;
...
TVarData(v).VType:=VarByRef;
TVarData(v).VPointer:=Label1;
...
TLabel(TVarData(v).VPointer).Caption:='123';

[victorixx]

Простите, многоуважаемый Аватар, я долго смотрел на приведенный Вами код. Как я понял, Вы хотели показать мне какую-то аналогию с моим кодом и, возможно, способ решения проблемы, но какую именно аналогию и какой именно способ - не допёр.
Может, мне стоит немного перефразировать вопрос. Передо мной стоит на данный момент задача написать такую процедуру, которая могла бы принять в качестве параметра по ссылке динамический массив с элементами любого типа - будь то объекты либо данные простых типов, и произвести с элементами этого массива какие-либо манипуляции, ну, там удалить элемент, поменять местами элементы, уменьшить/увеличить размерность массива...
Это в принципе возможно? Или придется писать отдельные процедуры для каждого типа данных?

[Stilet]

Это в принципе возможно?

Это невозможно. Если бы Variant умел принимать объекты то да, однако он этого не умеет. Возможно в новых Делфи и есть ему какая то суперпупер замена, однако в классическом такое не пройдет.

[min@y™]

Убери var из функции. Компайлер ругается именно на него.

[victorixx]

Сообщение от min@y™

Убери var из функции. Компайлер ругается именно на него.

Тогда не будет параметра по ссылке. Придется делать действительно функцию и возвращаемое значение. Задача-то была несколько иной...

[northener]

Сообщение от victorixx

Тогда не будет параметра по ссылке.

А что представляет собой параметр по ссылке для динамического массива? И что для него же представляет собой параметр по значению? Уверены ли вы что вы правильно это понимаете?
Я лично уверен что не понимаете.

[northener]

P.S.
"Шляпки" - вред! Но отсутствие паскалевских шляпок в Делфи (при почти не изменившемся тексте хэлпа) много кого вводит в заблуждение.