TBrowseButton
Classe: TBrowseButton
Cria um objeto do tipo botão que não permite foco.
TSrvObject -> TControl -> TButton -> TBrowseButton
#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
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas