Selektion ändern beim loslassen der maustaste

hallo,
ich würde gerne DragAndDrop mit einer TStringList realisieren.
Ein Proble, dass ich jetzt noch habe ist, dass wenn ich (mittels Shift) mehrere Einträge angewählt habe. Alle sofort wieder abgewählt werden (und ein neuer angewählt), wenn ich die Maustaste runterdrücke und versuche sie zu ziehen.

Wie könnte ich es also schaffen, dass die Selektion erst geändert werden soll, wenn ich die Maustaste loslasse, und nicht wenn ich sie herunterdrücke

Christian411

ich würde gerne DragAndDrop mit einer TStringList realisieren.

Wie sollte das gehen?? TStringList ist eine NICHTvisuelle Komponente

ups ich meinte TStringGrid.
Diese komponenten haben alle so griffige Namen