qual a versão ? corporate, advanced ou enterprise?
A forma mais simples não é esconder os botões, mas sim controlar se o cursor DELBI está vazio
não testei mas é algo do genero
REGRA
select bo
select BI
select delbi
if reccount>0
msg("Não pode Gravar, Apagou alguma linha e não é permitido")
SBO.pageframe.page1.cont1.lapagar,enabled=.f.
** ou
SBO.pageframe.page1.cont1.lapagar,visible=.f.
return .f.
else
SBO.pageframe.page1.cont1.lapagar,enabled=.t.
endif
↧