Delphi D10.X安卓安卓APP开发让原生开发让原生Toast显示图片显示图片
上次完成了《Delphi D10.X安卓APP开发中简单使用原生Toast》，可以快速方便的使用Toast，并且可以自定义显示位置。在
此基础上，今天我们来实现在Toast中显示图片的方式。
需要增加的内容需要增加的内容
先增加一个可以显示图片的调用申明。
procedure Toast(const msg: string; duration: Integer; gravity: Integer;
xOffset: Integer; yOffset: Integer; vBitmap: TBitmap); overload;
增加对应的功能过程：
procedure Toast(const msg: string; duration: Integer; gravity: Integer;
xOffset: Integer; yOffset: Integer; vBitmap: TBitmap);
begin
{$IFDEF ANDROID}
CallInUiThread(
procedure
var
vToast: JToast;
vImageView: JImageView;
vLinearLayout: JLinearLayout;
begin
vToast := TJToast.JavaClass.makeText(TAndroidHelper.Activity,
StrToJCharSequence(msg), duration);
vToast.setGravity(gravity, xOffset, yOffset);
if Assigned(vBitmap) then
begin
// 创建图片显示
vImageView := TjImageView.JavaClass.init(TAndroidHelper.Context);
vImageView.setImageBitmap(BitmapToJBitmap(vBitmap));
vLinearLayout := TJLinearLayout.Wrap(vToast.getView);
vLinearLayout.addView(vImageView, 0);
end;
vToast.show;
end);
{$ENDIF}
end;
调用方式：调用方式：
Toast('居中,显示图片',TToastLength.ShortToast,TGravity.CENTER,0,0, Image1.Bitmap);
运行后的效果：运行后的效果：
评论0