ShellExecute(Application.Handle, 'open', pChar(listview1.Selected.SubItems[0]), nil, nil, SW_SHOWNORMAL);
listview.Items[i - 1].SubItems[0]
