<ruby id="5koa6"></ruby>

<ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

欄目導航: 軟件測試技術　軟件測試工具　開源軟件測試技術　軟件測試開發技術　軟件質量保證　領測軟件測試網服務　軟件測試專題與軟件測試期刊　軟件測試工程師職業發展　軟件測試業界新聞　領測軟件測試網活動發布　

您的位置：軟件測試技術門戶 >> 軟件測試技術 >> 軟件測試開發技術 >> 軟件測試開發語言 >> 查看資訊

字號: 小中大 | 推薦給好友上一篇 | 下一篇

基于Delphi的“八皇后”問題動態實現[1]

發布: 2008-5-20 09:54 | 作者: 不詳 | 來源: csai | 查看: 24次 | 進入軟件測試論壇討論

　then begin if j1=j then pd:=false else if abs(i1-i)=abs(j1-j)then pd:=false end
　end
end;
　　棋盤與棋子的圖片（需要用畫圖程序作出）、生成、裝入及顯示過程如下：

procedure TForm1.PaintBox1Click(Sender: TObject);