Viele Objekttypen handlen?

[Treffnix]

Hallo,

ich steh gerade ziemlich aufm Schlauch. Ich habe viele Ableitungen ( und es können noch mehr werden ) von einem Basistypen, die verschiedene Geräte handlen. Initial muss ich nun erstmal herausfinden um welches Gerät es sich handelt. Die Ableitungen haben dazu eine Methode, die überprüft ob es sich um ihr zugehöriges Gerät handelt.
Dazu müsste ich die Ableitungen quasi in Schleife durchlaufen. Und da liegt mein Problem. Keine Ahnung obs daran liegt, dass das Wochenende vor der Tür steht, aber ich finde keine annehmbare Lösung.

Mal ein bissl Pseudocode...
Im Endeffekt soll die Funktion folgendes machen:

Delphi-Quellcode:

If Ableitung1.bistdudas( Gerät ) Then
  Ableitung1.Create( Gerät );
Ableitung2.bistdudas( Gerät ) Then
  Ableitung1.Create( Gerät );
Ableitung3.bistdudas( Gerät )Then  
  Ableitung1.Create( Gerät );
Ableitung4.bistdudas( Gerät ) Then
  Ableitung1.Create( Gerät );
usw...

Da das aber ziemlich lang wird und ich nicht für jede neue Ableitung, die in Zukunft hinzukommen könnte jedesmal die Funktion erweitern möchte, würde ich das lieber in der Art machen

Delphi-Quellcode:

For i:= 0 to Ableitungscount -1 Do
  If Ableitung[i]( Basisobjekt ).bistdudas then
    Ableitung[i].Create

Erleuchtet mich