delphi as

//As用于将一个对象转换为另一个对象
procedure BtnClick(Sender:TObject);
begin
  (Sender as TButton).Caption := 'Clicked';
end;

//对于对象填充接口的转换, 必须用As进行
(HTTPRIO as IExp).GetConnection;

//As不能用于数据类型的转换, 下面的代码是错误的:
var
  i: Integer;
  s: string;
begin
  s := (i as string);
end;
//正确写法是:
s := string(i);

转载于:https://www.cnblogs.com/yangxuming/p/9181849.html