Hallo Peter,
du könntest das MouseDown-Ereignis auswerten:
Delphi-Quellcode:
procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
IF (ssDouble in Shift) THEN
ShowMessage ('Hallo Peter!');
end;
Es wird allerdings
zusätzlich zum DblClick-Ereignis ausgelöst.
Gruß Hawkeye