2017 年 8月 28 日随笔档案 - del88

2017年8月28日

摘要： //如果有这样一个循环, 是非常可怕的; 因为它完不了, 你得等着. procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin for i := 0 to MaxInt do begin Text := IntToSt 阅读全文

posted @ 2017-08-28 18:18 del88 阅读(367) 评论(0) 推荐(0)