Swi-Prolog藉助XPCE可視化

第一步:首先需要在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.就會出現對話框啦,別忘了“點”哦,如下圖所示:

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章