FiveTech Software tech support forums

... FUNCTION Teclado(oDlg,nKey,nVeces) LOCAL nVez DEFAULT nVeces := 1 oDlg:SETFOCUS() FOR nVez := 1 TO nVeces oDlg:POSTMSG(WM_KEYDOWN,nKey,0) NEXT RETURN (NIL) Mira que primero hago activo el Diálogo al que envío la tecla, despues con un FOR - NEXT ...

... ElseIf lRecall ( cAlias )->( DbRecall() ) ( cAlias )->( DbUnlock() ) EndIf If ::lCanAppend .and. ::nLen == 0 ::nRowPos := ::nColPos := 1 ::PostMsg( WM_KEYDOWN, VK_DOWN, nMakeLong( 0, 0 ) ) EndIf If ::bPostDel != Nil Eval( ::bPostDel , Self ) EndIf ::lHasChanged := .T. Case ::oDbf != Nil ...

... en el siguiente codigo METHOD Mensaje( nKey ) CLASS TMBrowse If nKey != NIL .and. nKey != 0 ::SetFocus() ::PostMsg( WM_KEYDOWN, nKey, nMakeLong( 0, 0 ) ) EndIf RETURN 0 Desde el principio, para controlar la navegación por el browse le enviaba ...

... function SkipLines( nLines, oGet, nAt ) local n for n = 1 to nLines oGet:PostMsg( WM_VSCROLL, 1 ) next return nil //************************************************* Cordialmente Jairo Barbosa

... message, but it was an intentional close and thus it should not appear. This is a new behavior in 8.04. It worked fine in 8.03. I did try the oWnd:PostMsg(WM_CLOSE) suggestion but that also generates the same error message from Vista Tim

Richard Chidiak wrote:Robert
Do you have the problem on a main mdi, mdichild or a sdi window ?
Richard

Main mdi

oWND:PostMsg(WM_CLOSE) generates GPF

Robert

In my case on a main mdi window i also had a gpf calling ownd:end()

This was fixed by replacing with

oWND:PostMsg(WM_CLOSE)
oWND := NIL

Do you have the problem on a main mdi, mdichild or a sdi window ?

HTH

Richard

Richard Chidiak wrote:Robert

instead of ownd:end() , try ownd:PostMsg(WM_CLOSE)

HTH

Richard

Thanks Richard for your idea, but I got the same error.

Robert

instead of ownd:end() , try ownd:PostMsg(WM_CLOSE)

HTH

Richard

... oWnd, VK_INSERT ) a ver si tienes suerte. Saludos Carlos G. /* *************************** */ FUNCTION FWKEYBOARD(OWND,NKEY) OWND:SETFOCUS() OWND:POSTMSG( WM_KEYDOWN, NKEY, 0) RETURN NIL /* *************************** */

Hola,

prueba con lbCapMvs:PostMsg( WM_RBUTTONDOWN)

saludos

Marcelo

Mr.Antonio

Thank you very much for your reply.

After spending some time on this, I could get the
required effect with the following statement.

oGet1:PostMsg( WM_RBUTTONDOWN )

Regards to you

- Ramesh Babu P

Ramesh,

Try this:

oGet1:PostMsg( WM_SETFOCUS )
oBtn1:oJump = oGet1

Hi Mr.Antonio Once the focus is passed on to a get with oGet1:PostMsg(EM_SETFOCUS) and when I click on any other controls or press tab, the blinking cursor is still showing on old control (oGet1) and bLostFocus is also not working properly. Just add the ...

Ramesh,

Try this:

oGet1:PostMsg( WM_SETFOCUS ) instead of oGet1:SetFocus()