Curioso, pero acabo de realizar la siguiente prueba y funciona correctamente.
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var
s:String;
begin
s:= ListBox1.Items[ListBox1.ItemIndex];
ShellExecute(Handle, 'Open', 'Photoshop',PChar(s) , nil, SW_SHOW);
end;
Un Saludo.