Головна сторінка
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.81 MB
Час: 0.021 c
3-21948
andre_polt
2001-12-04 16:22
2002.01.08
DB


1-22216
Ghost_Old.
2001-12-16 14:43
2002.01.08
Помогіте..кто знає як отримати завтрашню дату ..


1-22025
- = DeD = -
2001-12-18 11:20
2002.01.08
установка ActiveX


6-22302
Ігор
2001-10-11 20:10
2002.01.08
Сокети в Delphi


1-22182
Вал
2001-12-20 18:11
2002.01.08
Chart -> JPEG





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