Подскажите как отобразить значение свойтсва StartupNotifications?

[Anasazi]

Есть объект APushService:TPushService, при запуске приложения с помощью окна пуш-уведомления пытаюсь сделать, чтобы текст уведомления отображался в showmessage. У APushService есть свойство StartupNotifications, но тип System.TArray. Подскажите пожалуйста, вывести значение StartupNotifications на экран?

Изменено 13 апреля, 2016 пользователем Anasazi

[krapotkin]

procedure TStartForm.getAllNotfications;
var
  LNotification: TPushServiceNotification;
  s:string;
  ps:TPushService;
begin
  if AServiceConnection=NIL then
    exit;

  ps:=AServiceConnection.Service;
  for LNotification in ps.StartupNotifications do
  begin
    s:=lNotification.Json.ToString;
    ///....
  end;
  TNotificationCenter.Create(nil).CancelAll;
end;

 

Изменено 13 апреля, 2016 пользователем krapotkin

[Anasazi]

Спасибо! Сделал так:

for LNotification in ps.StartupNotifications do
  begin
    s:=lNotification.Json.ToString;
    showmessage(s);
  end;

 

Правда получил вот такую картину.

Добавил парсинг нужного фрагмента и все получилось отлично.

[ENERGY]

@krapotkin
TNotificationCenter.Create(nil).CancelAll;

Это же утечка памяти. Надо уничтожать объект.

Хотя по идее нет, в ARC компиляторах он должен сам уничтожится.

 

Изменено 27 мая, 2017 пользователем ENERGY

[krapotkin]

да. на это весь расчет.