table1.FieldDefs.items[SomeValue].name;

Note:  If you get a "List Index out of bounds" error, it is probably because the TTable object is not active.