Question

delphi stringgrid滚动到最后一行

stringgrid中保存有100行数据，每次看后面新增加的数据需要用鼠标拉右边的滚动条 ，这样很麻烦。
如何使stringgrid一打开，滚动条就滚到最后一行数据的位置？？

请高手赐教。。谢谢。。

Answer 1

为什么一定要用StringGrid，放着DBGRID不用，还有DBGRIDEH显示数据更优秀。可能是想用delphi StringGrid作数据录入界面，我劝你一句，这是一种最愚蠢的搞法，首先是不能进行快速录入数据，其次是这样做，盯乱裤满版的数据会让用户头昏眼花。
你在表格中输入数据，最终的目凯简的还是想把这些数据保存下来陪改，既然保存，就应该使用DBGRID或者DBGRIDEH。

Answer 2

先设置其焦点：

stringgrid1.focus;
再模拟按下end键：
key_event(VK_END,vk_down);
key_event(VK_END,vk_up);

如果不行的话，可以尝试模拟按下埋团Ctrl+End;
你可以弯歼橘先尝试按下Ctrl+End看是否可以到改历最后再说；

追问

stringgrid1.focus;
key_event(VK_END,vk_down);
key_event(VK_END,vk_up);

请问写在哪个事件中？？

追答

formShow事件中，也就是窗体显示的时候；

当然你如果新增数据后，也要执行以下；