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

  if not assigend(Listview.ItemFocused) then exit;
  
  case ListView.ItemIndex of
  0 : mache fenster 1 auf
  ..
  5 : mache fenster 6 auf
  end {case}					

1:
2:
3:
4:
5:
6:
7:
8:

case... of

0: begin
       mache fenster auf;
       mache fenster zu;// aber achtung, geht dann sofort zu, und ist nicht sichtbar 
    end;
...
end{case}