Сообщений в теме: 5

[etc_root]

Здравствуйте!
Вот такая проблема...
вернее вопрос.
От чего зависит быстродействие выполнения скрипта, то есть написал скрипт кторый берет значения из текстового файла и забивает их в таблицу, вроде не пишу ничего лишнего - делаю все это в цикле, только меняю поля, однако скрипт выполняется медленне даже если бы я вбивал все руками...
Подскажите как оптимизировать.


-----------------------
repeat
m := w.Window('TfmBrowser', '*');
m.Activate;
m.Window('TPageControl').Click();


str:=stroki[l,1];
m.Window('StringView', '', naimind+2).Click();
Sys.Keys(str);

str:=stroki[l,3];
m.Window('StringView', '', naimind).Click();
Sys.Keys(str);

str:=stroki[l,4];
m.Window('ComboBoxView', '', rezind).Click(str);
Sys.Keys(str);

str:=stroki[l,5];
m.Window('NumericView', '', rnnind).Click();
Sys.Keys(str);

l:=l+1;

naimind:=naimind-5;
rezind:=rezind-3;
rnnind:=rnnind-2;

until naimind<13;
end;
-----------------------

[Scorp-13]

Возможно проблема в быстродействии системы в целом, т.к. в данном скрипте ничего ресурсоемкого вроде как и нету. А как обстоят дела с выполнением дркгих скриптов?

[Dmitry N]

Здравствуйте.

А где именно проявляется "медленность"? При забитии информации в поля или при клике мыши? Может скрипт "тормозит" только на каком-нибудь одном клике?

А если перекомпилировать приложение как Open, то скрипт тоже медленно выполняется?
Да, кстати, для Open приложения вы сможете значения класть непосредственно в соответствующие нативные свойства контролов (Text, Value и т.д.).

[etc_root]

Здравствуйте.

А где именно проявляется "медленность"? При забитии информации в поля или при клике мыши? Может скрипт "тормозит" только на каком-нибудь одном клике?

А если перекомпилировать приложение как Open, то скрипт тоже медленно выполняется?
Да, кстати, для Open приложения вы сможете значения класть непосредственно в соответствующие нативные свойства контролов (Text, Value и т.д.).

Здравствуйте!
Мое предположение (не знаю как это отследить), но тем не менее я думаю, что тормозит именно при обращении к объекту (полю). Забивает в поля быстро.
Перекомпилировал приложение но тогда возникает другая проблема - как обращаться к элементам в цикле? Не нашел я кого нибудь свойства по которомуможно идентифицировать объект (кроме handle конечно), вернее есть там свойства - типа Index но только это строковая переменная и вклинить туда переменную никак - делаю так ....'+inttostr(i)+'.....

вот в таком случае..
m.pBrowser.TPageControl_1.TTabSheet_1.TScrollBox_1.StringView_108.Click(44, 12);

Именно 108 и надо менять в цикле......
Как быть в таком случае?

[natali.ancharuk]

Почитай мой топик "Встроенные индексы" "Как избавиться от индексов" ниже может пригодится.

[Dmitry N]

Здравствуйте.

Перекомпилировал приложение но тогда возникает другая проблема - как обращаться к элементам в цикле?

Вы можете обращаться к ним так же как и раньше - используя метод Window, так как параметры WndClass, WndCaption и WndIndex у котролов остались те же.