IOTAModule.GetOwnerCount is deprecated

[swestner]

Hallo,

bei der Nutzung von GetOwnerCount und Getowner erhalte ich mit Delphi 12 jetzt eine deprecated-Warnung:

if (CurrentModule.GetOwnerCount > 0) then
for i:= 0 to CurrentModule.OwnerCount - 1 do
if (CurrentModule.GetOwner(i).QueryInterface(IOTAProject, Project) = S_OK) then

Kann mir jemand einen Tip geben, was hier geändert werden muß, d. h. durch was diese beiden Aufrufe ersetzt worden sind?

Grüße

Stefan