이벤트라면 델파이 설치할 때 winsight프로그램이 설치가 되는데 그기에서 찾아보시고.. 그런데 ..
왜 사용하실려고 하는지는 몰라도.. 그냥 디비그리드에서 onKeyPress이벤트
에서 하심이..
예)
엔터키로 이동
procedure TForm1.DBGrid1KeyPress(Sender : TObject; var Key: Char);
begin
if Key = #13 then
begin
Key := #0;
with TDBGrid(Sender) do
if Selectedindex < (FieldCount - 1) then
Selectedindex := Selectedindex + 1
else
Selectedindex := 0;
end;
end;
질문의 요지가 좀 이상하네요..
이벤트라면 델파이 설치할 때 winsight프로그램이 설치가 되는데 그기에서 찾아보시고.. 그런데 ..
왜 사용하실려고 하는지는 몰라도.. 그냥 디비그리드에서 onKeyPress이벤트
에서 하심이..
예)
엔터키로 이동
procedure TForm1.DBGrid1KeyPress(Sender : TObject; var Key: Char);
begin
if Key = #13 then
begin
Key := #0;
with TDBGrid(Sender) do
if Selectedindex < (FieldCount - 1) then
Selectedindex := Selectedindex + 1
else
Selectedindex := 0;
end;
end;