FiveTech Software tech support forums

Gracias Karinha.
Funcionó con KeyChar(VK_BACK), y SendMessage(oGet1:hWnd, WM_KEYDOWN, VK_DELETE) )
Ahora lo que me queda es emular las teclas LEFT y RIGHT cuando se mantienen oprimidas, para que avance automaticamente, sin necesidad de oprimir tantas veces el botón.
Saludos.

... .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1687 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3278 ) Called from: => SENDMESSAGE( 0 ) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 413 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\DIALOG.PRG ...

... .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1687 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3278 ) Called from: => SENDMESSAGE( 0 ) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 413 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\DIALOG.PRG ...

... from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1427) Called from: .\source\classes\WINDOW.PRG => _FWH(3353) Called from: => SENDMESSAGE(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407) Called from: => TWINDOW:HANDLEEVENT(0) Called from: .\source\classes\DIALOG.PRG ...

El detalle esta en la funcion SendMessage( hWnd, FM_OPENFILE ) , En este simple ejemplo no lanza el llamado FM_OPENFILE Que condiciones son necesarias en las funciones para que pueda ser reconocida, lo estoy haciendo mal..? No doy como poderlo ...

... Called from TBUTTONBMP:HANDLEEVENT(214) in .\source\classes\BUTTONB.PRG Called from _FWH(3553) in .\source\classes\WINDOW.PRG Called from SENDMESSAGE(0) Called from TDIALOG:COMMAND(413) in .\source\classes\DIALOG.PRG Called from TDIALOG:COMMAND(413) in .\source\classes\DIALOG.PRG Called ...

... 23 ) Called from: scintila.prg => TSCINTILLA:HANDLEEVENT( 959 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3345 ) Called from: => SENDMESSAGE( 0 ) Called from: scintila.prg => TSCINTILLA:SEND( 207 ) Called from: scintila.prg => TSCINTILLA:SETUP( 747 ) Called from: fivedit.prg ...

... => TFIVEDITWND:NEW( 890 ) Called from: fivedit.prg => TFIVEDIT:NEW( 214 ) Called from: fivedit.prg => MAIN( 23 ) La llamada lo hace aqui: SendMessage( hWnd, FM_OPENFILE ), hay algun valor numerico que remplaze a FM_OPENFILE.? He buscado en Google sin resultados.. Saludos..

... ) // Title !!! IF hWnd != NIL IF ISICONIC( hWnd ) SHOWWINDOW( hWnd, SW_RESTORE ) ENDIF IF nType = 1 SETFOREGROUNDWINDOW( hWnd ) ENDIF IF nType = 2 SENDMESSAGE( hWnd, WM_CLOSE ) ENDIF ELSE MsgAlert( "COLORPICKER is not running !", "Attention" ) ENDIF RETURN NIL // ---------- ...

... oSBtn[16] OF oDlg ; ID 580 PIXEL 2007 ; NOBORDER ; PROMPT "&Exit RGB-colors" ; FILENAME c_path1 + "Exit.Bmp" ; ACTION ( SendMessage( FindWindow( 0, "COLORPICK" ), WM_CLOSE ), oDlg:End() ) ; FONT oFont1 ; LEFT the defined Line in RGB.prg, to keep the colorpicker ...

Paco,

Comprueba que el hBitmap sea correcto:

hBitmap := ReadBitmap( 0, "\video.bmp")
MsgInfo( hBitmap )
SendMessage( hWnd, STM_SETIMAGE, 0, hBitmap )

Por lo visto se le podría asignar un bitmap a un tooltip de esta forma:

#define STM_SETIMAGE 0x0172

SendMessage( oToolTip:hWnd, STM_SETIMAGE, 0, hBitmap )

Ahora se trata de ver en donde se podría implementar

... oDlg ON INIT oGet:SetMargins( oGet:nHeight, 1 ) funciona bien. ¿Como hago para que funcione en la clase? He visto que el SetMargin es un SendMessage(...) ¿Tendrá algo que ver?

Hola Antonio: Al copiar un texto en un RichEdit con control y V, se produce un GPF. El contenido de hb_out.log es: Called from SENDMESSAGE(0) Called from (b)TWINDOW(571) in .\source\classes\WINDOW.PRG Called from TRICHEDIT:SENDMSG(0) in .\source\classes\WINDOW.PRG Called from TRICHEDIT:PASTE(943) ...

... <-TGET:DESTROY(766) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TGET:HANDLEEVENT(575) <-_FWH(3464) <-SENDMESSAGE(0) <-(b)TWINDOW(573) ------------------------------------------------------------ con la ultima versión de fwh ( 15.01 ) . ¿ Es un problema ...