SharedData von Petr Vones unter D7;

[mael]

Also unter Delphi 3 geht es auch nicht: "Prozedur oder Funktionsname erforderlich".
Die Fehlermeldungen sind anscheinend bei Delphi 7 nicht besser geworden...

Jedenfalls frage ich mich warum Du nicht einfach eine Funktion verwendest, die einen Pointer zurück gibt, so à la:

function SharedData: PSharedData;
begin
Result := InternalSharedData
end;