String in TFieldType konvertieren

[markus lemcke]

Hallo,

wie kann ich einen String in einen TFieldType umwandeln?

Gruß

Markus

[Frank Reim]

Hi Marcus,<PRE>
AFieldType := TFieldType(GetEnumValue(TypeInfo(TFieldType),'ftSt ring'));
</PRE>
AFieldType vom Typ TFieldType sollte hier den richtigen Wert erhalten. Hab es aber nicht getestet.<BR>
Unit TypInfo muss natürlich in uses...
<BR><BR>Fran

[markus lemcke]

hi frank,

GetEnumValue kennt mein Delphi 5 nicht!

Gruß

Marku

[Frank Reim]

Hi Marcus,<BR><BR>
hast du die Unit TypInfo eingebunden. Es sollte eigentlich auch schon unter Delphi 5 vorhanden sein. Kannst ja mal in den Delphi Sources nach TypInfo.pas suchen. Dort sollte die Funktion GetEnumValue sein.<BR><BR>
Fran

[markus lemcke]

hi frank,

die unit kannte ich noch nicht!
jetzt tut es! danke!

Gruß

Marku

[markus lemcke]

hallo frank,

weißt du auch den weg zurück?
tfieldtype in string?

gruß

marku

[Frank Reim]

Hi,<BR><BR>
klaro...<PRE>
GetEnumName(TypeInfo(TFieldType),Integer(AFieldTyp e));</PRE>
Fran

[markus lemcke]

danke, habe es inzwischen selbst hingefummelt