en una barra de herramientas pon un boton tipo Check que se quede presionado o liberado. Al apretar ese boton, activas una bandera y así puedes controlar la tecla Ctrl.
Código Delphi
[-]
procedure Mousedown(......Shift:TShiftStates);
begin
if Bandera then
Shift := shift + [ssCtrl]
else
Shift := Shift - [ssCtrl];
Si no funciona, puedes acceder al grid, y por código añadir la fila seleccionada con DBGrid.SelectedRows (creo que era así)
Un saludo