var ft : TFieldType;
    if s = 'ftString' then ft := ftString
    else if s = 'ftInteger' then ft := ftInteger; ...

TFieldType 是一個集合set，裡面有很多元素，請問有沒有辦法只用一行程式碼依據字串 s 就可以正確設定 ft 代表的元素呢?? 例如 (FindComponent('Edit1') as TEdit).Text := xxxx 可以用 FindComponent 函數來抓出我所想要的物件，但該物件必須已存在。 現在我想要類似的技巧來抓取集合內某元素，請問可以嗎，謝謝！ JackTasy

------
JackTasy

fs := TFieldType(GetEnumValue(TypeInfo(TFieldType),s));

ft := TFieldType(GetEnumValue(TypeInfo(TFieldType),s));

引言: ft := TFieldType(GetEnumValue(TypeInfo(TFieldType),s));

感謝版主指點。 另外請問 GetEnumValue 這函數要 uses 什麼呢?? 無法編譯成功... 這是API 嗎?因為我查不到Help! 謝謝！ JackTasy

找到了，原來是要 uses TypInfo; 可以了，感謝版主！！

------
JackTasy