初学Delphi 问题多多 请求支援

我想看的教材是《 百例课程 Delphi7 编程入门篇 》现在做的练习是：’Edit控件‘的‘GetTextLen函数’
我的代码如下：
... ...
procedure TForm1.FormCreate(Sender: TObject);
var
  S:string[11];
  SrtingLength:Byte;
begin
  StringLength:=Edit1.GetTextLen;
... ...
可是我写到Edit1.GetTextLen的时候 就报程序有错，不能完成调用。
请问是什么原因。