من می خواهم عمل درج رکورد را مستقیما بر روی DBGrid انجام دهم به این صورت که وقتی سلول اول پر شد با زدن Enter به سلول دوم برود و الی آخر . لطفا راهنمایی نمایید چه کدی را برای کلید Enter بنویسم که این کار را انجام دهد . باتشکر :?:
Printable View
من می خواهم عمل درج رکورد را مستقیما بر روی 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;
روش این هست
مرسی
حسن