UIImpact​Feedback​Generator: fehlende Klasse deklarieren und nutzen?

[romber]

Problem gelöst

Peinlich: cdecl; vergessen.

Delphi-Quellcode:

UIImpactFeedbackGenerator = interface(UIFeedbackGenerator)
  ['{8BFE603E-FFBC-4109-9AAE-62F77ED4CD57}']
  function initWithStyle(style: UIImpactFeedbackStyle): Pointer; cdecl; //<------ HIER
  procedure impactOccurred; cdecl;
  end;
  TUIImpactFeedbackGenerator = class(TOCGenericImport<UIImpactFeedbackGeneratorClass, UIImpactFeedbackGenerator>) end;