Einzelnen Beitrag anzeigen

Benutzerbild von maximov
maximov

Registriert seit: 2. Okt 2003
Ort: Hamburg
548 Beiträge
 
Delphi 2005 Professional
 
#3

Re: Objeckte mit einem Integer assoziieren

  Alt 14. Jun 2004, 09:20
Zitat von Chakotay1308:
...
aRes := TSaeule(GetEnumValue(TypeInfo(TSaeule), 'S'+IntToStr( {-->} DeinIntegerWert {<---} )));
...
Das kann nicht dein ernst sein Einen integer aufwändig in ein string konvertieren dann die rtti bemühen um den selben integer zurück zu liefern - ist nicht grad effizient:

aRes := TSaele(DeinIntegerWert-1); // -1 für eins-basierten index! so bleibt ein integer ein integer, ob enum oder nicht spielt da keine rollse
mâxîmôv.

{KDT}
  Mit Zitat antworten Zitat