Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.programming > #1814 > unrolled thread

AWE was updated to version 1.2 ....

Back to article view | Back to comp.programming

Contents

  AWE was updated to version 1.2 .... "aminer" <aminer@videotron.ca> - 2012-06-18 18:45 -0500
    Re: AWE was updated to version 1.2 .... "aminer" <aminer@videotron.ca> - 2012-06-18 18:54 -0500
    Re: AWE was updated to version 1.2 .... "aminer" <aminer@videotron.ca> - 2012-06-18 19:51 -0500
    Re: AWE was updated to version 1.2 .... "aminer" <aminer@videotron.ca> - 2012-06-18 19:57 -0500
    Re: AWE was updated to version 1.2 .... "aminer" <aminer@videotron.ca> - 2012-06-18 22:18 -0500

#1814 — AWE was updated to version 1.2 ....

Hello,


AWE version 1.2 is here, what have changed in version 1.2 ?
now there is no getmem() and freemem() in AWEStream, you have just
to pass the size of the stream to be allocated to the constructor, like 
this:
awe1:=TAWEStream.create(getavailmem*1000);

and you can test after that if your memory was allocated like this:

if awe1.allocated

then writeln('Memory was allocated...')

else writeln('Memory was not allocated...');


I have also added another class called AWEMem , how to use
AWEMem ? when you  want to do a getmem() just call the
constructor by passing the size of the memory to be allocated like this:
awemem:=TAWEMem.create(getavailmem*1000);

and when you want to do a freemem() just call the destructor

like this:

awemem.free



Description:


Why the 2 GB limitation on the Win 32bits systems ?

My AWE object pascal module is here, it allows your application to use up to 
64GB of RAM.
And here is the public interfaces of TAWEMem and TAWEStream classes, i have 
implemented the following methods:

TAWEStream = class(TStream)

public

Memory:pointer;
allocated:boolean;
Size:longword;
position:longword;
PageSize:integer;

constructor Create();
destructor Destroy(); override;

function GetMem(ulBytes: ulong): bool;
function FreeMem(): bool;
function HowManyPagesAllocated(): ulong;
function CopyFrom(in_stream:TStream;count:longint):longint;
function CopyTo(out_stream:TStream;count:longint):longint;
function Read(var Buffer;count:longint):longint;
function Write(const Buffer;count:longint):longint;
procedure LoadFromStream(in_stream: TStream);
procedure LoadFromFile(const FileName: string);
function ToString:string;

published
property TotalMem:int64 read gettotalmem;
property AvailMem:int64 read getavailmem;
property MemLoad:int64 read getmemload;

end;

TAWEMem = class

public

memory:pointer;
allocated:boolean;
Size:longword;
PageSize:integer;

constructor Create(ulBytes: ULONG);
destructor Destroy(); override;
function HowManyPagesAllocated(): ULONG;

end;

Note: To be able to use AWE you have to set the user rights correctly, so, 
go to:

Control Panel -> Administrative tools -> Local Security Policy -> User 
Rights Assignment
and give 'Lock pages in memory' right to the user that wants to use AWE and 
reboot the system..

Every TAWEStream and TAWEMem objects can go up to 4GB , and you can go up to 
64GB of memory !


You can download AWE from:

http://pages.videotron.com/aminer/

And please look at the test examples 'test.pas' and 'test1.pas' inside the 
zipfile - compile and execute them... -

Language: FPC Pascal v2.2.0+ / Delphi 7+: http://www.freepascal.org/

Operating Systems: Windows 2000 and up (x86).

Required FPC switches: -O3 -Sd -dFPC -dWin32 -dFreePascal
-Sd for delphi mode....

Required Delphi switches: -DMSWINDOWS -$H+

For Delphi 5,6,7 use -DDelphi

For Delphi 2005,2006,2007,2009,2010+ use the switch -DDELPHI2005+


Thank you,
Amine Moulay Ramdane.

[toc] | [next] | [standalone]

#1815

Hello,

