Delphi - Problemas con Shell Execute

Hola a todos, tengo el código siguiente pero falla algo... se que el problema es asignar a la ruta del archivo que quiero ejecutar el valor del Caption del Checkbox pero no se como resolverlo, no me ejecuta nada. el código es el siguiente:

----------------------------------------------------

begin
n:=0;
for n:=0 to form1.ComponentCount-1 do
begin
if form1.Components[n].ClassType = TCheckBox then
if (form1.Components[n] as TCheckBox).Checked = true then
shellExecute(form1.Handle, 'open',pchar('form1.Components[n] as TcheckBox).Caption)'),'','', SW_SHOWNORMAL);
end;
end;

----------------------------------------------------

Un saludo,

No estoy muy seguro, pero eme parece que al hacer la conversión a PChar puede que debas quitar las comillas, ya que en este caso te lo tomará como un literal y tratara de convertir a pchar 'form1.Components[n] as TcheckBox).Caption' literalmente (es decir, sin coger el caption realmente). Si no te funciona, pon el tipo de el tipo de error que recibes (si es alguno). Espero haberte sido de utilidad.

Seguro q es ese el error