Вниз
Скачать: 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.033 c
15-1167852055
AntiUser
2007-01-03 22:20
2007.01.21
Mysql отказывается от GPL v3?


15-1167133593
Piroxyline
2006-12-26 14:46
2007.01.21
Этот форум через WAP и Google


2-1167857415
Ламер 2.Х
2007-01-03 23:50
2007.01.21
Indy


3-1162528991
fester
2006-11-03 07:43
2007.01.21
подключение к oracle


15-1167295872
Rouse_
2006-12-28 11:51
2007.01.21
Таки скока вы работаете? :)




   Наверх