Ah, eine gute Idee !
Die Klassen haben einen gemeinsamen Vorfahren und es reicht, gegen den zu testen:
Result:=(T is TDriverBase);
Damit sind alle Nachfahren erfaßt und zulässig, alle anderen Klassen wie z.B. TComponent oder TWorkTime (völlig andere
Unit) eliminiert.
Bleibt Problem 1.