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

Вниз

Динамический массив   Найти похожие ветки 

 
Talle   (2004-05-29 01:03) [0]

Подскажите, как определить дин. массив с фиксированным кол-вом столбцов,но разным кол-вом строк. И как задать длину столбцов?


 
Rafe   (2004-05-29 01:16) [1]

type
 TStroka = array[0..10] of Integer;  //фиксированное количество столбцов

var

 DinMasiv: array of TStroka;

...
...
Skolko_Nujno:= 20
SetLength(DinMasiv, Skolko_Nujno); //выделяешь памяти сколько нужно строк
DinMasiv[20][5]:= 45;

вобщем, что-то типа этого...


 
miwa ©   (2004-05-29 07:16) [2]

//вобщем, что-то типа этого...

Например, так:

var a:array of array of integer;
   i,j:integer;
   s:string;
begin
 setlength(a, 5);
 for i:=0 to 4 do
   setlength(a[i], i);

 s:="";

 for i:=0 to 4 do
 begin
   for j:=0 to length(a[i])-1 do
   begin
     a[i,j]:=i*j;
     s:=s+format("%d - %d : %d     ",[i, j, a[i,j]])
   end;
   s:=s+#13#10;
 end;
showmessage(s);
end;

;о))
Дополнительная информация:
F1 - Dynamic arrays


 
GuAV ©   (2004-05-29 10:49) [3]

miwa ©   (29.05.04 07:16) [2]

Ага. научите детей плохому ;-)
Кто же finalize будет?



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

Форум: "Основная";
Текущий архив: 2004.06.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.042 c
14-1085815415
Mad Dancer
2004-05-29 11:23
2004.06.13
Колосоккер


3-1085271468
kochet
2004-05-23 04:17
2004.06.13
Импорт из нетипизированного файла в универсальный формат БД


9-1076597727
Creep
2004-02-12 17:55
2004.06.13
как записать кординаты мыши в переменные (x,y)при щелчке по "ima


6-1082877505
Daniel
2004-04-25 11:18
2004.06.13
Сокеты в Unix


14-1085720232
ORMADA
2004-05-28 08:57
2004.06.13
Хде Дельфим держит свои иконки ?





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