delphi android发送与接收广播

在Delphi中，可以使用TLocalBroadcastManager类来发送和接收广播。以下是一个示例：

发送广播：
```delphi
uses
  Androidapi.JNI.GraphicsContentViewText, Androidapi.Helpers, Androidapi.JNI.JavaTypes, Androidapi.JNI.LocalBroadcastManager;

procedure SendBroadcast(const AAction: JString);
var
  Intent: JIntent;
begin
  Intent := TJIntent.Create;
  Intent.setAction(AAction);
  TJLocalBroadcastManager.JavaClass.getInstance(TAndroidHelper.Context).sendBroadcast(Intent);
end;
```

接收广播：
```delphi
uses
  Androidapi.JNI.GraphicsContentViewText, Androidapi.Helpers, Androidapi.JNI.JavaTypes, Androidapi.JNI.LocalBroadcastManager;

type
  TBroadcastReceiver = class(TAndroidBroadcastReceiver)
  protected
    procedure onReceive(context: JContext; intent: JIntent); override;
  end;

procedure TBroadcastReceiver.onReceive(context: JContext; intent: JIntent);
var
  Action: JString;
begin
  Action := intent.getAction;
  // 处理接收到的广播
end;

procedure RegisterBroadcastReceiver;
var
  Receiver: TBroadcastReceiver;
begin
  Receiver := TBroadcastReceiver.Create;
  TJLocalBroadcastManager.JavaClass.getInstance(TAndroidHelper.Context).registerReceiver(Receiver, TJIntentFilter.JavaClass.init(StringToJString('YOUR_ACTION')));
end;

procedure UnregisterBroadcastReceiver;
var
  Receiver: TBroadcastReceiver;
begin
  Receiver := TBroadcastReceiver.Create;
  TJLocalBroadcastManager.JavaClass.getInstance(TAndroidHelper.Context).unregisterReceiver(Receiver);
end;
```

在发送广播时，使用`SendBroadcast`函数，并传入广播的Action。在接收广播时，创建一个继承自`TAndroidBroadcastReceiver`的类，并在`onReceive`方法中处理接收到的广播。然后，使用`RegisterBroadcastReceiver`函数注册广播接收器，并在`UnregisterBroadcastReceiver`函数中取消注册。请注意替换示例代码中的`YOUR_ACTION`为实际的广播Action。

希望对你有所帮助！
————————————————

                            版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
                        
原文链接：https://blog.csdn.net/delphigbg/article/details/132488894