Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

Підкажіть начсет TLIST Знайти схожі гілки


Dreamer   (2001-12-17 14:17) [0]

Є масив якому я привласнюю значення і тут же заношу в list, потім мені треба змінити параметри масиву і соответсвенно щоб tlist їх теж бачив, привожу алгоритм в якому тліст не бачить оновлень :(



було
Form1: TForm1;
k: integer;
pusk: array of integer;
N: integer;
ListPUSK: Tlist;
ukazPUSK: PDouble;
g: extended;


реалізація

{$ R * .dfm}

procedure TForm1.Button1Click (Sender: TObject);
було
k: integer;
починати
ListPUSK: = Tlist.Create;
n: = 4;
SetLength (PUSK, N);
for k: = 0 to N-1 do
починати
pusk [k]: = k + 1;
New (ukazPUSK);
ukazPUSK ^: = pusk [k];
ListPUSK.Add (ukazPUSK);
end;

for k: = 0 to N-1 do
починати
pusk [k]: = 8;
end;


for k: = 0 to N-1 do
починати
ukazPUSK: = LISTPUSK [k];
if ukazPUSK ^ = 8 then
g: = ukazPUSK ^ -2;
end;

end;



MBo   (2001-12-17 14:24) [1]

спочатку ти вносиш в аркуш копії покажчики на КОПІЇ значень масиву,
що знаходяться в іншому місці!

Думаю, твоє завдання треба вирішити набагато простіше, і масив швидше за все не знадобиться. Роз'ясни вихідну проблему.



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.55 MB
Час: 0.022 c
7-22448
Станіслав
2001-09-11 15:24
2002.01.08
Дані на дискеті


6-22290
SineD
2001-10-09 17:48
2002.01.08
Питання по Sockets API


1-22171
Dim
2001-12-20 14:19
2002.01.08
Чи можливо чудо?


1-22260
Alex_Sudakov
2001-12-17 15:28
2002.01.08
Підкажіть, в D6 юніт DsgnIntf ​​є?


6-22270
Ajax
2001-09-15 10:15
2002.01.08
У мене тут виникло 3 питання про пошту.





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська