In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Clase TSysVer

Foro de Xailer profesional en español
Responder
Alfonso
Mensajes: 33
Registrado: Lun Dic 14, 2020 10:21 am
Ubicación: Santurtzi
Contactar:

Clase TSysVer

Mensaje por Alfonso »

Hola a todos:

He encontrado la clase TSysVer que me devuelve datos del sistema operativo, incluso la RAM del PC.

Necesitaba saber mas datos del equipo, como por ejemplo la memoria RAM usada o la que esta libre, la capacidad del disco duro o la capacidad libre en ese momento, el microprocesador y su velocidad...

¿Existe alguna clase con ese tipo de informacion del PC?

Si no existe, ¿sabeis alguna manera de averiguarlo usando Xailer?

Agradeceria cualquier ejemplo al respecto

Gracias de antemano por la ayuda.
--
Un saludo
Alfonso
Pedro Gil
Mensajes: 112
Registrado: Lun Ene 15, 2007 7:46 pm

Re: Clase TSysVer

Mensaje por Pedro Gil »

Alfonso,

Para saber la memoria física total y disponible, así como la memoria virtual total y disponible, puede usar la siguiente función (modifíquela a sus necesidades):

XA_FUNC( MEMORYSTATUS )
{
MEMORYSTATUSEX memory;

memory.dwLength = sizeof( memory );

GlobalMemoryStatusEx( &memory );

// Memoria física total en KB: memory.ullTotalPhys / 1024
// Memoria física disponible en KB: memory.ullAvailPhys / 1024
// Memoria virtual total en KB: memory.ullTotalVirtual / 1024
// Memoria virtual disponible en KB: memory.ullAvailVirtual / 1024
}

Para saber el espacio total y disponible del disco duro, puede usar la función de harbour HB_DiskSpace. Por ejemplo:

Espacio total del disco actual: HB_DiskSpace( , HB_DISK_TOTAL )
Espacio disponible del disco actual: HB_DiskSpace( , HB_DISK_FREE )

Para saber el tipo de microprocesador y su velocidad, utilice la DATA cSysProcessor de la clase TSysVer modificada y vea si el valor es correcto (tenga en cuenta que es solo una prueba).

Saludos.
Adjuntos
SysVer.rar
(3.24 KiB) Descargado 56 veces
Alfonso
Mensajes: 33
Registrado: Lun Dic 14, 2020 10:21 am
Ubicación: Santurtzi
Contactar:

Re: Clase TSysVer

Mensaje por Alfonso »

Gracias, lo pruebo
--
Un saludo
Alfonso
Responder