var m,i,Len:Integer; begin m:=StrToInt('00405306'); Len:=StrToInt('70'); for I := 0 to Len-1 do begin Memo1.Lines.Add(Format('x=%.8d',[m+i])); end; end;
你的意思是否如下: 1、输入发票的流水起始号和发票张数; 2、DBGrid数据栏栅,显示发票数据; 对此: 1、要求流水号要规范,这样可以通过SQL语句,进行(简单字符)选择; 2、流水号,最好带上日期特征,这样可以选择日期要素,进行选择。 比如:20140808-0001 表示2014年8月8日开具的第1张发票。(-字符可以删除)。 3、如果选择2014年8月8晶8时12分以后,开具的发票: SQL * from 发票表 where 流水号>='20140808-0000'
begin
m:=StrToInt('00405306');
Len:=StrToInt('70');
for I := 0 to Len-1 do
begin
Memo1.Lines.Add(Format('x=%.8d',[m+i]));
end;
end;
1、输入发票的流水起始号和发票张数;
2、DBGrid数据栏栅,显示发票数据;
对此:
1、要求流水号要规范,这样可以通过SQL语句,进行(简单字符)选择;
2、流水号,最好带上日期特征,这样可以选择日期要素,进行选择。
比如:20140808-0001 表示2014年8月8日开具的第1张发票。(-字符可以删除)。
3、如果选择2014年8月8晶8时12分以后,开具的发票:
SQL * from 发票表 where 流水号>='20140808-0000'
请问,能否解释一下这句话的意思?我不是很懂,Format('x=%.8d',[m+i]) 尤其是这个x=%.8d 谢谢http://www.cnblogs.com/mumble/archive/2011/05/25/2056462.html