RadCode/CompleteCode.txt at master · Edimarpcosta/RadCode · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
unit uMenu;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Layouts,
  FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit, FMX.Objects, {Uses} System.IOUtils,
  IdURI, Androidapi.JNIBridge, Androidapi.JNI.Os, Androidapi.Jni.App, FMX.Helpers.Android;

type
  TForm1 = class(TForm)
    lyt1: TLayout;
    tlb1: TToolBar;
    LBL_1: TLabel;
    tlb2: TToolBar;
    lyt2: TLayout;
    lyt3: TLayout;
    lyt4: TLayout;
    edt1: TEdit;
    LBL_2: TLabel;
    lyt5: TLayout;
    RndRct1: TRoundRect;
    LBL_3: TLabel;
    procedure LBL_3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses
  Androidapi.JNI.GraphicsContentViewText, Androidapi.Helpers, FMX.platform.Android,
  FMX.platform, Androidapi.JNI.Net, Androidapi.JNI.JavaTypes, Androidapi.IOUtils;
{$R *.fmx}

procedure TForm1.LBL_3Click(Sender: TObject);
var
  IntentWhats: JIntent;
  Uri: Jnet_Uri;
  texto: string;
  AttachmentFile: JFile;
begin

  IntentWhats := TJIntent.JavaClass.init(TJIntent.JavaClass.ACTION_SEND);
  IntentWhats.setPackage(StringToJString('com.whatsapp'));
  AttachmentFile := TJFile.JavaClass.init(StringToJString(system.IOUtils.TPath.Combine(system.IOUtils.TPath.GetShareddocumentsPath(), 'WhatApp.jpg')));
  Uri := TJnet_Uri.JavaClass.fromFile(AttachmentFile);
  IntentWhats.putExtra(TJIntent.JavaClass.EXTRA_TEXT, StringToJString(texto));
  IntentWhats.setType(StringToJString('text/plain'));
  IntentWhats.putExtra(TJIntent.JavaClass.EXTRA_STREAM, TJParcelable.Wrap((Uri as ILocalObject).GetObjectID));
  IntentWhats.setType(StringToJString('image/*'));
  IntentWhats.addFlags(TJIntent.JavaClass.FLAG_GRANT_READ_URI_PERMISSION);
  SharedActivity.startActivity(IntentWhats);

end;

end.