1:
2:
3:
4:
5:
6:

procedure TForm1.Button1Click(Sender: TObject);
begin
// showmessage(inttostr(JvImagesViewer1.selectedIndex));
   if JvImagesViewer1.selectedIndex <> -1 then
      JvImagesViewer1.Items[JvImagesViewer1.selectedIndex].Delete;
end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:

type
   TIntegerArr = Array of Integer;

procedure GetSelectedItems(const JvImgViewer: TJvImagesViewer; var ArrRes: TIntegerArr);
var i, c: Integer;
begin
   c := 0;
   // set max length
   SetLength(ArrRes, JvImgViewer.Count);
   for i := 0 to JvImgViewer.Count - 1 do
      // PS: du musst die Unit ComCtrls in deine Uses mit aufnehmen
      if cdsSelected in JvImgViewer.Items[i].State then begin
         ArrRes[c] := i;
         inc(c);
      end;
   // set true length
   SetLength(ArrRes, c);
end;

//...
// Mit folgendem Aufruf bekommst du dann ein Array mit den Indizes der selektierten Items
var SItems: TIntegerArr;
begin
   GetSelectedItems(ImgViewer, SItems);
//...