Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
TBitmap
TBitmap

Classe: TBitmap

Exibe uma imagem no objeto.

TSrvObject -> TControl -> TBitmap


Create

Método construtor da classe.


TBitmap(): Create ( [ oWnd], [ nTop], [ nLeft], [ nWidth], [ nHeight], [ cResName], [ cBmpFile], [ lNoBorder], [ bLClicked], [ bRClicked], [ lScroll], [ lStretch], [ oCursor], [ uParam14], [ uParam15], [ bWhen], [ lPixel], [ bValid], [ uParam19], [ uParam20], [ uParam21] ) --> oObjeto


 

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde a imagem será criada.  
nTopNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
nWidthNuméricoIndica a largura em pixels.  
nHeightNuméricoIndica a altura em pixels.  
cResNameCaracterIndica o nome do imagem.  
cBmpFileCaracterIndica o nome do arquivo.  
lNoBorderLógicoIndica se ativa (.T.)/desativa (.F.) a apresentação da borda.  
bLClickedBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto.  
bRClickedBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto.  
lScrollLógicoIndica se habilita (.T.)/desabilita (.F.) a barra de rolagem.  
lStretchLógicoIndica se ativa (.T.)/desativa (.F.) a extensão da imagem.  
oCursorObjetoIndica o tipo de ponteiro do mouse.  
uParam14CaracterCompatibilidade  
uParam15LógicoCompatibilidade  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.) se o controle permanecer habilitado; caso contrário, retornará falso (.F.).  
lPixelLógicoIndica se as coordenadas em pixels serão utilizadas.  
bValidBloco de códigoIndica o bloco de código que será executado na validação.  
uParam19LógicoCompatibilidade.  
uParam20LógicoCompatibilidade.  
uParam21LógicoCompatibilidade.  

 

oObjeto
    ()
  • Retorna o objeto criado.

oTBitmap := TBitmap():Create(oDlg,01,146,260,184,,"C:\garbage\TOTVS.PNG",.T.,;            {||Alert("Clique em TBitmap1")},,.F.,.F.,,,.F.,,.T.,,.F.)

New

Método construtor da classe.


TBitmap(): New ( [ nTop], [ nLeft], [ nWidth], [ nHeight], [ cResName], [ cBmpFile], [ lNoBorder], [ oWnd], [ bLClicked], [ bRClicked], [ lScroll], [ lStretch], [ oCursor], [ uParam14], [ uParam15], [ bWhen], [ lPixel], [ bValid], [ uParam19], [ uParam20], [ uParam21] ) --> oObjeto


 

NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
nWidthNuméricoIndica a largura em pixels.  
nHeightNuméricoIndica a altura em pixels.  
cResNameCaracterIndica o nome da imagem.  
cBmpFileCaracterIndica o nome do arquivo.  
lNoBorderLógicoIndica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto.  
oWndObjetoIndica a janela ou controle visual onde a imagem será criada.  
bLClickedBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto.  
bRClickedBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto.  
lScrollLógicoIndica se habilita (.T.)/desabilita (.F.) a barra de rolagem.  
lStretchLógicoIndica se ativa (.T.)/desativa (.F.) a extensão da imagem.  
oCursorObjetoIndica o tipo de ponteiro do mouse.  
uParam14CaracterCompatibilidade.  
uParam15LógicoCompatibilidade.  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.), se o controle permanecer habilitado; caso contrário, retornará falso (.F.).  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
bValidBloco de códigoIndica o bloco de código de validação que será executado quando o conteúdo do objeto for modificado. Retorna verdadeiro (.T.), se o conteúdo é válido; caso contrário, falso (.F.).  
uParam19LógicoCompatibilidade.  
uParam20LógicoCompatibilidade.  
uParam21LógicoCompatibilidade.  

 

oObjeto
    ()
  • Retorna o objeto criado.

oTBitmap := TBitmap():New(01,01,260,184,,"C:\garbage\TOTVS.PNG",.T.,oDlg,;            {||Alert("Clique em TBitmap")},,.F.,.F.,,,.F.,,.T.,,.F.)

Load

Define se a imagem será carregada do repositório ou do drive local.


TBitmap(): Load ( [ cResName], [ cBmpFile] ) --> lOk


 

NomeTipoDescriçãoObrigatórioReferência
cResNameCaracterIndica o nome da imagem.  
cBmpFileCaracterIndica o nome do arquivo.  

 

lOk
    (logico)
  • Retorna, verdadeiro (.T.), se a imagem for carregada com sucesso do repositório ou do arquivo físico; caso contrário, retornará falso (.F.).

oTBitmap:Load( , "C:\Dir\TOTVS.PNG" )

SetBmp

Define se a imagem será carregada do repositório.


TBitmap(): SetBmp ( [ cResName] ) --> lOk


 

NomeTipoDescriçãoObrigatórioReferência
cResNameCaracterIndica o nome da imagem no repositório.  

 

lOk
    (logico)
  • Retorna, verdadeiro (.T.), se a imagem existir no repositório e for carregada com sucesso; caso contrário, retornará falso (.F.).

 

 

 


oTBitmap:SetBmp( "A1.PNG" )

SetEmpty

Limpa a imagem.


TBitmap(): SetEmpty ( ) -->


oTBitmap:SetEmpty()

 

PropriedadeDescriçãoTipo
cBmpFileIndica o nome do arquivo.Caracter
cResNameIndica o nome do imagem.Caracter
lAutoSizeIndica se, verdadeiro (.T.), o objeto assumirá o tamanho da imagem definida; caso contrário, falso (.F.).Lógico
lStretchIndica a extensão da imagem.Lógico
lTransparentIndica se a imagem é transparente.Lógico

 


Formato das imagens

Esta classe não suporta imagens no formato BMP (Bitmap) e JPG (Joint Photographic Experts Group) com resolução de 24 bits. Caso haja necessidade de utilizar a resolução de 24 bits, use o formato PNG (Portable Network Graphics).


 

Bloco de código
linenumberstrue
#include "TOTVS.CH"


user function exemplo()


	DEFINE DIALOG oDlg TITLE "Exemplo TBitmap" FROM 180,180 TO 550,700 PIXEL

	// Usando o New


	oTBitmap1 := TBitmap():New(01,01,260,184,,"C:\garbage\TOTVS.PNG",.T.,oDlg,;


		{||Alert("Clique em TBitmap1")},,.F.,.F.,,,.F.,,.T.,,.F.)


	oTBitmap1:lAutoSize := .T.

	// Usando o Create


	oTBitmap2 := TBitmap():Create(oDlg,01,146,260,184,,"C:\garbage\TOTVS.PNG",.T.,;


		{||Alert("Clique em TBitmap1")},,.F.,.F.,,,.F.,,.T.,,.F.)


	oTBitmap2:lAutoSize := .T.

	ACTIVATE DIALOG oDlg CENTERED
Return
Return

 

Exemplo da classe TBitmap

Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server