Linha Microsiga Protheus

Árvore de páginas


01. VISÃO GERAL

O ponto de entrada o AG615BTN foi desenvolvido para permitir criar novos objetos na tela do Beneficiamento de Fardão.

Localização:

AGRA615A

Programa Fonte:

AGRA615

Função:

AG615BTN

Parâmetros:

Parametro

Tipo

Descrição

Obrigatório

PARAMIXB[1]

Array

Objeto contendo as propriedades da janela que receberá o novo objeto.

NÃO

PARAMIXB[2]ArrayObjeto contendo as dimensões da janela que receberá o novo objeto.NÃO

02. EXEMPLO DE UTILIZAÇÃO


User Function AG615BTN()
    Local oObjTela  := PARAMIXB[1]
    Local oSizeTela := PARAMIXB[2]
    Private oBtn    := NIL

    oBtn  := TButton():New(oSizeTela:aPosObj[1,1] + 65 , oSizeTela:aPosObj[1,2], OemToAnsi("label do botão"), oObjTela, { || U_Função() }, 045, 015,,, .f., .t., .f., , .f.,,, .f. )

Return nil