PDA

View Full Version : نحوه تعریف یک اشاره گر به آرایه



شبیر کریمی
یک شنبه 06 دی 1388, 12:15 عصر
سلام
چطور میشه اشاره گری رو تعریف کرد که به یه آرایه اشاره میکنه؟
من این کد رو نوشتم ولی وقتی میخوام از طریق اشاره گر به عناصر آرایه مقدار بدم خطا میده

type
arr=array[0..10] of integer;
apointer=^arr;
var
myarray:arr;
mypointer:apointer;
begin

mypointer^[0]:=23;
end;

merced
یک شنبه 06 دی 1388, 13:12 عصر
اين چه كاريه كه آرايه رو استاتيك تعريف مي كني و مي خواي با اشاره گر مقدار بدي
اينجا پاسكاله . از اين درد سرا نداريم.
حتي اگه بخواي طول يه آرايه رو متغيير بذاري هم بدون استفاده از اشاره گر و دنگ و فنگ هاي تخصيص حافظه پويا مي توني اين كار رو بكني

شبیر کریمی
یک شنبه 06 دی 1388, 13:19 عصر
سلام
ممنون بخاطر جواب
فقط ميخوام بدونم چه جوري يک اشاره گر به آرايه تعريف کنم و اينکه کدي که نوشتم چرا خطا ميده؟

merced
یک شنبه 06 دی 1388, 18:03 عصر
Type
ArrayType = Array[0..10] of Integer;
Var
Arr: ArrayType;
PtrArrTyp : ^ArrayType;
i: Integer;

begin

PtrArrTyp := @Arr;

for i := 1 to 10 do
PtrArrTyp^[i] := i;


for i := 1 to 10 do
ShowMessage(IntToStr( PtrArrTyp^[i]));