Jump to content


bgf0411

Member Since 04 May 2010
Offline Last Active May 09 2013 08:31 AM
-----

Topics I've Started

PasteFromClipBoard problem

09 May 2013 - 08:31 AM

TNextSheet.PasteFromClipBoard
if the ClipBoard data is last data can make some problem,I modify the NxSheet.pas

If (Buffer[i] = #$D) and (Buffer[i+1] = #$A) then
begin
// The row is incremented and the collumn reset.
// if Buffer[i+2] <>#0 then
// begin
ARow := ARow + 1;
ACol := RefCol;
If (ACol <= ColCount - 1) and (ARow <= RowCount - 1) then
TryToEdit(ACol, ARow, ''); // The current cell is cleared
end;
end;//
end;

example
col=2
row=3
if i copy cells[0,1] data past to cells[0,2] , the result cells[0,3] is null?