Zitat von
Robert_G:
Vor allem ist die Prüfung auf den string des Klassennamens schon ziemlich ... krass.
Während die normale, lesbare und vom Compiler geprüfte Variante (IS Operator) nur eine klitzekleine Operation durchführen muss, ist bei deiner Variante gleich ein ganzer Stringvergleich fällig.
btw: Leitet die TAdsTable nicht von der TTable ab? Oder haben sie nicht einen kleinsten gemeinsamen Vorfahren, der die benötigten Eigenschaften und Methoden mitbringt?
Dann dürfte es doch ziemlich easy sein nur den im Code zu nehmen.
Die haben TDataSet als Vorfahr. Und deshalb sollten die Funktionen dann auch so programmiert werden.
TDataSet->TBDEDataSet->TDBDataSet->TTable
TDataSet->TAdsExtendedDataSet->TAdsTable