更新时间2019-05-22 07:10:32
var
i,lastline:integer;
begin
lastline:=memo1.Lines.Add('')-1;
你这个应该是Lazarus或delphi的程序
其中的memo1为tmemo控件
memo1.Lines.Add('')表示在memo1中增加一行,并返回最后的号
memo1.Lines.Add('')-1;为行号减1
而最后赋给lastline
因为tmemo的内部是从0开始的,所以lastline就是memo1的实际行数
var
i,lastline:integer;
begin
lastline:=memo1.Lines.Add('')-1;
=========意思是===================
结果 1:
无 功
i, 最后一行: 整数;
开始
最后第: 1。加上 (')-1;
结果 2:
变种
I,lastLine所:整数;
开始
lastLine所:= memo1.Lines.Add( '') - 1;
结果 3:
瓦尔河
I,Lastline:整数;
开始
最后一行:=第1行。