用代码创建控件的问题？

[TripH0101]

.h文件
typedef struct
{
TGroupBox *gb;
TRichEdit *RichEdit1;
TImage *img;

}TInst;

.cpp文件
TForm1 *Form1;
TInst *inst=new TInst();

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
inst->gb = new TGroupBox(this);
inst->gb->Caption = "Log";
inst->gb->Parent = Form1;
inst->gb->Top =Form1->Top+20;
inst->gb->Left =Form1->Left +20;
inst->gb->Width =800;
inst->gb->Height=800;

inst->RichEdit1= new TRichEdit(inst->gb);
inst->RichEdit1->Parent =inst->gb;
inst->RichEdit1->Top =inst->gb->Top+10;
inst->RichEdit1->Left =inst->gb->Left+10;
inst->RichEdit1->Width=600;
inst->RichEdit1->Height =650;

inst->img=new TImage(inst->RichEdit1 );
inst->img->Parent =inst->RichEdit1 ;
inst->img->Top =inst->RichEdit1->Top +10;
inst->img->Left =inst->RichEdit1->Left +10;
inst->img->Width =300;
inst->img->Height=300;
inst->img->Stretch =true;
inst->img->Transparent =true;
inst->img->Picture=this->Image1->Picture ;

我想让我创建的img 在RichEdit1，但现在img 的位置随RichEdit1输入而向下移动，且RichEdit1输入也有问题，请指教?

}

[我不懂电脑]

RichEdit1加载图片是如此使用的.
http://www.qqgb.com/Program/Delphi/DelphiJQ/Program_151593.html

[ydlchina]

RichEdit1加载图片不是如此使用的.