我在写一个游戏的刷屏挂,因为这个游戏每次发出的聊天内容要求是于上一句不同的.我想每发一句话.在这句话后面+上1个递增的数字!!
假设窗体上有一个EDIT控件.我想让它的[内容]从1开始,自动+1
应该怎么写??高手来帮帮我啊,想好久了.记住,要是EDIT控件的内容啊,!!!
參考答案:private
{ Private declarations }
i:Integer;
procedure TForm1.tmr1Timer(Sender: TObject);
begin
i:=i+1;
if i>50 then i:=0;
lst1.Items.Add(edt1.Text+inttostr(i));
end;
有需要留个邮箱我给你做一个简单的
