关于findcomponet用法的简单疑问（分数不多，但是马上给分）

Question

就是
showmessage(TEdit(findcomponent('Edit1')).Text);
这么一条语句，可以执行~
但是就是这条语句，要是放在这儿就虽然执行也没用了~该怎么改？with button1 do
  begin
    showmessage(TEdit(findcomponent('Edit1')).Text);
    left:=100;
    top:=100;
  end;这个时候showmessage没有显示内容~大家可以试一试~
经过试验证明：只要findcomponent用在了with语句中，findcomponent都变得没用~
请问为什么？？

Answer 1

showmessage(TEdit(formname.findcomponent('Edit1')).Text);

Answer 2

可以如以下修改：  
  with button1 do
  begin
    showmessage(TEdit(self.findcomponent('Edit1')).Text);
    left:=100;
    top:=100;
  end;
原因：如果没有加self，系统认为是button1的。
  

Answer 3

to :sean2000(地宽天高) 
sorry了~