Preferência por comando ao invés de construtor de classe

No Microsiga Protheus já existe uma série de comandos criados para facilitar as construções e acesso a classes. Partes desses comandos foram feitos para classes de interface de usuário, como por exemplo:

• TSay;
• TGet;
• MSDialog.

Sempre que possível, dar preferência ao uso do comando ao invés da utilização de construtores ou acesso a métodos, por exemplo para a classe TSay:

// CommandVsConstructor.prw

#INCLUDE "TOTVS.CH"

Function CommandVsConstructor()

Local oDlg  := Nil

Local oSay  := Nil

Define Dialog oDlg Title "Command Vs Constructor" From 0,0 To 300,300 Pixel

// Versão utilizando o construtor

oSay:= TSay():New(      05,   05,          {||"Texto para exibição"},    oDlg, , , , ,;

                                        ,.T., CLR_RED,    CLR_WHITE,                                       200,  20)

// Versão utilizando o comando

@15,05 Say oSay Prompt "Texto para exibição" Of oDlg Pixel Colors CLR_RED,CLR_WHITE Size 200,20

Activate Dialog oDlg Centered

Return