在WEBBROWSER的onDocumentComplete执行以下代码: //这里是取得所有的网页链接 Button7.OnClick(nil); //================================ Button7Click(Sender: TObject); var i:integer; begin //开始取得所有页面中的所有链接 //Edit7.Text从0开始; if strtoint(Edit7.Text)<=(ListBox1.Items.Count - 1) then begin ListBox1.Selected[strtoint(Edit7.Text)]:=True; i:=strtoint(Edit7.Text); //Edit7.Text:=inttostr(i 1); Edit8.Text:=ListBox1.Items.Strings[i]; statusbar1.Panels[0].Text:='正在取得[' Edit8.Text '网页上的企业信息链接...'; statusbar1.Update; Edit7.Text:=IntToStr(i 1); Web1.Navigate(ListBox1.Items.Strings[i]); end; end; 问题:Edit7的值会从0到2,4,6,8,10.... 而不会从0到1,2,3,4,5,6,7..... Why?

小弟試了一下, Edit7.Text 是從 0,1,2,3 ... 這樣子累計的 會不會在其它地方變動了 Edit7.Text？ 另外, 貼程式碼的時候, 記得用如下的格式: [code]程式碼[/code] -- 棒球是從兩出局開始的.

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.