Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.28;
Скачать: CL | DM;

Вниз

ламерский вопрос:(   Найти похожие ветки 

 
DeadLord ©   (2007-10-08 20:54) [0]

Ребят, вопрос действительно дурной: есть двумерный массив и мне надо передать его в процедуру параметром. Как это сделать? проблема в том, что я не могу объявить параметр процедуры двумерным массивом, только одномерным...


 
Плохиш ©   (2007-10-08 20:59) [1]

type TMyArr = array[0..10, 0..100] of integer;
...
function Super(AArr: TMyArr): Boolean;


 
vasIZmax ©   (2007-10-08 21:01) [2]

type ddd =
 array of array of integer;

procedure XXX(a: ddd);


 
engine ©   (2007-10-08 21:01) [3]

> [0] DeadLord ©   (08.10.07 20:54)
> могу объявить параметр процедуры двумерным массивом, только
> одномерным.

Type
 TMyArray = array [1&#13310, 1&#13310] of Integer;
&#133
procedure MyProc(Param : TMyArray);
begin
//
end;


 
DeadLord ©   (2007-10-08 21:01) [4]

Спасибо:) заработало


 
MetalFan ©   (2007-10-08 21:03) [5]


> array [1㏾, 1㏾] of Integer;

ой, шо это?!


 
engine ©   (2007-10-08 21:04) [6]

> [5] MetalFan ©   (08.10.07 21:03)

это array [1 &#133 10 , 1 &#133 10] of Integer;

незнаю, почему так получилось. :)


 
engine ©   (2007-10-08 21:06) [7]

> [6] engine ©   (08.10.07 21:04)

ну и конечно же две точки вместо трех.


 
Dib@zol ©   (2007-10-08 21:07) [8]

Однако, лучше параметром передавать не сам массив, а указатель на него, ибо он в этом случае не дублируется, зажирая память.

Type
TMyArray = array [10, 10] of Integer;
PMyArray = ^TMyArray;

procedure MyProc(Param : PMyArray);
begin
 Param^[1, 1]:=12345;
end;


 
DeadLord ©   (2007-10-08 21:36) [9]

еще такая проблема...

получаю данные для массива:
       begin
       for i:=1to xx do
               for j:=1to yy do
                      w[i,j]:=strtofloat(form2.stringgrid1.Cells[i,j]);  
                       end;

Если запускать по Ф9, то все идет гладко, но большая часть массива заполняется нолями, хотя стринг грид не нулевая вообще. Если попробовать выполнить по шагам, то выпадает access violation и окошко отладчика... в чем дело?!


 
Anatoly Podgoretsky ©   (2007-10-08 22:10) [10]

> Dib@zol  (08.10.2007 21:07:08)  [8]

Грубо

procedure MyProc(var Param: TMyArray);


 
Вася Правильный   (2007-10-08 22:22) [11]


> DeadLord ©   (08.10.07 21:36) [9]

http://delphimaster.net/view/15-1191866338/



Страницы: 1 вся ветка

Текущий архив: 2007.10.28;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.044 c
9-1154865892
Сан-саныч
2006-08-06 16:04
2007.10.28
Md2 модели


2-1191514478
Pacific
2007-10-04 20:14
2007.10.28
Можно ли...


15-1190811568
Azize
2007-09-26 16:59
2007.10.28
подскажите книжку


15-1190881952
Vlad Oshin
2007-09-27 12:32
2007.10.28
Как забросить Cookie на определенное время? Не получается


2-1191399713
Pacific
2007-10-03 12:21
2007.10.28
Integer to Char





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский