mahsara
چهارشنبه 08 دی 1389, 21:36 عصر
با سلام
من در وی بی مبتدی هستم بیشتر دلفی کار کردم و یه پروِزه دلفی دارم که میخوام به وی بی تبدیل کنم.
یه استراکچر دارم که یکی از فیلدهاش یه ارایه هست. برای تعریف این ارایه و تعیین سایزش و بعد دسترسی بهش مشکل دارم. کلا تعاریفی که توی دلفی دارم ایناست که میخوام به وی بی تبدیل بشه.
type pos= Record
left : integer;
top : integer;
p : integer;
neib : array[1..4] of integer;
End;
var
یک ارایه دو بعدی بدون سایز <--- arrpos : array of array of pos;
یعنی مشکل در ارایه neib است.
تعریف که من در وی بی استفاده کردم این بود
Public Structure pos
Dim left As Integer
Dim top As Integer
Dim p As Integer
Public neib(3) AsInteger
End Structure
اما خطا میده که سایز ارایه نمیتونه تعریف بشه. وقتی سایزش برداشتم برای redim کردنش نمیدونم چه جوری بهش دسترسی داشته باشم.
بعد اومدم اینجوری نوشتم:
VBFixedArray(3)> Public neib() As integer>
اما موقع دسترسی به مقادیر داخل ارایه neib خطا دارم:
arrpos(1).neib(1) = 10
ممنون میشم اگر دوستان سریعتر کمکم کنند چون یکم عجله دارم.
من در وی بی مبتدی هستم بیشتر دلفی کار کردم و یه پروِزه دلفی دارم که میخوام به وی بی تبدیل کنم.
یه استراکچر دارم که یکی از فیلدهاش یه ارایه هست. برای تعریف این ارایه و تعیین سایزش و بعد دسترسی بهش مشکل دارم. کلا تعاریفی که توی دلفی دارم ایناست که میخوام به وی بی تبدیل بشه.
type pos= Record
left : integer;
top : integer;
p : integer;
neib : array[1..4] of integer;
End;
var
یک ارایه دو بعدی بدون سایز <--- arrpos : array of array of pos;
یعنی مشکل در ارایه neib است.
تعریف که من در وی بی استفاده کردم این بود
Public Structure pos
Dim left As Integer
Dim top As Integer
Dim p As Integer
Public neib(3) AsInteger
End Structure
اما خطا میده که سایز ارایه نمیتونه تعریف بشه. وقتی سایزش برداشتم برای redim کردنش نمیدونم چه جوری بهش دسترسی داشته باشم.
بعد اومدم اینجوری نوشتم:
VBFixedArray(3)> Public neib() As integer>
اما موقع دسترسی به مقادیر داخل ارایه neib خطا دارم:
arrpos(1).neib(1) = 10
ممنون میشم اگر دوستان سریعتر کمکم کنند چون یکم عجله دارم.