procedure TForm1.gridKeyDown(Sender: TObject; var Key: Word;

Shift: TShiftState);

begin

if Key = vk_return then

begin

Key := 0;

with Grid do begin

if Col < ColCount-1 then //다음 column

Col := Col + 1

else if Row < RowCount-1 then //다음 Row

begin

Row := Row + 1;

Col := 1;

end

else

begin //Grid의 끝이면 row 생성

rowcount := rowcount + 1;

row := rowcount - 1;

col := 1;

end;

end;

end;

end;

===================================================

위의소스부분에서 엔터키후 다음셀로의 포커스후 에디트까장 되고...

keydown이아닌 keypress이벤트를하면 다음셀로 포커스만 가짐니다.

키버퍼클리어가 안되는것인지, 참 미치겠습니다..

그리고, 그리드에서 저는 키다운에서는 항목이동을 키프레스에서는 항목입력체크를 할려구하는데 이렇게되면 생각되로 안되는것입니다.

그리드에서 항목이동하면서 입력체크할수 있는 좋은 방법있으면 알려주시면 고맙겠습니다.

저는 언제나 도움을 줄런지........