In AWEMem and AWEStream classes you can access the memory pointer like this:

AWEMem1.memory;

Or

AWEMem1.memory;


So when you do a getmem() like this:

awe1:=TAWEStream.create(getavailmem*1000);

the pointer will be returned in:

awe1.memory.


As you have noticed the AWE interface is very easy to use.


Thank you.
Amine Moulay Ramdane.


"aminer" <aminer@videotron.ca> wrote in message 
news:jrob16$1f5$1@dont-email.me...
>
> Hello,
>
>
> AWE version 1.2 is here, what have changed in version 1.2 ?
> now there is no getmem() and freemem() in AWEStream, you have just
> to pass the size of the stream to be allocated to the constructor, like 
> this:
> awe1:=TAWEStream.create(getavailmem*1000);
>
> and you can test after that if your memory was allocated like this:
>
> if awe1.allocated
>
> then writeln('Memory was allocated...')
>
> else writeln('Memory was not allocated...');
>
>
> I have also added another class called AWEMem , how to use
> AWEMem ? when you  want to do a getmem() just call the
> constructor by passing the size of the memory to be allocated like this:
> awemem:=TAWEMem.create(getavailmem*1000);
>
> and when you want to do a freemem() just call the destructor
>
> like this:
>
> awemem.free
>
>
>
> Description:
>
>
> Why the 2 GB limitation on the Win 32bits systems ?
>
> My AWE object pascal module is here, it allows your application to use up 
> to 64GB of RAM.
> And here is the public interfaces of TAWEMem and TAWEStream classes, i 
> have implemented the following methods:
>
> TAWEStream = class(TStream)
>
> public
>
> Memory:pointer;
> allocated:boolean;
> Size:longword;
> position:longword;
> PageSize:integer;
>
> constructor Create();
> destructor Destroy(); override;
>
> function GetMem(ulBytes: ulong): bool;
> function FreeMem(): bool;
> function HowManyPagesAllocated(): ulong;
> function CopyFrom(in_stream:TStream;count:longint):longint;
> function CopyTo(out_stream:TStream;count:longint):longint;
> function Read(var Buffer;count:longint):longint;
> function Write(const Buffer;count:longint):longint;
> procedure LoadFromStream(in_stream: TStream);
> procedure LoadFromFile(const FileName: string);
> function ToString:string;
>
> published
> property TotalMem:int64 read gettotalmem;
> property AvailMem:int64 read getavailmem;
> property MemLoad:int64 read getmemload;
>
> end;
>
> TAWEMem = class
>
> public
>
> memory:pointer;
> allocated:boolean;
> Size:longword;
> PageSize:integer;
>
> constructor Create(ulBytes: ULONG);
> destructor Destroy(); override;
> function HowManyPagesAllocated(): ULONG;
>
> end;
>
> Note: To be able to use AWE you have to set the user rights correctly, so, 
> go to:
>
> Control Panel -> Administrative tools -> Local Security Policy -> User 
> Rights Assignment
> and give 'Lock pages in memory' right to the user that wants to use AWE 
> and reboot the system..
>
> Every TAWEStream and TAWEMem objects can go up to 4GB , and you can go up 
> to 64GB of memory !
>
>
> You can download AWE from:
>
> http://pages.videotron.com/aminer/
>
> And please look at the test examples 'test.pas' and 'test1.pas' inside the 
> zipfile - compile and execute them... -
>
> Language: FPC Pascal v2.2.0+ / Delphi 7+: http://www.freepascal.org/
>
> Operating Systems: Windows 2000 and up (x86).
>
> Required FPC switches: -O3 -Sd -dFPC -dWin32 -dFreePascal
> -Sd for delphi mode....
>
> Required Delphi switches: -DMSWINDOWS -$H+
>
> For Delphi 5,6,7 use -DDelphi
>
> For Delphi 2005,2006,2007,2009,2010+ use the switch -DDELPHI2005+
>
>
> Thank you,
> Amine Moulay Ramdane.
>
>
>
>
> 

