Histórico da Página

user function Exemplou_RmtInfo ()
Local aInfoComp:= Nil
aInfoComp := GetRmtInfo()
 
cInfoComp := 'Nome ;
    ">Nome do Computador: "      '    + aInfoComp[ 1] +chr(13)+chr(10)+;
    ">Sistema Operacional:  "     'Sistema Operacional: '   + aInfoComp[ 2] +chr(13)+chr(10)+;
    ">Informação adicional:  "     'Informação adicional: '  + aInfoComp[ 3] +chr(13)+chr(10)+;
    ">Memória Física: "             'Memória: '  +aInfoComp[ 4] +chr(13)+;
    ">Nr. de Processadores: "        + aInfoComp[4 5] +chr(13)+chr(10)+;
    ">MHZ Processador: "        'Nr. de Processadores: '  + aInfoComp[5 6] +chr(13)+;
    ">Descrição Processador: "       +aInfoComp[ 7] +chr(1013)+;
    ">Linguagem: "          'MHZ Processador: '       + aInfoComp[6 8] +chr(13)+;
    ">Navegador (Quando SC HTML): "  +aInfoComp[ 9] +chr(1013)+;
    ">Android ou IOS: "           'Descrição Processador: ' + aInfoComp[710] +chr(13)+chr(10)+;
    ">i386 ou       'Linguagem: 'x86_64: "              + aInfoComp[811] +chr(13)+chr(10)+;
    ">estático ou dinâmico: "        +aInfoComp[12] +chr(13)+;
    ">Pasta do 'Navegador/Marca: 'SmartClient: "        + aInfoComp[9]13] +chr(13)

MsgInfo(cInfoComp)
Return