On Mon, 22 Sep 2008, Massimo Belgrano wrote:
> How is possible emulate //INFO
> ? HB_GTVERSION(), HB_GTVERSION(1)
> Harbour Terminal: Windows native console
> ? hb_compiler()
> Harbour 1.1.0dev (Rev. 9453)
> ? os()
> Windows Vista 6.0.6001 Service Pack 1
> ? hbbuildinfo(30)
> DS avail=978788KB OS avail=2062008KB EMM avail=0KB MemStat:Off MT:On
#include "hbmemory.ch"
function hb_buildInfo()
return "DS avail=" + ltrim( str( memory( HB_MEM_BLOCK ) ) ) + "KB " + ;
"OS avail=" + ltrim( str( memory( HB_MEM_VM ) ) ) + "KB " + ;
"EMM avail=" + ltrim( str( memory( HB_MEM_EMS ) ) ) + "KB " + ;
"MemStat:" + iif( memory( HB_MEM_USEDMAX ) > 0, "On", "Off" ) + ;
" MT:" + iif( hb_mtvm(), "On", "Off" )
best regards,
Przemek
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
