Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle
GetScreenRes
GetScreenRes

Portuguese

Recupera a resolução de tela da estação de trabalho.

Nota

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

Inclusão de trecho
SmartClient
SmartClient
nopaneltrue
.


Sintaxe

Bloco de código
languagenone
aScreenRes := getScreenRes()

Retorno


TipoDescrição
aScreenRes
array

A resolução de tela da estação de trabalho.

(aviso) Em builds anteriores a 7.00.120420A, a função retorna um array de duas posições com a resolução horizontal e vertical.

(informação) Em builds superiores a 7.00.120420A, a função retorna um array de três posições com a resolução horizontal e vertical do monitor principal e um array de arrays com as posições horizontal e vertical de cada um dos monitores existentes. O terceiro elemento do retorno da função preenche a resolução de cada um dos monitores de acordo com a ordem definida no sistema operacional.

(aviso) No Smartclient Webapp retornará apenas as informações do monitor principal.

Observações

Para uma estação de trabalho com dois monitores de resolução 1280 x 1024.

  • Em builds anteriores a 7.00.120420A, a função retorna o array:

    Sem Formato
     -> ARRAY (    2) [...]
         [1] -> N (   15) [      2560.0000]
         [2] -> N (   15) [      1024.0000]
  • Em builds superiores a 7.00.120420A, a função retorna o array:

    Sem Formato
     -> ARRAY (    3) [...]
         [1] -> N (   15) [      1280.0000]
         [2] -> N (   15) [      1024.0000]
         [3] -> ARRAY (    2) [...]
    

Função: GetScreenRes

Retorna uma matriz com a resolução de tela da estação.

GetScreenRes ( ) --> aRet

    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 := NilLocal cMensagem := ""//+----------------------------------------------------------------------------+//|Exemplifica o uso da função GetScreenRes
  •           [3][1] -> ARRAY (    2) [...]
                   
|//+----------------------------------------------------------------------------+ aScreenRes := GetScreenRes() cMensagem += "Horizontal: " + cValToChar(aScreenRes[1]) + CRLF cMensagem += "Vertical: " + cValToChar(aScreenRes[2])//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos
  • [3][1][1] -> N (   15) [      1280.0000]
                   [3][1][2] -> N (   15) [      1024.0000]
              [3][2] -> ARRAY (    2) [...]
                   [3][2][1] -> N (   15) [      1280.0000]
                   
|//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do GetScreenRes")
Exemplo da função GetScreenRes
Image Removed
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
  • [3][2][2] -> N (   15) [      1024.0000]

Exemplo

Bloco de código
user function exemplo()
local aScreens := getScreenRes()
  msginfo(cValToChar(aScreens[1])+"x"+cValToChar(aScreens[2]), "getScreenRes()")
return