基于Delphi的“八皇后”问题动态实现[2]
关键字:Delphi组件设置
paintbox1:绘图板,显示当前的合法布局。
Label1:文字标签,显示当前合法布局的序号。
Button1,button2,button3,button4:开始、单幅、连续、退出按纽。
程序清单:
(1)代码单元unit1:
procedure TForm1.Button1Click(Sender: TObject);
begin
dstep:=true;
原文转自:http://www.ltesting.net