GetScreenRes

GetScreenRes ( ) --> aRet

(vetor)
• Retorna uma matriz com a resolução de tela da estação.

Utilize esta função somente nos programas executados através do Smart Client.

#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local aScreenRes := Nil
Local cMensagem := ""

//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função GetScreenRes                                    |
//+----------------------------------------------------------------------------+  
aScreenRes := GetScreenRes()  
cMensagem += "Horizontal: " + cValToChar(aScreenRes[1]) + CRLF  
cMensagem += "Vertical: " + cValToChar(aScreenRes[2])

//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos                            |
//+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do GetScreenRes")