FiveTech Software tech support forums

hi,

how to get "Total Memory" and "Available Memory" under Fivewin

have try Memory(1) up to Memory(4) but Value seem not to "match"
have found MemStat() but it show Array in Msgbox() ... how get 3rd Element of Array

... MEMBER Centrado AS BOOL INIT .F. MEMBER DobleAncho AS BOOL INIT .F. MEMBER BorradoTexto AS BOOL INIT .F. MEMBER Negrita AS BOOL INIT .T. ENDSTRUCT memstat(atributosdetexto:cbuffer) Resultado: *************** Memory(0) ............. 2097151 Memory(1) ............. 2097151 Memory(2) ............. ...

... MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Function\memoedit.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Function\memstat.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Function\mimeclip.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Function\msgcalc.prg] ...

...  ?"nExtMem():",nExtMem()    MsgInfo( "Hello world from Harbour and FWH!" )   return nil  memstat.prg #ifdef __CLIPPER__function nExtMem()   local oMemoryStatus   STRUCT oMemoryStatus      MEMBER ...

... How large is the database? 120 records in CUSTOMER max 8 services for each customer = 960 max in SERVICES What RDD are you using? CDX I included MemStat() and changed the records several times in CUSTOMER because I don't have as many SERVICES filled like my customer, I switched between some filled ...

... "Obj\longnam2.obj" "Obj\math.obj" "Obj\mdirec.obj" "Obj\memoedit.obj" "Obj\memstat.obj" "Obj\mimeclip.obj" "Obj\msgcalc.obj" "Obj\msgget.obj" "Obj\msglist.obj" "Obj\msglogo.obj" ...

... Terminal: Raw stream console Harbour 3.2.0dev (Rev. 18859) Windows XP 5.1.2600 Service Pack 3 DS avail=403140KB OS avail=2076536KB EMM avail=0KB MemStat:Off MT:On hbmk2: Processing local make script: hbmk.hbm hbmk2: Linking... pos32.exe c:/fwh/lib/fivehg.lib(GETTASKS.o):GETTASKS.c:(.text+0x180): ...

... LZCopyFile() MakeWin() MapDialogRect() MCIGetErrorString() MCISendCommand() MCISendString() MdiCtrlAdjust() MDIRecEdit() MeasureItem() MemoEdit() MemStat() MenuAddItem() MenuBegin() MenuDrawItem() MenuEnd() MenuMeasureItem() MessageBox() MeterPaint() MGetCreate() MGetLine() MGetReplace() MidiNoteOn() ...

... AS LONG // Available Page File MEMBER m7 AS LONG // Total Virtual MEMBER m8 AS LONG // Available Virtual ENDSTRUCT oMemory:m1 = oMemory:SizeOf() MemStat( oMemory:cBuffer ) DO CASE CASE n=1 ; nRetu:=Round( oMemory:m3 / (1024*1024) ,0 ) CASE n=2 ; nRetu:=Round( oMemory:m4 / (1024*1024) ,0 ) CASE ...

... 'memoedit.prg'... Lines 43, Functions/Procedures 1 Generating C source output to 'memoedit.c'... Done. C:\classes>c:\xharbour\bin\harbour memstat.prg /n /ic:\fwh\include;c:\xharbour\include xHarbour Compiler build 1.1.0 (SimpLex) (Rev. 6195) Copyright 1999-2008, http://www.xharbour.org ...

... - 0021 LONGNAM2 Function - 0022 MATH not found in FIVEH.LIB, not compiling ... Function - 0023 MDIREC Function - 0024 MEMOEDIT Function - 0025 MEMSTAT Function - 0026 MIMECLIP Function - 0027 MSGCALC Function - 0028 MSGGET Function - 0029 MSGLIST Function - 0030 MSGLOGO Function - 0031 MSGMETER ...

... As LONG // Available Page File Member m7 As LONG // Total Virtual Member m8 As LONG // Available Virtual EndStruct oMemory:m1 := oMemory:sizeOf() MemStat( oMemory:cBuffer ) Do Case Case nMem == 1 ; nRetu := Round( oMemory:m3 / ( 1024 * 1024 ), 0 ) Case nMem == 2 ; nRetu := Round( oMemory:m4 / ...

... \ linklist.obj \ listbox.obj \ loadval.obj \ longnam2.obj \ math.obj \ mdichild.obj \ mdiclien.obj \ mdiframe.obj \ mdirec.obj \ memoedit.obj \ memstat.obj \ menu.obj \ menuitem.obj \ meter.obj \ mget.obj \ mimeclip.obj \ mru.obj \ msgbar.obj \ msgcalc.obj \ msgget.obj \ msglist.obj \ msglogo.obj ...

... CODE 0008:66E4 000C0H GOTFOCUS CODE 0008:67A4 0016CH GOTFOCUS CODE 0008:6910 00142H GOTFOCUS CODE 0008:6A52 0008BH GOTFOCUS CODE 0008:6ADE 0017FH MEMSTAT CODE 0008:6C5E 0015FH NEXTMEM CODE 0008:6DBE 0012FH GBLMEMSTAT CODE 0008:6EEE 00276H TMETER CODE 0008:7164 000ECH SET CODE 0008:7250 000C7H ...

... CODE 0008:66E4 000C0H GOTFOCUS CODE 0008:67A4 0016CH GOTFOCUS CODE 0008:6910 00142H GOTFOCUS CODE 0008:6A52 0008BH GOTFOCUS CODE 0008:6ADE 0017FH MEMSTAT CODE 0008:6C5E 0015FH NEXTMEM CODE 0008:6DBE 0012FH GBLMEMSTAT CODE 0008:6EEE 00276H TMETER CODE 0008:7164 000ECH SET CODE 0008:7250 000C7H ...