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 concat 字符串函数

Delphi中操作olevariant、variant和stream

Delphi 串口查询所有com口

Delphi 控制鼠标按坐标点击

Delphi整理七（function and procedure）

Delphi 判断操作系统是否是64位的函数

Delphi的窗体文件（dfm）文件中的汉字提取出来？

Delphi获得唯一id字符串

Delphi 合并两个 wav 文件流的函数

Delphi研究之驱动开发篇（四）--使用系统内存堆

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

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