第一步:首先需要在Windows下安裝Swi-Prolog.
第二步:點擊File->new創建一個.pl文件,我隨便起了個名叫aa.pl,如下圖所示:
第三步:編寫人工智能代碼,首先導入XPCE的庫文件,然後就可以創建對話框了。
:-use_module(library(pce)).
t1:-new(D,dialog('Demo Fenster')),send(D,open).
t2:-new(D,dialog('Demo Window')),
send(D,append,button(hallo)),
send(D,open).
t3:-new(D,dialog('Demo Window')),
send(D,append,button(hallo,
message(@prolog,wenn_gedrueckt,D))),
send(D,open).
wenn_gedrueckt(D):-send(D,destroy).
t4:-new(D,dialog('Demo Window')),
send(D,append,text_item(hallo,'dummy')),
send(D,open).
t5:-new(D,dialog('Demo Window')),
new(T,text_item(hallo)),
send(D,append,T),
send(T,value,'muss nicht sein'),
send(D,open).
t6:-new(D,dialog('Demo Window')),
new(T,text_item(hallo)),
send(D,append,T),
send(T,value,'dummy'),
send(D,open),
get(T,value,Text),
writeln(Text).
leihengxin:-new(D,dialog('Demo Window')),
new(T,text_item(eingabe)),
send(D,append,T),
send(D,append,button(ok,
message(@prolog,lei,T))),
send(D,append,button(haha,
message(@prolog,ende,D))),
send(D,open).
lei(T):-get(T,value,Text),writeln(Text).
ende(D):-send(D,destroy).
第4步:點擊compile->Make進行編譯,一般來說不出任何提示就是沒問題。
第5步:輸入“t3.”或者t4.或者t5.就會出現對話框啦,別忘了“點”哦,如下圖所示: