说明: 其中的一些代码: procedure TForm1.FormCreate(Sender: TObject); var i:integer; begin historyindex:=-1; historylist:=tstringlist.Create; speedbutton1.Enabled:=false; speedbutton3.Enabled:=false; listbox1.Visible:=false; if fileexists('net.ini') then begin ass
<czw2010> 上传 | 大小:236kb