在dbgrid中如何用enter取代tab使光标在列间移动???

解决方案 »

  1.   

    if Key=Chr(VK_RETURN) then begin
             if DBGrid1.SelectedIndex<DBGrid1.Columns.Count-1 then
              DBGrid1.SelectedIndex:=DBGrid1.SelectedIndex+1
             else begin
               if datadm.ADObuliding.RecNo=datadm.ADObuliding.RecordCount then datadm.ADObuliding.AppendRecord([]);
               DBGrid1.SelectedIndex:=0;
               datadm.ADObuliding.Next;
               Abort;
             end;
           end;
      

  2.   

    在FORM中的FormKeyDown事件中:
    CASE KEY OF
    vk_return:key:=vk_tab;
    将FORM中KEYPREVIE设为TRUE
      

  3.   

    在FORM中的FormKeyDown事件中:
    CASE KEY OF
    vk_return:key:=vk_tab;
    将FORM中KEYPREVIEW设为TRUE
      

  4.   

    newcar(newcar) ( ) 的是我用的方法,但我不用增加记录。