Три базы данных и hget

[Lucius]

Добрый день!
Есть одновременно три открытые программы, Ярлычки на панели один под другим.
Можно ли как-то кроме поочередного наведения мыши, обозвать окна по hget/
Сейчас работаю по такому макросу, но стоит одной программе вылететь и все накрывается.

Code: [Select]

////////////////// ФОРМИРУЕМ отчет   ////////////////////////
///////////////////////////////////////////////////////////////////////////////
LOGCLEAR
GETSCREEN
colormode(6)
screenshot //БЛОК1   поиск ярлыка ,присвоение HWND
IF_PICTURE_IN (60,1000, $_xmax,$_ymax, STRCONCAT("Картинки ОП\","Снимок1.bmp"),-1,80)
   LCLICK($_return1+5, $_return2+5)
Else
   LOGWRITE ("Не найдено БАЗУ")
   halt
END_IF
$P=0
$P=$_return1
$P1=0
$P1=$_return2
WAIT(1)
move($P-140,$P1-75)
WAIT(1)
LCLICK($P-140,$P1-75)
WAIT(1)      //левое окно из трех БАЗ
$Pot1=0
$Pot1=hget(61,588)
LCLICK($_return1+5, $_return2+5)
WAIT(1)
move($P+60,$P1-75)
WAIT(1)
LCLICK($P+60,$P1-75)
WAIT(1)
LCLICK($P+60,$P1-75)
WAIT(1)
$pot2=0
$Pot2=HGET(61,588)   //среднее окно из трех БАЗ
LCLICK($_return1+5, $_return2+5)
WAIT(1)
move($P+280,$P1-75)
WAIT(1)
LCLICK($P+280,$P1-75)
WAIT(1)
$Pot3=0
$Pot3=HGET(61,588)   //правое окно из трех БАЗ
LOGWRITE ("Pot1=",$Pot1)
LOGWRITE ("Pot2=",$Pot2)
LOGWRITE ("Pot3=",$Pot3)
//присвоили переменные с кодами всех окон БАЗ
wndbump($Pot1)