ارایهای با طول متغییر

[lord_viper]

با سلام
چطور میشه یه ارایه تعریف کرد که دارای طول متعیر باشه یعنی ابتداش رو بدیم ولی انتهاش متغییر باشه مثل a:array[0..max]of integer

[rasool_brn]

MyArray:array of Integer;مقدار این نوع آرایه رو می تونی در زمان اجرا توسط تابع زیر تعیین کنی:
SetLength(MyArray,10);توسط عبارت زیر هم می تونی تعداد عناصر آرایه رو گسترش بدی:
Copy(MyArray,20);

[lord_viper]

خب یعنی میتونیم اول اطلاعاتمون که مقدارش متغییره رو بشموریم وبریزیم داخل ارایه بعد طولشو اینجوری نسبت بدیم؟

[A.Nemati]

به این نوع آرایه‌ها می‌گن آرایه دینامیک


خب یعنی میتونیم اول اطلاعاتمون که مقدارش متغییره رو بشموریم وبریزیم داخل ارایه بعد طولشو اینجوری نسبت بدیم؟
نه! اول باید طول آرایه‌ات رو مشخص کنی، بعد داخلش مقدار بریزی. مثلا اگه آرایه‌ات خونه شماره 3 نداشته باشه که نمی‌تونی داخلش مقدار بریزی.
اینم یک کد نمونه که مقادیر بزرگتر از 100 رو از یک لیست داخل آرایه دینامیک می‌ریزه


var
myIntArr: array of integer;
i, j: integer;
...
j:= 0;
for i:= 0 to List.Count - 1 do
if StrToInt(List[i]) > 100 then
begin
inc(j)
SetLength(myIntArr, j);
myIntArr[j - 1]:= StrToInt(List[i]);
end;

[lord_viper]

خب حالا توی ارایمون مقادیر رو وارد کردیم اگه بخوایم از وسطای ارایه یکی از مقادیر رو حذف کنیم چطور باید عمل کنیم؟(نه اینکه 0 بدیم )

[rasool_brn]

باید خانه های آرایه رو از محل حذف عنصر تا انتهای آرایه یکی به سمت ابتدای آرایه شیفت بدین.

[vcldeveloper]

میتونین بگین برای این کار از چه تابعی باید استفاده کنم؟
تابع آماده ایی که این کار را براتون انجام بده نداریم. باید خودتون پیاده سازیش کنید.