Dúvida sobre BTNBMP

[Wellington Vieira]

Boa tarde,

Eu uso para apresentar na tela as categorias e produtos com imagens, essas imagens tem a resolução de 79 X 75 pixels, e utilizo para isso o BTNBMP, gostaria de saber se possível se eu aumentar a resolução da imagem e apresentar no BTNBMP com alguma opção de adjust, para ajustar a imagem ao botão. Existe essa opção para o BTNBMP, como tem para o image ?

Obrigado.

[kapiaba]

Num intindi a questão muito bem, seria isso?

#include "FiveWin.ch"
	//----------------------------------------------------------------------------//
	function Main()
	   local oBru, oDlg, oBtn
	   DEFINE BRUSH oBru FILENAME "../bitmaps/Backgrnd/beach.bmp"
	   DEFINE DIALOG oDlg SIZE 400, 200 BRUSH oBru TRANSPARENT
	   @ 2, 2 SAY "Hello" OF oDlg
   oDlg:aControls[ 1 ]:lTransparent = .t.
	   @ 70, 80 BTNBMP oBtn FILENAME "../bitmaps/yes.bmp" ;
      SIZE 50, 30 OF oDlg NOBORDER ACTION MsgInfo( "click" ) ADJUST
      
   oBtn:lTransparent = .T.   
      
   ACTIVATE DIALOG oDlg CENTERED
	return nil

[Wellington Vieira]

Seria o seguinte.

O meu botão tem a seguinte sintaxe:
                @ 024,005 BTNBMP obotaogrupo01 center size 039,037 font obotaof noborder of barRestaurante pixel 
                O tamanho deste botão é de 39X37 ( size ).
As minhas imagens tem hoje 79 X 75 pixels, quando carrego a imagem no botão acima, ela funciona perfeitamente,
               obotaogrupo01:SetFile("cerveja.bmp")

 

O que eu queria era carregar uma imagem de 200 X 176 pixels, no botão  obotaogrupo01, e que ele se ajustasse ao tamanho do botão que é de 039,037 (size).

Eu tentei colocar na sintaxe do comando a opção ADJUST, mas ele não mostra a imagem ajustada ao botão, na realidade não mostra a imagem.

Seria isso,

Obrigado.

 

 

[kapiaba]

Não sei se BTNMP ou BITMAP, tem comando abaixo, só testando. Com o comando IMAGE eu sei q tem.

	 oImagem:lStretch := ( .T. )
	

[kapiaba]

Eu acho que aqui, pode matar sua "charada". Eu acho... abs.

 

 

[Wellington Vieira]

Obrigado. resolvido