PLATFORM PROPERTIES

4D - Documentation   Français   English   German   Español   English   4D v11 SQL, Comandos por temas   4D v11 SQL, Lista alfabética de comandos   4D v11 SQL, Constantes por temas   Regresar   Anterior   Siguiente

versión 11 (Modificado)


PLATFORM PROPERTIES (plataforma{; sistema{; procesador{; lenguaje}}})

ParámetroTipoDescripción
plataformaNumérico2 = Mac OS, 3 = Windows
sistemaNuméricoDepende de la versión que utilice
procesadorNuméricoFamilia del procesador
lenguajeNuméricoDepende del sistema que utilice

Descripción

El comando PLATFORM PROPERTIES devuelve información sobre el tipo de sistema operativo que está utilizando, la versión y el lenguaje del sistema operativo, como también el procesado instalado en su equipo.

PLATFORM PROPERTIES devuelve la información en los parámetros plataforma, sistema, procesador y lenguaje.

plataforma indica el sistema operativo utilizado. Este parámetro devuelve una de las siguientes constantes predefinidas:

ConstanteTipoValor
Mac OSEntero largo2
WindowsEntero largo3

La información devuelta en sistema depende de la versión de 4D que utilice.

Versión Macintosh

Si está corriendo una versión Mac OS de 4D, el parámetro sistema devuelve un valor de 32 bits (Entero largo), en el cual la palabra de nivel más alto no se utiliza y la palabra de nivel más bajo se estructura de esta forma:

- El byte superior contiene el número de versión principal,

- El byte inferior está compuesto de dos cuartetos o nibbles (conjuntos de 4 bits). El nivel superior es el número de actualización principal y el nibble inferior el número de actualización secundaria. Ejemplo: el sistema 9.0.4 está codificado como $0904, de manera usted reciba el valor decimal 2308.

Nota: En 4D, puede extraer estos valores utilizando los operadores numéricos % (módulo) y \ (división entera) o los Bitwise operators.

Utilice la siguiente fórmula para conocer el número de versión principal de Mac OS:

   PLATFORM PROPERTIES($vlPlataforma;$vlSistema)
   $vlResult:=$vlSistema\256
      `If $vlResult = 8  --> usted está bajo Mac OS 8.x
      `If $vlResult = 9  --> usted está bajo Mac OS 9.x
      `If $vlResult = 16  --> usted está bajo Mac OS 10.x

Versión Windows

Si está corriendo una versión Windows de 4D, el parámetro sistema devuelve un valor 32 bits (Entero largo), los bits y los bytes están estructurados así:

Si el bit superior vale 0, significa que usted está utilizando Windows NT, Windows 2000, Windows XP o Windows Vista. Si el bit vale 1, significa que está utilizando Windows 95 o Windows 98 (ambos obsoletos).

Nota: El bit superior determina el signo del valor Entero largo. Por lo tanto, en 4D, sólo necesita probar el signo del valor; si es positivo usted está bajo Windows NT, Windows 2000, Windows XP o Windows Vista. Igualmente puede utilizar Bitwise operators.

El octeto inferior da el número de versión principal de Windows. Si devuelve 4, usted utiliza Windows 95, 98 o Windows NT 4. Si devuelve 5, usted utiliza Windows 2000 o Windows XP (en ambos casos, el signo del valor indica si usted utiliza Windows NT/2000 o no). Si devuelve 6, usted utiliza Windows Vista.

El octeto inferior siguiente da el número de versión secundaria de Windows. Bajo Windows 95, este valor es 0.

Nota: En 4D, puede extraer estos valores utilizando los operadores numéricos % (módulo) y \ (división entera) o los Bitwise operators.

El parámetro procesador indica la "familia" del microprocesador del equipo. Pueden devolverse dos valores, disponibles en forma de constantes:

ConstanteTipoValor
Intel CompatibleEntero largo 586
Power PCEntero largo 406

La combinación de los parámetros plataforma y procesador puede utilizarse por ejemplo para conocer sin ambigüedad si el equipo utilizado es de tipo "MacIntel" (plataforma=Mac OS y procesador=Compatible Intel).

El parámetro lenguaje se utiliza para conocer el lenguaje actual del sistema en el cual se ejecuta la base. Esta es una lista de códigos que pueden devolverse en este parámetro, así como su significado:

CódigoLenguaje
1Árabe
2Búlgaro
3Catalán
4Chino
5Checo
6Danés
7Alemán
8Griego
9Inglés
10Español
11Finlandés
12Francés
13Hebreo
14Húngaro
15Islandés
16Italiano
17Japonés
18Coreano
19Holandés
20Noruego
21Polonia
22Portugués
24Rumano
25Ruso
26Croata
26Serbio
27Esloveno
28Albanés
29Suizo
30Tailandés
31Turco
33Indonesio
34Ucraniano
35Bielarruso
36Esloveno
37Estonio
38Latvio
39Lituania
41Farsi
42Vietnamés
45Vasco
54Africano
56Feroés

Nota: Si comando no puede identificar el lenguaje del sistema, se devuelve el valor 9 (inglés).

Ejemplo

El siguiente método de proyecto muestra una caja de diálogo de alerta describiendo el sistema operativo que usted está utilizando:

      ` Método de proyecto SHOW OS VERSION

   PLATFORM PROPERTIES($vlPlataforma;$vlSistema;$vlEquipo)
   If (($vlPlataforma<2) | ($vlPlataforma>3))
      $vsPlataformaOS:=""
   Else 
      If ($vlPlataforma=Windows)
         $vsPlataformaOS:=""
         If ($vlSistema<0)
            $winMajVers:=((2^31)+$vlSistema)%256
            $winMinVers:=(((2^31)+$vlSistema)\256)%256
            If ($winMinVers=0)
               $vsPlatformOS:="Windows™ 95"
            Else
               $vsPlatformOS:="Windows™ 98"
            End if
         Else 
            $winMajVers:=$vlSistema%256
            $winMinVers:=($vlSistema\256)%256
            Case of
               : ($winMajVers=4)
                  $vsPlatformOS:="Windows™ NT"
               : ($winMajVers=5)
                  If ($winMinVers=0)
                     $vsPlataformaOS:="Windows™ 2000"
                  Else
                     $vsPlataformaOS:="Windows™ XP"
                  End if
               : ($winMajVers=6)
                  $vsPlataformaOS:="Windows™ Vista"

            End case
         End if 
         $vsPlataformaOS:=$vsPlataformaOS+" versión "+String($winMajVers)+"."+String($winMinVers)
      Else 
         $vsPlataformaOS:="Mac OS™ versión "
         If (($vlSistema\256) = 16)
            $vsPlataformaOS:=$vsPlataformaOS+"10"
         Else
            $vsPlataformaOS:=$vsPlataformaOS+String($vlSistema\256)
         End if
         $vsPlataformaOS:=$vsPlataformaOS+"."+String(($vlSistema\16)%16)+(("."+String($vlSistema%16))
                                                *Num(($vlSistema%16) # 0))
      End if 
   End if 
   ALERT($vsPlataformaOS)

En Windows, obtiene una caja de diálogo similar a esta:

En Macintosh, obtiene una caja de diálogo similar a esta:

Ver también

Operadores de bits.


4D - Documentation   Français   English   German   Español   English   4D v11 SQL, Comandos por temas   4D v11 SQL, Lista alfabética de comandos   4D v11 SQL, Constantes por temas   Regresar   Anterior   Siguiente