Doppelklick auf ListBox Item, danach neues Fenster

[Wheelie]

Ich mache das immer so ...

Delphi-Quellcode:

procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
  Case ListBox1.ItemIndex of
    0: Form2.Show;
    1: Form3.Show;
    2: Form4.Show;
  end;
end;

end.