Hi
When you select multiple cells with range select then do CTRL+C and paste it somwhere else, is there any function which is invoked for each cell ??
I have cell tracking done in the OnEditCellDone but thats not working any more...
Regards,
Arthur
The events OnClipboardBeforePasteCell / OnClipboardAfterPasteCell are invoked
That is what I thought will happen but the only event invoked is OnClipboardPaste... but that doesn't give any row \ col properties ...
Code below:
=============================================================
procedure TForm1.FormCreate(Sender: TObject);
begin
with Grid.Navigation do
Begin
AllowClipboardAlways := true;
AllowClipboardShortCuts := true;
AllowRTFClipboard := true;
AllowFmtClipboard := true;
AllowSmartClipboard := True;
End;
Grid.MouseActions.RangeSelectAndEdit := true;
end;
procedure TForm1.GridClipboardAfterPasteCell(Sender: TObject; ACol, ARow: Integer; Value: string);
begin
Debug.Send('OnClipboardAfterPaste');
end;
procedure TForm1.GridClipboardAfterPasteWideCell(Sender: TObject; ACol, ARow: Integer;
Value: WideString);
begin
Debug.Send('OnClipboardAfterPaste');
end;