Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.28;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.49 MB
Время: 0.046 c
15-1190978114
infom
2007-09-28 15:15
2007.10.28
Странное поведение BDS 2006


1-1186994152
Jetus
2007-08-13 12:35
2007.10.28
Как "закрасить" родительское MDI-окно?


15-1190896489
X9
2007-09-27 16:34
2007.10.28
Подскажите учебник по FireBird


2-1191593097
Vitek2
2007-10-05 18:04
2007.10.28
"Сохранить" и "Сохранить как..".


2-1191916590
John_13
2007-10-09 11:56
2007.10.28
Проблема в DBGrid





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский