i :=3;
(FindComponent(‘Label’+inttostr(i)) as TLabel).Caption := ‘动态调用操作控件’;
上面表示为：Label3.Caption := ‘动态调用操作控件’;