Per gestire i pulsanti con BITMAP occorre generare:
Sulla gestione maschere, se un controllo è di tipo "PUSH-BUTTON":
•Aggiiungere spunta "bitmap"
Per ciascun bottone "bitmap" dovrà essere creato dall'utente un file ".BMP" con nome "nome-programma_nomecontrollo"
File .SCR
Aggiungere sui controlli PUSH-BUTTON le righe
bitmap
bitmap-handle handle-bmp-clipot
bitmap-number 1
File .WRK
copy resource "p:\eurocoge\sys\gridsist-btn-su.bmp".
01 handle-bmp-clipot handle of bitmap.
File .PRC
Z-CARICA-BITMAP.
call "W$BITMAP" using wbitmap-load,
"gridsist-btn-su.bmp" GIVING handle-bmp-clipot
.
Z-SCARICA-TUTTO.
call "W$BITMAP" using wbitmap-destroy,
handle-bmp-clipot
.