我用C++ Builder,不会用Delphi。在C++Builder中有个属性设置:GoToNextCellOnEnter=true时,光标能移动到下一列,但如何设置能移动到下一行呢?
解决方案 »
- 北京上班的公司有用xe及xe2的吗?
- delphi TreeView添加节点
- 启动DLL中封装的窗体问题
- delphi如何实现多文档程序的子文档全屏显示啊?
- 请教:我一个朋友买了台 代尔的台式机,可是装系统后出现了问题!
- 长夜漫漫,马上去睡,临睡前看看谁早起了,很久没来顺便散点分~~~
- VC调用Delphi编写的DLL的问题(很急很急,在线等待)
- 如何在同一事务中处理两个表的更新?
- 请问用FastReport打印多表头怎么打??!!!!
- 有谁使用Delphi开发COM组件方面经验比较丰富的,请留下QQ#,以便请教,多谢!!!
- 我的delphi6 vcl组件怎么只有standard 和1stclass两个面板了?
- locate函数的用法。
Shift: TShiftState);
begin
tv1.OptionsData.Editing := False;
if Key = 13 then Key := 40; //往右是39
tv1.OptionsData.Editing := True;
end;
上面的代码,能实现换行功能,但是,在输入时,需要按两次回车键才能实现换行。
WORD &Key, TShiftState Shift)
{
if (Key == VK_RETURN)
{
MoveCursorToNextCell();
SelectCurCells();
}
}
//---------------------------------------------------------------------------void TForm1::MoveCursorToNextCell()
{
// 最后一个单元格,不动
if (TableView->Controller->FocusedRowIndex ==
TableView->DataController->RowCount-1 &&
TableView->Controller->FocusedColumnIndex ==
TableView->ColumnCount-1)
{ }
// 最后一行,到下一列的第一行
else if ( TableView->Controller->FocusedRowIndex ==
TableView->DataController->RowCount-1)
{
TableView->Controller->FocusedRowIndex = 0;
TableView->Controller->FocusedColumnIndex += 1;
}
// 否则,到下一行
else
{
TableView->DataController->FocusedRowIndex =
TableView->DataController->GetFocusedRowIndex()+1;
}
}
//---------------------------------------------------------------------------void TForm1::SelectCurCells()
{
TcxGridColumn *pCol = TableView->Controller->FocusedColumn;
int n = TableView->Controller->FocusedRecordIndex;
TableView->Controller->SelectCells(pCol, pCol, n, n);
}
//---------------------------------------------------------------------------