pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Disable DEL key in worksheet grid when a cell is protected from being edited.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6845 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-04-13 08:59:45 +00:00
parent af09701e95
commit 7faddb698f
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
components/fpspreadsheet/source/visual/fpspreadsheetgrid.pas
View File

@ -4662,10 +4662,12 @@ begin
VK_F2: VK_F2:
FEnhEditMode := true; FEnhEditMode := true;
VK_DELETE: VK_DELETE:
if (ssCtrl in Shift) then if not FReadOnly then begin
Worksheet.DeleteSelection if (ssCtrl in Shift) then
else Worksheet.DeleteSelection
Worksheet.EraseSelection(true); else
Worksheet.EraseSelection(true);
end;
end; end;
inherited; inherited;