Отображение уведомлений в Mac OSX с помощью delphi-XE6

Когда я создаю уведомление для mac OSX. Я могу установить (уникальное) имя уведомления, но заголовок не изменится. Он просто показывает название приложения.

procedure TPWTrayIcon.MacNotification(pTitle, pMessage: string);
var
 Note       : TNOtification;
 NoteCenter : TNotificationCenter;
begin
  NoteCenter:=TNotificationCenter.Create(nil);
  try
    note := NoteCenter.CreateNotification(pTitle,pMessage,Now+EncodeTime(0,0,1,0));
    try
    note.AlertAction := 'Alert';
//    note.name := pTitle;
//    note.AlertBody := pMessage;
//    note.FireDate  := Now + EncodeTime(0, 0, 1, 0);
    NoteCenter.ScheduleNotification(note);
    finally
      note.DisposeOf;
    end
  finally
    NoteCenter.Free;
  end;

Уведомления


person r_j    schedule 05.09.2014    source источник


Ответы (1)


Как вы заметили, имя уведомления — это имя приложения, и изменить его через текущий API невозможно. В любом случае, поскольку оно получает имя приложения, которое вы можете попробовать в качестве обходного пути (своего рода хак), чтобы изменить имя приложения во время выполнения по мере необходимости.

Если изменение имени приложения в FMX невозможно, боюсь, что на данный момент нет возможности изменить заголовок уведомления.

Однако заголовок уведомления в Mac OS X всегда является именем приложения, которое его подтолкнуло, поэтому я думаю, что оно таким образом определено в спецификации Mac OS X.

person aleroot    schedule 06.09.2014