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中把执行文件内存中的dll的代码全部保存下来

Delphi 批量多个字符串合并一个txt文件

Delphi 2009 查看所有 unicode 字符

Delphi中实现dll文件自动注册

Delphi2007-Delphi2010 程序不出现在任务栏的方法

Delphi xe 提权代码

Delphi实例之一个较复杂的记事本的实现

Delphi删除文件

Delphi 24位真彩色图形转化为ico文件

Delphi读取webbrowse中的图片显示在image中

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

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