[toc] | [prev] | [next] | [standalone]

#1816

Hello,


AWE was updated to version 1.21


You can download AWE from:

http://pages.videotron.com/aminer/


Thank you.
Amine Moulay Ramdane

"aminer" <aminer@videotron.ca> wrote in message 
news:jrob16$1f5$1@dont-email.me...
>
> Hello,
>
>
> AWE version 1.2 is here, what have changed in version 1.2 ?
> now there is no getmem() and freemem() in AWEStream, you have just
> to pass the size of the stream to be allocated to the constructor, like 
> this:
> awe1:=TAWEStream.create(getavailmem*1000);
>
> and you can test after that if your memory was allocated like this:
>
> if awe1.allocated
>
> then writeln('Memory was allocated...')
>
> else writeln('Memory was not allocated...');
>
>
> I have also added another class called AWEMem , how to use
> AWEMem ? when you  want to do a getmem() just call the
> constructor by passing the size of the memory to be allocated like this:
> awemem:=TAWEMem.create(getavailmem*1000);
>
> and when you want to do a freemem() just call the destructor
>
> like this:
>
> awemem.free
>
>
>
> Description:
>
>
> Why the 2 GB limitation on the Win 32bits systems ?
>
> My AWE object pascal module is here, it allows your application to use up 
> to 64GB of RAM.
> And here is the public interfaces of TAWEMem and TAWEStream classes, i 
> have implemented the following methods:
>
> TAWEStream = class(TStream)
>
> public
>
> Memory:pointer;
> allocated:boolean;
> Size:longword;
> position:longword;
> PageSize:integer;
>
> constructor Create();
> destructor Destroy(); override;
>
> function GetMem(ulBytes: ulong): bool;
> function FreeMem(): bool;
> function HowManyPagesAllocated(): ulong;
> function CopyFrom(in_stream:TStream;count:longint):longint;
> function CopyTo(out_stream:TStream;count:longint):longint;
> function Read(var Buffer;count:longint):longint;
> function Write(const Buffer;count:longint):longint;
> procedure LoadFromStream(in_stream: TStream);
> procedure LoadFromFile(const FileName: string);
> function ToString:string;
>
> published
> property TotalMem:int64 read gettotalmem;
> property AvailMem:int64 read getavailmem;
> property MemLoad:int64 read getmemload;
>
> end;
>
> TAWEMem = class
>
> public
>
> memory:pointer;
> allocated:boolean;
> Size:longword;
> PageSize:integer;
>
> constructor Create(ulBytes: ULONG);
> destructor Destroy(); override;
> function HowManyPagesAllocated(): ULONG;
>
> end;
>
> Note: To be able to use AWE you have to set the user rights correctly, so, 
> go to:
>
> Control Panel -> Administrative tools -> Local Security Policy -> User 
> Rights Assignment
> and give 'Lock pages in memory' right to the user that wants to use AWE 
> and reboot the system..
>
> Every TAWEStream and TAWEMem objects can go up to 4GB , and you can go up 
> to 64GB of memory !
>
>
> You can download AWE from:
>
> http://pages.videotron.com/aminer/
>
> And please look at the test examples 'test.pas' and 'test1.pas' inside the 
> zipfile - compile and execute them... -
>
> Language: FPC Pascal v2.2.0+ / Delphi 7+: http://www.freepascal.org/
>
> Operating Systems: Windows 2000 and up (x86).
>
> Required FPC switches: -O3 -Sd -dFPC -dWin32 -dFreePascal
> -Sd for delphi mode....
>
> Required Delphi switches: -DMSWINDOWS -$H+
>
> For Delphi 5,6,7 use -DDelphi
>
> For Delphi 2005,2006,2007,2009,2010+ use the switch -DDELPHI2005+
>
>
> Thank you,
> Amine Moulay Ramdane.
>
>
>
>
> 

[toc] | [prev] | [next] | [standalone]

#1817

Hello,

What have changed in version 1.21 ?

