Hello:
I've got a weird problem with getmem. I have check everything (i think) but i can't get it work. Heaptrc says it's all ok, but when i de-comment the next three lines ( the freemem also ), all fails


     GetMem(sDicc,sizeof(rtBusqBidimen));
     GetMem(ppmv,sizeof(rtMotionVector));
     GetMem(nDicc,sizeof(rtBusqBidimen));

if (sDicc<>nil) AND (nDicc<>nil) AND (ppmv<>nil) then
writeln('MAS MEMORIA PARA VECTORMOTION') // Chequeo de memoria INICIAL
{More Memory for VECTORMOTION //NITIAL memory check}
else begin
......


The sizes are 14,8,14, MemAvail says near 48Mb and MaxAvail 47'5. I tried to put them in the program vars (they are in a function), change the sizeof (which print on screen 14,8,14) to it's values re-type for a misspelling error. Their declartions at var are

nDicc,sDicc       : prtBusqBidimen;  // p= point r= record t= type BusqDimen
ppmv                 : prtMotionVector;  // id. MotionVector

When skip the if (sDicc<>nil)... a runtime error 201 appears

what's the next step??

Any clues??

TIA

Las personas se dividen en tres grupos, los que saben contar y los que no.
     There are three groups of people, who can count, and who cannot.



_______________________________________________
fpc-pascal maillist  -  [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to