Delphi Function to convert enum to string list…?

Question

I\'d like a function that takes an enum and returns a stringlist (or name:value pairs). It must be possible, the Object Inspector and Code Complete seem to do that. The pseu