數據結構
為了對該問題的執行過程進行控制,需將該問題中的主要數據及相應的操作定義成一個線程類。方法:在New菜單中單擊Other選項,在對話框中選Thread object,在classs name中輸線程類的類名。具體定義如下:
type
Tbhh = class(TThread)
private
a:array[1..8,1..8]of integer;
tt:integer;
q,c:Tbitmap;
procedure prt;
function pd(i,j:integer):boolean;
procedure hsu(i:integer);
protected
文章來源于領測軟件測試網 http://www.kjueaiud.com/