Classe: TBrowseButton
Cria um objeto do tipo botão que não permite foco.
TSrvObject -> TControl -> TButton -> TBrowseButton
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
| Nome | Tipo | Descrição | Obrigatório | Referência |
| nRow | Numérico | Indica a coordenada vertical em pixels ou caracteres. | ||
| nCol | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | ||
| cCaption | Caracter | Indica o título do botão. | ||
| oWnd | Objeto | Indica a janela ou controle visual onde o botão será criado. | ||
| bAction | Bloco de código | Indica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o botão. | ||
| nWidth | Numérico | Indica a largura em pixels do objeto. | ||
| nHeight | Numérico | Indica a altura em pixels do objeto. | ||
| nHelpId | Numérico | Compatibilidade. | ||
| oFont | Objeto | Indica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do título do botão. | ||
| lDefault | Lógico | Compatibilidade. | ||
| lPixel | Lógico | Indica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.). | ||
| lDesign | Lógico | Compatibilidade. | ||
| cMsg | Caracter | Compatibilidade. | ||
| lUpdate | 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.). | ||
| bValid | Bloco de código | Compatibilidade. | ||
| lCancel | Lógico | Compatibilidade. |
-
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