Page tree
Skip to end of metadata
Go to start of metadata

Classe: TBrowseButton

Cria um objeto do tipo botão que não permite foco.


TSrvObject -> TControl -> TButton -> TBrowseButton


New

New

Método construtor da classe.


TBrowseButton(): New ( [ nRow], [ nCol], [ cCaption], [ oWnd], [ bAction], [ nWidth], [ nHeight], [ nHelpId], [ oFont], [ lDefault], [ lPixel], [ lDesign], [ cMsg], [ lUpdate], [ bWhen], [ bValid], [ lCancel] ) --> oObjeto


NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.
cCaptionCaracterIndica o título do botão.
oWndObjetoIndica a janela ou controle visual onde o botão será criado.
bActionBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o botão.
nWidthNuméricoIndica a largura em pixels do objeto.
nHeightNuméricoIndica a altura em pixels do objeto.
nHelpIdNuméricoCompatibilidade.
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do título do botão.
lDefaultLógicoCompatibilidade.
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).
lDesignLógicoCompatibilidade.
cMsgCaracterCompatibilidade.
lUpdateLó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.).
bValidBloco de códigoCompatibilidade.
lCancelLógicoCompatibilidade.
    oObjeto(objeto)
  • Retorna o objeto criado.

oTBrowseButton := TBrowseButton():New( 01,01,'TBrowseButton1',oDlg,;                  {||Alert('Clique em TBrowseButton1')},50,10,,,.F.,.T.,.F.,,.F.,,,)

#include "TOTVS.CH"User Function TBrowseButton()  DEFINE DIALOG oDlg TITLE "Exemplo TBrowseButton" FROM 180,180 TO 550,700 PIXEL	    oTBrowseButton1 := TBrowseButton():New( 01,01,'TBrowseButton1',oDlg,;                      {||Alert('Clique em TBrowseButton1')},50,10,,,.F.,.T.,.F.,,.F.,,,)    oTBrowseButton2 := TBrowseButton():New( 20,01,'TBrowseButton2',oDlg,;                      {||Alert('Clique em TBrowseButton2')},50,10,,,.F.,.T.,.F.,,.F.,,,)                           ACTIVATE DIALOG oDlg CENTERED Return

Exemplo da classe TBrowseButton

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

  • No labels