• Yo tenho un BTNBMP criado pelo Workshop con una image BMP. Gostaria que ao pressionar lo BTNBMP la image contenida redimensionasse para maior ou menor . Seria possible ?

Yo necessito para utilizar em minha funcion DISPLAY, para redimensionamento de tela en qualquer resolucion.

Mas quando redimensiono lo BTNBMP la imagen contenida en lo button non acompanha lo redimensionamento.

Muchas Gracias

William Adami

yo creo que Lo caminho seja Retirar lo Objeto BMP del button , Redimensioná-lo y enton retornar la imagen en lo BTNBMP.

Algun exemplo de como fazer ?

Muchas Gracias

William

Yo resolvi da seguinte forma:

include "fivewin.ch"

function main
local odlg,ob

define dialog odlg resource "DIALOG"

redefine btnbmp ob id 120 of odlg resource "figura" action muda(ob)

activate dialog odlg

return nil

function muda( bt )

o=bt:hbitmap1

o:=resizebmp(o,100,100) // o bmp original era 48 X 48
// vai redimensionar para 100 X 100

bt:hbitmap1:=o
bt:refresh()

return nil

Agora en la funcion DISPLAY posso redimensionar los btnbmp juntamente con la imagene contenida .

Muchas Gracias

William Adami