Supklasse aufrufen

[Flips]

Hi.

Habe folgendes Problem das nur halb so kompliziert ist wie die Überschrift
Also, nehmen wir an ich habe einer Procedure die TStrings einer ListBox als Parameter übergeben, ungefähr so:

Delphi-Quellcode:

procedure Machwasdamit(Items:TStrings);
begin
[...]
end;

[...]

//Aufruf
Machwasdamit(ListBox1.Items);

Kann ich nun über diese Variable "Items" irgendwie auf dessen Oberklasse (Supklasse), die ListBox-Instanz "ListBox1" zugreifen?
(Sagt bitte nicht "Schreib die Procedure doch einfach so das du die komplette ListBox übergibst" )


Liebe Grüße,
Flips