폼에 TImage 를 new를 이용하여 동적생성했습니다. 이 이미지에 LineTo를 이용하여 선을 하나 그렸는데 이미지가 보이질 않네요.
폼을 생성한 후 버튼을 누르면 폼에 동적으로 생성된 이미지가 보이게 할려고 했습니다. Image1프로퍼티를 이것저것 써보았지만 컴파일 후 폼이 떠도 아무것도 보이질 않습니다.

다음의 코드를 보시고 좀 도와주세요.


TImage *Image1;

void __fastcall TForm1::Button1Click(TObject *Sender)
{
       Image1 = new TImage(this);

        Image1->Width = 100;
        Image1->Height = 100;
        Image1->Left = 0;
        Image1->Top = 0;
        Image1->Enabled = true;
        Image1->Visible = true;
        Image1->Transparent = true;


        Image1->Canvas->Pen->Color = clBlack;
        Image1->Canvas->Pen->Style = psSolid;
        Image1->Canvas->LineTo(100,100);

}