imports verschoben
This commit is contained in:
parent
3832f7b41f
commit
18abacdde1
10
gui.pl
10
gui.pl
@ -1,6 +1,5 @@
|
|||||||
% erstmal nur experimentell, der bums kommt zum schluss
|
:- use_module(library(tabular)).
|
||||||
% falls noch zeit sein sollte jedenfalls
|
:- use_module(library(autowin)).
|
||||||
|
|
||||||
|
|
||||||
% new(@specifier, dialog('windowname'))
|
% new(@specifier, dialog('windowname'))
|
||||||
% send(@specifiert, append(text_item(name)))
|
% send(@specifiert, append(text_item(name)))
|
||||||
@ -10,6 +9,7 @@ window(Name) :-
|
|||||||
send(D, append, button(show, message(@prolog, window3, 'Spielfeld'))),
|
send(D, append, button(show, message(@prolog, window3, 'Spielfeld'))),
|
||||||
send(D, open).
|
send(D, open).
|
||||||
|
|
||||||
|
|
||||||
window2(Name) :-
|
window2(Name) :-
|
||||||
new(D, dialog(Name)),
|
new(D, dialog(Name)),
|
||||||
|
|
||||||
@ -21,10 +21,6 @@ window2(Name) :-
|
|||||||
send(D, open).
|
send(D, open).
|
||||||
|
|
||||||
|
|
||||||
% Specific für window3/1
|
|
||||||
:- use_module(library(tabular)).
|
|
||||||
:- use_module(library(autowin)).
|
|
||||||
|
|
||||||
window3(Name) :-
|
window3(Name) :-
|
||||||
new(P, auto_sized_picture(Name)),
|
new(P, auto_sized_picture(Name)),
|
||||||
send(P, display, new(T, tabular)),
|
send(P, display, new(T, tabular)),
|
||||||
|
Loading…
x
Reference in New Issue
Block a user