Tcombobox = Type = Tcombobox

Amigos, estou carregando umas informação tipo Type em um combobox agora quero que a informação do combobox pase para um Type;

Será que alguem poderia ajudar???

valeu...