AdvStringgrid中的回车换列问题(50)

  • 主题发起人 主题发起人 dqlctsoft
  • 开始时间 开始时间
D

dqlctsoft

Unregistered / Unconfirmed
GUEST, unregistred user!
使用AdvStringGrid控件,在输入完数据后,希望能通过回车换为下一列的同行的单元格,(现在的问题是,回车之后,输入焦点不变化)同时完成数据的计算。请告诉我如何完成回车换行工作,数据的重新计算应该写在哪个事件中。
 
不明白你的意思?
 
你要做什么,我也在用这个控件.是要跳格么
 
使用AdvStringGrid控件,在输入完数据后,希望能通过回车换为下一列的同行的单元格,(现在的问题是,回车之后,输入焦点不变化)同时完成数据的计算。请告诉我如何完成回车换行工作,数据的重新计算应该写在哪个事件中。
 
这个很简单。AdvStringGrid应该有个属性来描述某一个单元格。让它获得焦点即可。
 
使用AdvStringGrid控件,在输入完数据后,希望能通过回车换为下一列的同行的单元格,(现在的问题是,回车之后,输入焦点不变化)同时完成数据的计算。请告诉我如何完成回车换行工作,数据的重新计算应该写在哪个事件中。
 
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then begin StringGrid1.Row := StringGrid1.Row+1; StringGrid1.Cells[1,1] := IntToStr(strtointdef(StringGrid1.Cells[1,2],0)+strtointdef(StringGrid1.Cells[1,3],0)); end;end;
 
问题还是没有解决,以后再请教各位吧
 
我的实现了,晚上告诉你怎么做。
 
后退
顶部