ошибка типов TGroupBox TImage

[DLev2]

есть строчка
cards_massiv[a].image.Parent:=Players.player[a1];
в которой массив карт, карта - составной тип, image - указатель на компонент TImage.
Players.player - указатель на компонент TGroupbox
собственно, перемещаю карту с одного groupbox'са в другой, меняю родителя, на чем вылетает ошибка "неверные типы TWinControl и Pointer"
указатели

TCards = record
...
image:PImage;
...
end;


TPlayers = record
...
player:array[1..4] of ^TGroupBox;
...
end;

присваивание происходило таком образом
unit1.Players.player[unit1.Players.index]:=@Unit1.Form1.GroupBox8;

[Stilet]

player:array[1..4] of ^TGroupBox;

Убери ^ Это получается у тебя массив указателей на указатели. а тебе нужен массив объектов.