... oDialog NOWAIT CENTERED ; ON INIT oGif := TGif( oDialog, "meter.gif", 0,0,,,,, bAcao ) Return Função: Sem utilizar o codblock da classe executando diretamente o codbloc passado como parâmetro Local oDialog, oGif DEFINE DIALOG oDialog NAME "Executar_Acao" TRANSPARENT COLOR CLR_BLACK, ...