[ brzak @ 18.08.2008. 08:52 ] @
Trebao bi mi pandan sledecem kodu: declare hButton PLS_INTEGER; begin hButton := GET_ITEM_PROPERTY('STOP_BUTTON', WINDOW_HANDLE); For counter in 1..5000 LOOP -- aqui vai o progrma, SQL, etc -- Testa se foi clicado um BOTAO CANCELA if Win_API_Utility.InterruptCheck(hButton) then -- Break out EXIT; end if; :block2.ti6:=counter; synchronize; end LOOP; end; Ovo je kod za Forms6i, vrti se u pretlji i ispisuje nesto u :block2.ti6, dok se ne pritisne dugme 'STOP_BUTTON' koje prekida izvrsavanje pretlje. Ne mogu da nadjem slicnu funkciju za Forms10g - WebUtil 1.0.6. Da li je neko mozda resavao slican problem? Pozdrav, |