من می خواهم عمل درج رکورد را مستقیما بر روی DBGrid انجام دهم به این صورت که وقتی سلول اول پر شد با زدن Enter به سلول دوم برود و الی آخر . لطفا راهنمایی نمایید چه کدی را برای کلید Enter بنویسم که این کار را انجام دهد . باتشکر :?:
من می خواهم عمل درج رکورد را مستقیما بر روی DBGrid انجام دهم به این صورت که وقتی سلول اول پر شد با زدن Enter به سلول دوم برود و الی آخر . لطفا راهنمایی نمایید چه کدی را برای کلید Enter بنویسم که این کار را انجام دهد . باتشکر :?:
Elhib Component و نظیر آن کلید Enter رو به Tab تبدیل میکنه
جواب سوال شما در این صفحه وجود دارد :
http://delphi.about.com/gi/dynamic/o...5737%2C00.html
این صفحه دیگه نیست این پست ها مال سال 83 هست این را می گذارم اگه کسی راهش مثل من اینجا افتاد بهره ببره
procedure TForm10.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
//if (key=13)then
//begin
//form10.PopupMenu1.Popup(10,10);
//end
if Key=VK_RETURN then
begin
Key := 0;
with TDBGrid(Sender) do
begin
if SelectedIndex < (FieldCount-1) then
SelectedIndex := SelectedIndex+1
else
SelectedIndex := 0;
end;
end;
end;
روش این هست
مرسی
حسن