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

tvplanit: Add "check/uncheck all" checkbox to header of the grid in the import preview form.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8399 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-08-19 21:32:56 +00:00
parent a430be7bcf
commit 2062b0bb22
6 changed files with 167 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/tvplanit/source/vpimportpreview_icalevent.pas
View File

@ -65,8 +65,10 @@ begin
if ARow < Grid.FixedRows then
exit;
item := TVpICalEntry(FItems[ARow - Grid.FixedRows]);
if item <> nil then
if item <> nil then begin
item.Checked := AChecked;
inherited;
end;
end;
function TVpImportPreviewICalEventForm.GetCellText(ACol, ARow: Integer): String;