Delphi - Tipos de archivo definidos en Windows.

Me gustaría saber si es posible acceder a los tipos de archivo que tiene definido windows, de forma que dependiendo de la extensión que tenga, llame al programa con el que se abre por defecto.
He investigado un poco en el registro de windows, pero aquí creo que no está toda la información que necesito para obtener estos datos.
Bueno, a ver si alguien sabe algo más.
Gracias de antemano.

Si quieres abrir un archivo con su programa asociado usa la funcion shellexecute.
ShellExecute(handle,nil,PChar('filename'),nil,nil,sw_show);
Para que funcione tiene que añadir a las uses ShellApi