Cómo crear una Ventana con una Imagen con Lenguaje Prolog en SWI-Prolog.
- Obtener enlace
- X
- Correo electrónico
- Otras aplicaciones
Cómo crear una Ventana con una Imagen con Lenguaje Prolog en SWI-Prolog.
Podemos insertar objetos como imagenes en SWI-Prolog, aquí te enseño como.
Abrimos SWI-Prolog.
Código del Proyecto.
%llamamos a nuestra libreria
:- use_module(library(pce)).
%Usamos libreria para imagenes
:- pce_image_directory('.').
%llamamos a nuestro recursos que esta en la misma carpeta
%resourse para marca el recurso
%fondo = nombre que le vamos a dar al objeto
%image = tipo de recurso
%image('') = La ruta de la imagen
resource(fondo, image, image('IN.jpg')).
%ahora la vamos a convertir en a mapa de bits
%nueva_imagen = nombre con que lo vamos a llamar
%Ventana = nombre de la ventana donde se va a insertar
%Imagen = nombre de la imagen
nueva_imagen(Ventana,Imagen):-
new(Figura, figure),
new(Bitmap, bitmap(resource(Imagen),@on)),
send(Bitmap, name, 1),
send(Figura, display, Bitmap),
send(Figura, status, 1),
send(Ventana, display, Figura, point(0,0)).
%Con el atributo point controlamos en donde va a aparecer la imagen
%creamos nuestra venta
:-new(Ventana, dialog('Ventana Principal')),
%aquí llamamos a la clausula que hemos creados
%damos el valor de la ventana y el resurso de fondo
nueva_imagen(Ventana,fondo),
send(Ventana, open).
Archivos del Proyecto.
- Obtener enlace
- X
- Correo electrónico
- Otras aplicaciones
Comentarios
Publicar un comentario