![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вариантный массив [D5, Win2k]
Саша © (2004-12-22 11:52:00)Добрый день.
В процедуре есть строка:
ResArr:=VarEmpty;
ResArr - это вариантный массив. При вызове процедуры первый раз эта строчка выполняется быстро, а во второй раз очень долго (несколько секунд). Затем все повторяется циклически: 3-й раз строчка выполняется быстро, в 4-й - долго. В чем может быть причина?
Саша (2004-12-24 09:46:00) [1]Массив двумерный, 38х1100. Если представить массив в виде таблицы, у которой 38 столбцов и 1100 строк, то элементы в пяти столбцах практически все непустые, все остальные - пустые.
!!Крутой хакер !!! (2004-12-24 08:01:00) [2]какова размерность массива и сколько элементов в каждой размерности ? в т.ч. непустых ?
Саша (2004-12-24 07:57:00) [3]Отношение долго/быстро около 15.
Digitman (2004-12-23 16:12:00) [4]каково соотношение "быстро" к "долго" ?
Саша (2004-12-23 15:47:00) [5]Большая часть элементов массива имеет значение varType = 0 (т.е. насколько я понимаю, varEmpty), и небольшая часть элементов массива имеет значение varType = 8 (OLE-строка в кодировке Unicode, как написано в хэлпе).
Digitman (2004-12-23 13:25:00) [6]
> не понимаю, почему эта операция может выполняться так долго,
> причем через раз
а для этого нужно знать, какого типа эл-ты этого массива
Саша (2004-12-23 13:13:00) [7]При присвоении переменной ResArr значения VarEmpty, насколько я понимаю, высвобождается память, занятая массивом. И я не понимаю, почему эта операция может выполняться так долго, причем через раз.
Digitman (2004-12-23 12:08:00) [8]а ты сам-то представляешь себе, чтоконкретно происходит с переменной ResArr (и массивом, который она представляет) при выполнении того или иного присваивания ?
Саша (2004-12-23 11:16:00) [9]И ResArr, и ResMain - это вариантные массивы. В принципе можно убрать строку
ResArr:=VarEmpty;
и оставить только
ResArr:=ResMain;
но тогда долго выполняется строка
ResArr:=ResMain;
Digitman (2004-12-23 10:16:00) [10]
> ResArr:=ResMain;
что такое ResArr ?
Саша (2004-12-23 10:09:00) [11]begin
ResArr:=VarEmpty;
ResArr:=ResMain;
Form1.StringGrid1.Repaint;
end;
Больше в этой процедуре нет ничего, и выполняется она несколько раз подряд, т.е. между вызовами этой процедуры не выполняется ни строчки кода.
Digitman (2004-12-22 11:58:00) [12]покажи полный код процедуры