Classe: TBitmap
Exibe uma imagem no objeto.
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
Nome | Tipo | Descrição | Obrigatório | Referência |
oWnd | Objeto | Indica a janela ou controle visual onde a imagem será criada. | | |
nTop | Numérico | Indica a coordenada vertical em pixels ou caracteres. | | |
nLeft | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | | |
nWidth | Numérico | Indica a largura em pixels. | | |
nHeight | Numérico | Indica a altura em pixels. | | |
cResName | Caracter | Indica o nome do imagem. | | |
cBmpFile | Caracter | Indica o nome do arquivo. | | |
lNoBorder | Lógico | Indica se ativa (.T.)/desativa (.F.) a apresentação da borda. | | |
bLClicked | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto. | | |
bRClicked | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto. | | |
lScroll | Lógico | Indica se habilita (.T.)/desabilita (.F.) a barra de rolagem. | | |
lStretch | Lógico | Indica se ativa (.T.)/desativa (.F.) a extensão da imagem. | | |
oCursor | Objeto | Indica o tipo de ponteiro do mouse. | | |
uParam14 | Caracter | Compatibilidade | | |
uParam15 | Lógico | Compatibilidade | | |
bWhen | Bloco de código | Indica 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.). | | |
lPixel | Lógico | Indica se as coordenadas em pixels serão utilizadas. | | |
bValid | Bloco de código | Indica o bloco de código que será executado na validação. | | |
uParam19 | Lógico | Compatibilidade. | | |
uParam20 | Lógico | Compatibilidade. | | |
uParam21 | Lógico | Compatibilidade. | | |
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
Nome | Tipo | Descrição | Obrigatório | Referência |
nTop | Numérico | Indica a coordenada vertical em pixels ou caracteres. | | |
nLeft | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | | |
nWidth | Numérico | Indica a largura em pixels. | | |
nHeight | Numérico | Indica a altura em pixels. | | |
cResName | Caracter | Indica o nome da imagem. | | |
cBmpFile | Caracter | Indica o nome do arquivo. | | |
lNoBorder | Lógico | Indica se habilita(.T.)/desabilita(.F.) a apresentação da borda no objeto. | | |
oWnd | Objeto | Indica a janela ou controle visual onde a imagem será criada. | | |
bLClicked | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto. | | |
bRClicked | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão direito do mouse, sobre o objeto. | | |
lScroll | Lógico | Indica se habilita (.T.)/desabilita (.F.) a barra de rolagem. | | |
lStretch | Lógico | Indica se ativa (.T.)/desativa (.F.) a extensão da imagem. | | |
oCursor | Objeto | Indica o tipo de ponteiro do mouse. | | |
uParam14 | Caracter | Compatibilidade. | | |
uParam15 | Lógico | Compatibilidade. | | |
bWhen | Bloco de código | Indica 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.). | | |
lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | | |
bValid | Bloco de código | Indica 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.). | | |
uParam19 | Lógico | Compatibilidade. | | |
uParam20 | Lógico | Compatibilidade. | | |
uParam21 | Lógico | Compatibilidade. | | |
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
Nome | Tipo | Descrição | Obrigatório | Referência |
cResName | Caracter | Indica o nome da imagem. | | |
cBmpFile | Caracter | Indica 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
Nome | Tipo | Descrição | Obrigatório | Referência |
cResName | Caracter | Indica 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 (
) -->
Propriedade | Descrição | Tipo |
cBmpFile | Indica o nome do arquivo. | Caracter |
cResName | Indica o nome do imagem. | Caracter |
lAutoSize | Indica se, verdadeiro (.T.), o objeto assumirá o tamanho da imagem definida; caso contrário, falso (.F.). | Lógico |
lStretch | Indica a extensão da imagem. | Lógico |
lTransparent | Indica se a imagem é transparente. | Lógico |
Formato das imagensEsta 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).
#include "TOTVS.CH"User Function TBitmap() 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
Exemplo da classe TBitmap
Microsiga Protheus 8.11
,
Microsiga Protheus 11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
|