delphi怎么计算字符串的长度？

不闻不问

在Edt1的text输入字符时如何计算或判断当前输入的字符串长度
求大神帮忙，说的详细点，刚刚接触Delphi

aminghanhua

procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
Label1.Caption :=inttostr(length(edit1.Text));
end;