RonnyH

uses ClipBrd;



procedure TForm1.Button1Click(Sender: TObject);

var

I,J: Integer;

pLine, pCompleteText: string;

const

delimiter = ',';

begin

for I := 0 to NextGrid1.RowCount-1 do begin

pLine := '';

for J := 0 to NextGrid1.Columns.Count-1 do begin

	 pLine := pLine + NextGrid1.Cell[J, I].AsString + delimiter;

end;

pCompleteText := pCompleteText + pLine + #13#10;

end;

Clipboard.Clear;

Clipboard.AsText := pCompleteText;

end;

Hi. I was not sure where I should insert the command. Is the problem already solved?

Exactly what I wanted

This problem has always annoyed me. I would like to jump in edit mode with the home button at the top of the cell, but jump on the first line.
I have a suggestion for solving this problem:

in file NxDBGrid.pas:

	 VK_HOME: SendMessage(Handle, WM_VSCROLL, SB_TOP, 0);
	 VK_END: SendMessage(Handle, WM_VSCROLL, SB_BOTTOM, 0);

change to

	 VK_HOME:
	 begin
		 if not FDataLink.Editing then SendMessage(Handle, WM_VSCROLL, SB_TOP, 0);
	 end;
	 VK_END:
	 begin
		 if not FDataLink.Editing then SendMessage(Handle, WM_VSCROLL, SB_BOTTOM, 0);
	 end

Please boki, you can change the source code or insert another option like "goAlternatePosKey"?