Задача найти по нач буквам --
Скрипт
//Если вместо ln_len – конкретное число - то ок!
//А так Ехресting number expression


STRING LS_FIND, ls_crit
long ll_row
LONG ln_len


LS_FIND=upper(trim(sle_1.Text))
ln_len=len(ls_find)
ls_crit="(left(pot,LN_LEN)='" + ls_find + "')"
//Если вместо ln_len – конкретное число - то ок!
//А так Ехресting number expression
ll_row=dw_1.find(ls_crit,1,dw_1.rowcount())
IF ll_row >0 THEN
dw_1.ScrollToRow(ll_row)
ELSE
MessageBox('Поиск','Не найдено:~n = "'+sle_1.Text+'"')
END IF

Для PAND --- С П А С И Б О !