Solved

Error 96

Posted on 1998-12-01
6
751 Views
Last Modified: 2010-04-16
I get Error 96: Too many variables when I attempt to run my program.  That's not a miss reading it does have a lot, so what i'm wondering is if there is a way around this.  Apparently Pascal allows 64k for global vars, is there a way I can extend this?  

Thanks
0
Comment
Question by:hansell
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 3
6 Comments
 
LVL 5

Accepted Solution

by:
scrapdog earned 70 total points
ID: 1216262
Use memory on the heap.  This is not limited to 64K.  If you have exceeded 64k, you probably have some large arrays.  Declare these arrays dynamically by using pointers.

Here is an example:


type
  TLargeArray = array[0..65519] of byte;
  PLargeArray = ^TLargeArray;

var
  a,b :PLargeArray;
  i :word;

begin
  getmem(a,65520);
  getmem(b,65520);

  for i := 0 to 65519 do begin
    a^[i] := b^[i];
  end;

  freemem(a,65520);
  freemem(b,65520);
end.


Use getmem to allocate memory on the heap.  Then access the array as you would normally, except use the ^ to dereference the pointer.  When you are doing with the memory, make sure you use freemem to free the allocate memory.

Note that in the type declaration, there are two types...however no memory is allocated here.  The PLargeArray indicates that this is a pointer to the type TLargeArray, and when the variables are declared, they are declared as pointers.  If you were to declare these of type TLargeArray, you would run out of memory, because these wouldn't be declared on the heap.
0
 

Author Comment

by:hansell
ID: 1216263
Thanks!  That helps a lot.
0
 

Author Comment

by:hansell
ID: 1216264
I can't seem to get a round an "invalid qualifier" (error 121)  Heres the scenario

For J:=1 To 300 Do
Begin
  ...bla...
  AllocName[I]^[J]:=Data;
  ...bla...
End;

In your example, the AllocName[I] would be like A, and another B, but for my purposes, i'm using an array for that...[I] being the number...I've getmem'd using Getmem(AllocName[I],300); and that works fine, but when i try to access it...as seen in the code, it doesn't work...thoughts?

It's probably something stupid, but i've tried to stay away from pointers, and am pretty new at them


0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 5

Expert Comment

by:scrapdog
ID: 1216265
Did you declare AllocName as an array of pointers to an array of bytes/integers/etc.?

I will have to see your declarations to see what you are doing wrong.
0
 

Author Comment

by:hansell
ID: 1216266
HAHA!  Stupid idiotic mistake.  Yeah, the error was in the declarations, i had it pointing to some records.  All fixed now, THANKS!  I probably never would've thought the error would have been there!
0
 
LVL 5

Expert Comment

by:scrapdog
ID: 1216267
Also, make sure you remember that the second parameter in getmem is the size in bytes, NOT necessarily the number of elements.  (i.e. if you have 100 integers, you would need 200 bytes, etc.)

A good way to do it is to use the sizeof function:

getmem(pointer, n*sizeof(type))

where n is the number of array elements you want, and type is the type.
0

Featured Post

On Demand Webinar: Networking for the Cloud Era

Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this post we will be converting StringData saved within a text file into a hash table. This can be further used in a PowerShell script for replacing settings that are dynamic in nature from environment to environment.
Let’s face it: one of the reasons your organization chose a SaaS solution (whether Microsoft Dynamics 365, Netsuite or SAP) is that it is subscription-based. The upkeep is done. Or so you think.
In this video, viewers are given an introduction to using the Windows 10 Snipping Tool, how to quickly locate it when it's needed and also how make it always available with a single click of a mouse button, by pinning it to the Desktop Task Bar. Int…
Monitoring a network: why having a policy is the best policy? Michael Kulchisky, MCSE, MCSA, MCP, VTSP, VSP, CCSP outlines the enormous benefits of having a policy-based approach when monitoring medium and large networks. Software utilized in this v…

724 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question