为什么显示'Edit1'是Undeclared Identifier? ( 积分: 0 )

代码是
var
str1:string;
procedure Initialize;
begin
str1 := Edit1.Text;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Initialize;
ShowMessage(str1);
end;

在type里面已经有了Edit1: TEdit;
为什么还显示'Undeclared Identifier'Edit1''

菜鸟问题 谢谢

你有没有在form上添加EDIT1的控件阿？如果没有的话当然会出现这条语句阿？
要用到：
Var edit:Tedit;
begin
edit:=Tedit.create(self);
edit.parent:=self;
.......

谢谢

忘记回复了 procedure Initialize;应改为procedure TForm1.Initialize;