I have changed the longint with longword in some
methods, cause Every TAWEStream and TAWEMem objects can go up to 4GB  (not 
2GB), and you can go up to 64GB of memory !



Thank you.
Amine Moulay Ramdane.


"aminer" <aminer@videotron.ca> wrote in message 
news:jrob16$1f5$1@dont-email.me...
>
> Hello,
>
>
> AWE version 1.2 is here, what have changed in version 1.2 ?
> now there is no getmem() and freemem() in AWEStream, you have just
> to pass the size of the stream to be allocated to the constructor, like 
> this:
> awe1:=TAWEStream.create(getavailmem*1000);
>
> and you can test after that if your memory was allocated like this:
>
> if awe1.allocated
>
> then writeln('Memory was allocated...')
>
> else writeln('Memory was not allocated...');
>
>
> I have also added another class called AWEMem , how to use
> AWEMem ? when you  want to do a getmem() just call the
> constructor by passing the size of the memory to be allocated like this:
> awemem:=TAWEMem.create(getavailmem*1000);
>
> and when you want to do a freemem() just call the destructor
>
> like this:
>
> awemem.free
>
>
>
> Description:
>
>
> Why the 2 GB limitation on the Win 32bits systems ?
>
> My AWE object pascal module is here, it allows your application to use up 
> to 64GB of RAM.
> And here is the public interfaces of TAWEMem and TAWEStream classes, i 
> have implemented the following methods:
>
> TAWEStream = class(TStream)
>
> public
>
> Memory:pointer;
> allocated:boolean;
> Size:longword;
> position:longword;
> PageSize:integer;
>
> constructor Create();
> destructor Destroy(); override;
>
> function GetMem(ulBytes: ulong): bool;
> function FreeMem(): bool;
> function HowManyPagesAllocated(): ulong;
> function CopyFrom(in_stream:TStream;count:longint):longint;
> function CopyTo(out_stream:TStream;count:longint):longint;
> function Read(var Buffer;count:longint):longint;
> function Write(const Buffer;count:longint):longint;
> procedure LoadFromStream(in_stream: TStream);
> procedure LoadFromFile(const FileName: string);
> function ToString:string;
>
> published
> property TotalMem:int64 read gettotalmem;
> property AvailMem:int64 read getavailmem;
> property MemLoad:int64 read getmemload;
>
> end;
>
> TAWEMem = class
>
> public
>
> memory:pointer;
> allocated:boolean;
> Size:longword;
> PageSize:integer;
>
> constructor Create(ulBytes: ULONG);
> destructor Destroy(); override;
> function HowManyPagesAllocated(): ULONG;
>
> end;
>
> Note: To be able to use AWE you have to set the user rights correctly, so, 
> go to:
>
> Control Panel -> Administrative tools -> Local Security Policy -> User 
> Rights Assignment
> and give 'Lock pages in memory' right to the user that wants to use AWE 
> and reboot the system..
>
> Every TAWEStream and TAWEMem objects can go up to 4GB , and you can go up 
> to 64GB of memory !
>
>
> You can download AWE from:
>
> http://pages.videotron.com/aminer/
>
> And please look at the test examples 'test.pas' and 'test1.pas' inside the 
> zipfile - compile and execute them... -
>
> Language: FPC Pascal v2.2.0+ / Delphi 7+: http://www.freepascal.org/
>
> Operating Systems: Windows 2000 and up (x86).
>
> Required FPC switches: -O3 -Sd -dFPC -dWin32 -dFreePascal
> -Sd for delphi mode....
>
> Required Delphi switches: -DMSWINDOWS -$H+
>
> For Delphi 5,6,7 use -DDelphi
>
> For Delphi 2005,2006,2007,2009,2010+ use the switch -DDELPHI2005+
>
>
> Thank you,
> Amine Moulay Ramdane.
>
>
>
>
> 

[toc] | [prev] | [next] | [standalone]

#1819

Hello,

I have updated AWE to version 1.24

