Bonjour, j'aimerais insérer une image dans un frame en Scheme, est-ce possible ??? Sinon comment faire ????
Merci!!!!!
ps: je dois rendre mon projet ce soir a 18h !!
Bonjour, j'aimerais insérer une image dans un frame en Scheme, est-ce possible ??? Sinon comment faire ????
Merci!!!!!
ps: je dois rendre mon projet ce soir a 18h !!
En scheme std je ne vois pas de fonctions permettant une telle chose...Avec le langage scheme à la PLT par contre c'est faisable.
Perso, je regarderais ici. Ensuite le reste c'est de la combinaison/redéfinition de fonctions par rapport à ce que tu veux exactement insérér.
Voilà, avec un peu de retard une manière d'afficher une image dans un frame dédié :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27 ;; definition du bitmap à afficher (define bmp (make-object bitmap% "e:/fond.gif" 'gif' #f)) ;; Création d'une fenêtre pour afficher ce bitmap (define frame (instantiate frame% ("Affichage de bitmap") (width 300) (height 300))) ;; définition d'une classe dérivée de la classe canvas pour afficher le bitmap (define bitmap-canvas% (class* canvas% () (inherit get-dc) (define/override on-paint (lambda () (send (get-dc) draw-bitmap bmp 0 0))) (super-instantiate ()))) ;; on définit le canvas du frame (define canvas (make-object bitmap-canvas% frame)) ;; on modifie la taille du canvas pour qu'il affiche au moins tout le bmp (send frame min-height (send bmp get-height)) (send frame min-width (send bmp get-width)) ;; on affiche le bmp (send frame show #t)
"La haine seule fait des choix" - Koan Zen
"Il ne faut pas être meilleur que les autres, il faut être meilleur que soi." Albert Jacquard
"Ceux qui savent où ils ont posé leur parapluie ne sont pas alcooliques." - pgibonne.
Faites du Prolog, ça vous changera les idées !
Ma page Prolog
Mes codes sources commentés
Mon avatar : La Madeleine à la veilleuse de Georges de La Tour
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager