Вниз
Скачать: CL | DM;

Массив.   Найти похожие ветки 

 
Влад   (2007-01-05 18:04) [0]

Можно ли каким-нибудь образом присвоить всему массиву набор значений?
Например, в начале программы можно объявить
var K:array[1..4] of longword=($243F6A88,$85A308D3,$9216D5D9,$8979FB1B);
Можно ли сделать что-либо подобное в теле программы, не присваивая каждому элементу значения по отдельности?


 
Palladin ©   (2007-01-05 18:07) [1]

ага

var
ss:TStringList;
a:Array of Integer;
i:Integer;

ss:=TStringList.Create;
ss.CommaText:="$243F6A88,$85A308D3,$9216D5D9,$8979FB1B";
setlength(a,ss.count);
for i:=0 to ss.count-1 do a[i]:=strtoint(ss[i]);
ss.free;


 
Palladin ©   (2007-01-05 18:08) [2]

хотя конечно
var K:array[1..4] of longword=($243F6A88,$85A308D3,$9216D5D9,$8979FB1B);
тоже является телом программы


 
Влад   (2007-01-05 18:16) [3]

Спасибо.
(П.с. для ламеров(меня) - тело программы это все между begin и end.:)


 
try   (2007-01-05 20:01) [4]


> Palladin ©   (05.01.07 18:07) [1]


#10 забыл в комматексте.


 
Palladin ©   (2007-01-05 20:11) [5]

с какой стати?


 
try   (2007-01-05 21:28) [6]

я неправ. не о том думал.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
2-1167314120
Sn
2006-12-28 16:55
2007.01.21
Подсчет слов совпадающих с данным в текстовом файле


11-1144738006
BMouradov
2006-04-11 10:46
2007.01.21
При Hint-e не работает Alt-F4


15-1167220696
Ega23
2006-12-27 14:58
2007.01.21
К вопросу о наличии рыбы в Волге


15-1167335892
Palladin
2006-12-28 22:58
2007.01.21
Ну емае... куда девался старый добрый рейв...


9-1142551010
KiberKot
2006-03-17 02:16
2007.01.21
Поделитесь опытом




   Наверх