delphi StringGrid中回车换行

本文整理自网络，侵删。

 if key = vk_return then//设置回车代替tab键
with a do
begin
if Col=(ColCount-FixedCols) then
begin
if Row<(RowCount-FixedRows) then
begin
Row := Row+1;
Col := 1;
end;
if Row=RowCount-FixedRows then
begin
RowCount:=RowCount+1;
Row := Row+1;
Col := 1;
end;
end
else
Col:=Col+1;
end; 

相关阅读 >>

Delphi renamefile 文件改名

Delphi调用游戏call代码

Delphi获取本机mac地址方法

Delphi 取整算法集合

Delphi kmp(字符串匹配)算法

Delphi datetimepicker控件日期格式

Delphi xe 程序瘦身.编译后exe最低90kb

Delphi 校验手机号及身份证号

Delphi 屏幕拷贝程序的源代码

Delphi 的链式代码

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi StringGrid中回车换行