[Decoding]

У меня сработало вот так:

Код:

 
ShellExecute( Form1.Handle, 'open', PChar( ListBox1.Items.Strings[ListBox1.ItemIndex] ), nil, nil, SW_SHOWNORMAL );