文件名称:網路象棋程式設計
文件大小:17KB
文件格式:ZIP
更新时间:2009-03-15 02:52:39
控件 游戏编程类 源码 资源
一、 棋盤設計:在範例程式中,棋盤的設計,有兩個部分(使用的與被mark的),主要可以區分為使用winapi的畫線程式,與利用Tshape來畫線,最後筆者採用Tshape元件,可以避免棋盤重劃的問題。主要程式的計算方式為:1. 在Formcreate時,動態產生Tshape元件,程式如下:for i:=1 to 9 dobegin with Tshape.Create(self) do begin parent:=self; name:=‘shapea‘+inttostr(i); end; if not ((i=1) or (i=9)) then begin with Tshape.Create(self) do begin parent:=self; name:=‘shapeb‘+inttostr(i); end; end;end;for i:=1 to 10 do with Tshape.Create(self) do begin parent:=self; name:=‘shapeh‘+inttostr(i); end;
【文件预览】:
chess.res
main.~ddp
main.dcu
main.dfm
main.pas
chess.dof
main.~pas
main.~dfm
chess.dpr
main.ddp
chess.cfg