Access to Ram

[delphi77]

درود بر همه شما جویندگان دانش
از توجه شما نسبت به این موضوع سپاس گزارم

چگونه مقدار ram را یافته؟ چگونه به خانه های آن دسترسی بیابیم؟------------------------------------------------------------------------------------------------
من تاج نمی خواهم من تخت نمی خواهم
در خدمتت افتادن بر روی زمین خواهم

[hps]

یعنى چى مقدار RAM رو پیدا کنیم ؟

اگه مى‌خواى به یه خونه از خاص از حافظه دسترسى پیدا کنى باید یه Pointer به اون آدرس درست کنى.

[delphi77]

درود بر همه شما جویندگان دانش
از توجه شما نسبت به این موضوع سپاس گزارم

ببینید من می خواهم Ram سیستم را بشمارم یعنی روی سیستم من Ram256 نصب شده پس برنامه باید 265 را نشان دهد و ..
و بعد می خواهم به خانه های آن دسترسی بیابم یعنی به خانه های فضای Heap سیستم. مثلا خانه 100 از Heap را بخوانم یا تغییر دهم. اگر مطمئن هستید که با اشارهگر می توان این کار را انجام داد لطفا آن کد را بنویسید
------------------------------------------------------------------------------------------------
من تاج نمی خواهم من تخت نمی خواهم
در خدمتت افتادن بر روی زمین خواهم

[hps]

براى گرفتن کل حافظه موجود و حافظه باقى مونده باید از تابع GlobalMemoryStatus استفاده کنى. این تابع خیلى کلیه و جزئیات زیادى هم داره مى‌تونى تو راهنماى Win32 Programmer's Refrence مطالعه کنى. در ضمن نمى‌تونى به هر آدرسى از Heap که خواستى دسترسى پیدا کنى، چون سیستم عامل محدودیت‌هایى رو براى دسترسى به حافظه داره و با خطاى Access Violation مواجه مى‌شى. اون کد هم خیلى ساده‌است.

<span dir=ltr>var
Start, Count: Cardinal;
Ptr: ^Byte;
Str: AnsiString;
begin
Start := {Start address}
Count := {Number of bytes}
Ptr := Pointer(Start);
while Cardinal(Ptr) &lt; Start + Count do
begin
Str := Format('%p: %.2d', [Ptr, Ptr^]);
{Show string value}
Inc(Ptr);
end;
end;</span>

[delphi77]

درود بر همه شما جویندگان دانش
از توجه شما نسبت به این موضوع سپاس گزارم

اگر ممکن است توضیح بیشتری ارائه بفرمایید
------------------------------------------------------------------------------------------------
من تاج نمی خواهم من تخت نمی خواهم
در خدمتت افتادن بر روی زمین خواهم

[Inprise]

می خواهم به خانه های آن دسترسی بیابم یعنی به خانه های فضای Heap سیستم. مثلا خانه 100 از Heap را بخوانم یا تغییر دهم. اگر مطمئن هستید که با اشارهگر می توان این کار را انجام داد لطفا آن کد را بنویسید

<span dir=ltr>probably your meaning is you wanna Browse your own Process Heap . if i'm Right MSDNize this Function : GetProcessHeap</span>

[vcldeveloper]

ببخشید Off Topic میزنم:


probably your meaning is you wanna Browse your own Process Heap . if i'm Right MSDNize this Function : GetProcessHeap

آقای Inprise چطور شده که توی سایت برنامه نویس به زبان شیرین انگلیسی روی آوردید؟ :wink:
راستی MSDNize کلمه باحالی بود، مرسی :flower:

[delphi77]

کماکان مشکل من پا برجاست!