Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
ВнизОптимизация. Найти похожие ветки
← →
zamkom (2004-02-16 16:02) [0]Ув. мастера. Есть код как нибудь можно оптимизировать этот кусок, а то приходится вызывать его много раз. Спасибо.
var
block : array [0..100] of String;
a, s : String;
begin
.......
For i:=0 to 1000 do
begin
if a=block[i] then
begin
s:=Copy (block[i], 2,4);
Break;
end;
end;
.......
← →
Dimka Maslov (2004-02-16 16:06) [1]отсортируй массив block и веди поиск методом половинного деления
← →
Семен Сорокин (2004-02-16 16:12) [2]StringList, Sorted = true, IndexOf
← →
Рамиль (2004-02-16 16:14) [3]
> Семен Сорокин © (16.02.04 16:12) [2]
> StringList, Sorted = true, IndexOf
Find, а не IndexOf
← →
Тимохов (2004-02-16 16:16) [4]
> Рамиль © (16.02.04 16:14) [3]
Вы оба правы если sorted = true
← →
Guest (2004-02-16 16:21) [5]zamkom © (16.02.04 16:02)
s := copy(a, 2, 4)
Или "a" может и не оказаться в "block"?
← →
zamkom (2004-02-16 16:23) [6]Guest (16.02.04 16:21) [5]
Вот именно.
← →
keymaster (2004-02-17 10:46) [7]Имхо, имеет место очепятка...
var
block : array [0.. 100] of String;
и при этомFor i:=0 to 1000 do
получится exception...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c