两个问题

Question

问题1.一个button，一个edit控件，想实现鼠标移动到button上时（不是点击，只是移动到上面），edit显示button的caption
问题2.做了一个相框，框是用的Bevel控件，相片用的image控件，如何载入图片是使图片的大小和相框相等。。如果给为大人有更好的方法，不用这两控件也行。。
请说的详细些，最好有源码解释。

Answer 1

1:
procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Edit1.Text := Button1.Caption;
end;2:  image1.Stretch := true;

Answer 2

2:  image1.Stretch := true;
  这个好像不行，忘了说了，图片是从一个文件载入的（不止一个），每回一点个button按钮图片就变化

Answer 3

问题解决了，image1.Stretch := true; 这句话失效是因为我用的businessSkinForm的image,换成delphi提供的就好了
误会大人了，谢谢您。