![]() |
Como inhabilitar Ctrl+Supr en Rejilla de datos
Como puedo inhabilitar que cuando se teclee Ctrl+Supr en una rejilla de datos no aparezca el mensaje "Delete record?" y que no pueda borrar nada??
He intentado capturar la tecla en el evento onKeyDown de la rejilla y darle un valor nulo, pero no hace nada. procedure TAlbaranes.LineasKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if ( ssCtrl in Shift ) and ( key = VK_DELETE) then // ctrl + Supr begin if ( Albaranes_DM.AlbaranL.FieldByName('ACTUALIZADO').ASString = 'S') then key := 0; end; end; |
No es el grid con el que tienes que impedirlo sino con el dataset asociado (Table, Query, etc). Usa el evento OnBeforeDelete y coloca una excepción para impedir que se borre el registro. Si no deseas que se muestre ningún mensaje puedes usar abort que es una excepción que no muestra ningún mensaje.
// Saludos |
Gracias por tu ayuda, ciertamente era asi como se hacia! :)
|
| La franja horaria es GMT +2. Ahora son las 21:38:53. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi