Почему выдает ошибку???

[marales]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,jpeg,extctrls, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

  mykarta = class(Tobject)
  private
  public
    image: Timage;
    score: integer;
  end;
var
  Form1: TForm1;
  koloda: array[1..108] of mykarta;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
koloda[1].image.Create(form1);//тут ошибка
koloda[1].image.Parent:=form1;
end;

end.

[kventin_zhuk]

с классами в делфи особо не знаком, но думаю так так:

koloda[1].image := TImage.Create(form1)

[marales]

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

с классами в делфи особо не знаком, но думаю так так:

koloda[1].image := TImage.Create(form1)

Попробовал таже самая ошибка

[McFrey]

marales, попробуйте вот так

koloda[1].image := TImage.Create(self)

[kventin_zhuk]

Уфф.... вот так должно работать:

Koloda[1] := mykarta.Create;
Koloda[1].image := Timage.Create(Form1);
Koloda[1].image.parent := Form1;

[marales]

kventin_zhuk Спасибо большое!!!

[kventin_zhuk]

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

kventin_zhuk Спасибо большое!!!

Если интересно почему: описание karta: array [1..100] of mykarka не выдеделяет ни байта памяти,а память должна быть выделена в процессе выполнения программы (вызовом конструктора)