为什么MOUSE点了PANEL上还是没图象出来？？？(5分)

procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
aa:timage;
begin
aa:=timage.Create(panel1);
aa.Left:=x;
aa.Top:=y;
aa.Height:=50;
aa.Width:=50;
aa.Picture.LoadFromFile('c:/sample.bmp');
form1.Paint;
panel1.Repaint;


end;

var
aa:timage;
begin
aa:=timage.Create(panel1);
aa.parent:=panel1; //加上这个
aa.Left:=x;
aa.Top:=y;
aa.Height:=50;
aa.Width:=50;
aa.Picture.LoadFromFile('c:/sample.bmp');
form1.Paint;
panel1.Repaint;

接受答案了.