Comment me passer ou re-écrire la fonction pixmap
Bonjour, j'ai écrit un petit programme il y a deux ans qui ne compile plus avec Gtk3.
Mis a par les détail de mon ignorance, je cherche comment me passer ou re-écrire une fonction "pixmap" pour compiler mon mon code.
Dans mon code donc, j'ai un appelle à pixmap dans un appel de la fonction Draw_Rectangle.
Comme ceci : c'est avec Ada.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
procedure Draw_wopr (Item : access Display_Item_Record'Class) is
begin
Set_Foreground (Green_Gc, Display_Item (Item).Color);
Draw_Rectangle
(Pixmap(Item),
GC => Green_Gc,
Filled => True,
X => 0,
Y => 0,
Width => Item.W,
Height => Item.H);
Set_Foreground (Green_Gc, Black (Get_Default_Colormap));
-- .../...
end Draw_Wopr; |
S'il vous plaît.
Merci pour vos réponses.
