Find is very slow for TestComplete10

I test a delphi object and find is very slow in TestComplete10 : ~ 4 seconds.

I use "ObjectIdentifier" to find an object :

l_PropName = new Array("ObjectIdentifier", "Visible", "Enabled");
l_PropVal = new Array("MyIdObject", true, true);
lProcess = Sys.WaitProcess("MyProcess", 10, 1);
lRes=lProcess.Find(l_PropName, l_PropVal, 20000, true);

An idea?