VPF::Некорректная работа USBManager.getAccessoryList

MKsoft

Дата 24.3.2015, 10:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 28.11.2006
Где: Ярославская обл. г. Углич

Репутация: нет
Всего: нет

Всем привет.
Суть проблемы.
У FTDI Chip появился USB Host, который реализует интерфейс Android <-> (GPIO, UART, PWM, I2C Master, SPI Slave, SPI Master)
Примеры на Java работают отлично.
Я решил попробовать написать в RAD Studio XE7.

Код пара строчек.

Код


uses
  Androidapi.JNI.USB,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.Helpers,
  Androidapi.JNI.JavaTypes,
  Androidapi.JNIBridge,


function SharedUSBManager: JUsbManager;
var
  USBManagerService: JObject;
begin
  USBManagerService := SharedActivityContext.getSystemService
    (TJContext.JavaClass.USB_SERVICE);
  Result := TJUsbManager.Wrap((USBManagerService as ILocalObject).GetObjectID);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  USBManager: JUsbManager;
  AccessoryList: TJavaArray<JUsbAccessory>;
  UsbAccessory: JUsbAccessory;
begin
  USBManager := SharedUSBManager;
  AccessoryList := USBManager.getAccessoryList;
  if (AccessoryList <> nil) then
  begin
    if (AccessoryList.Length > 0) then
    begin
      UsbAccessory := AccessoryList.Items[0];
      //Memo1.Lines.Add(jstringtostring(AccessoryList.Data.getManufacturer));
    end;
  end;
end;

Собственно проблема AccessoryList.Length с подключенным устройством 1, без него 0.
А вот когда я пытаюсь получить AccessoryList.Items[0] все вываливается.

Может кто поможет, что то может не так делаю....

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Android \| Следующая тема »