Now every TAWEMem object can go up to 4GB of memory and every TAWEStream can 
go up to 2GB of memory, and you can go up to 64GB of memory.

You can download AWE from:

http://pages.videotron.com/aminer/


Thank you.
Amine Moulay Ramdane.

"aminer" <aminer@videotron.ca> wrote in message 
news:jrob16$1f5$1@dont-email.me...
>
> Hello,
>
>
> AWE version 1.2 is here, what have changed in version 1.2 ?
> now there is no getmem() and freemem() in AWEStream, you have just
> to pass the size of the stream to be allocated to the constructor, like 
> this:
> awe1:=TAWEStream.create(getavailmem*1000);
>
> and you can test after that if your memory was allocated like this:
>
> if awe1.allocated
>
> then writeln('Memory was allocated...')
>
> else writeln('Memory was not allocated...');
>
>
> I have also added another class called AWEMem , how to use
> AWEMem ? when you  want to do a getmem() just call the
> constructor by passing the size of the memory to be allocated like this:
> awemem:=TAWEMem.create(getavailmem*1000);
>
> and when you want to do a freemem() just call the destructor
>
> like this:
>
> awemem.free
>
>
>
> Description:
>
>
> Why the 2 GB limitation on the Win 32bits systems ?
>
> My AWE object pascal module is here, it allows your application to use up 
> to 64GB of RAM.
> And here is the public interfaces of TAWEMem and TAWEStream classes, i 
> have implemented the following methods:
>
> TAWEStream = class(TStream)
>
> public
>
> Memory:pointer;
> allocated:boolean;
> Size:longword;
> position:longword;
> PageSize:integer;
>
> constructor Create();
> destructor Destroy(); override;
>
> function GetMem(ulBytes: ulong): bool;
> function FreeMem(): bool;
> function HowManyPagesAllocated(): ulong;
> function CopyFrom(in_stream:TStream;count:longint):longint;
> function CopyTo(out_stream:TStream;count:longint):longint;
> function Read(var Buffer;count:longint):longint;
> function Write(const Buffer;count:longint):longint;
> procedure LoadFromStream(in_stream: TStream);
> procedure LoadFromFile(const FileName: string);
> function ToString:string;
>
> published
> property TotalMem:int64 read gettotalmem;
> property AvailMem:int64 read getavailmem;
> property MemLoad:int64 read getmemload;
>
> end;
>
> TAWEMem = class
>
> public
>
> memory:pointer;
> allocated:boolean;
> Size:longword;
> PageSize:integer;
>
> constructor Create(ulBytes: ULONG);
> destructor Destroy(); override;
> function HowManyPagesAllocated(): ULONG;
>
> end;
>
> Note: To be able to use AWE you have to set the user rights correctly, so, 
> go to:
>
> Control Panel -> Administrative tools -> Local Security Policy -> User 
> Rights Assignment
> and give 'Lock pages in memory' right to the user that wants to use AWE 
> and reboot the system..
>
> Every TAWEStream and TAWEMem objects can go up to 4GB , and you can go up 
> to 64GB of memory !
>
>
> You can download AWE from:
>
> http://pages.videotron.com/aminer/
>
> And please look at the test examples 'test.pas' and 'test1.pas' inside the 
> zipfile - compile and execute them... -
>
> Language: FPC Pascal v2.2.0+ / Delphi 7+: http://www.freepascal.org/
>
> Operating Systems: Windows 2000 and up (x86).
>
> Required FPC switches: -O3 -Sd -dFPC -dWin32 -dFreePascal
> -Sd for delphi mode....
>
> Required Delphi switches: -DMSWINDOWS -$H+
>
> For Delphi 5,6,7 use -DDelphi
>
> For Delphi 2005,2006,2007,2009,2010+ use the switch -DDELPHI2005+
>
>
> Thank you,
> Amine Moulay Ramdane.
>
>
>
>
> 

[toc] | [prev] | [standalone]

Back to top | Article view | comp.programming

csiph-web