Search found 128 matches

by César E. Lozada
Wed Jul 27, 2016 12:47 am
Forum: FiveWin para Harbour/xHarbour
Topic: Evento WM_RBUTTONDBLCLK
Replies: 5
Views: 610

Re: Evento WM_RBUTTONDBLCLK

Antonio,

Sí. En un listbox funciona correctamente. Gracias por tu interés.

César Lozada
by César E. Lozada
Mon Jul 25, 2016 4:45 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Evento WM_RBUTTONDBLCLK
Replies: 5
Views: 610

Re: Evento WM_RBUTTONDBLCLK

No, Antonio. Lo probé en tWindow y no funciona.

No pude implementarlo en tControl o no supe cómo hacerlo.

Pero si hago las modificaciones en un control en particular entonces sí que funciona. (Lo hice en tListBox)

Saludos,
César
by César E. Lozada
Mon Jul 25, 2016 4:38 am
Forum: FiveWin para Harbour/xHarbour
Topic: Evento WM_RBUTTONDBLCLK
Replies: 5
Views: 610

Re: Evento WM_RBUTTONDBLCLK

Nota: De acuerdo a http://winapi.conclase.net/curso/?winmsg=WM_RBUTTONDBLCLK , sólo las ventanas que tienen el estilo CS_DBLCLKS pueden recibir mensajes WM_RBUTTONDBLCLK Pero no hay ningún problema con esto, pues en el method Register la clase tWindow asigna automáticamente este estilo a las ventana...
by César E. Lozada
Mon Jul 25, 2016 4:26 am
Forum: FiveWin para Harbour/xHarbour
Topic: Evento WM_RBUTTONDBLCLK
Replies: 5
Views: 610

Evento WM_RBUTTONDBLCLK

Tal vez haya alguna razón para ello, pero este evento (Right button double click) no es manejado por la clase tWindow Sólo haría falta agregar: #define WM_RBUTTONDBLCLK                0x0206 DATA bRDblClick METHOD RDblClick( nRow, nCol, nKeyFlags ) CLASS TWindow    if ::bRDblClick != nil       retur...
by César E. Lozada
Fri Mar 22, 2013 2:49 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Tip: Cambiar los márgenes en multiGet o richedit
Replies: 0
Views: 348

Tip: Cambiar los márgenes en multiGet o richedit

Les dejo este tip: Si queremos dejar márgenes de nPixels entre los bordes del control oCtrl (multiget o richedit) y el texto que contiene: #define EM_SETMARGINS           (211) #define EC_LEFTMARGIN          1 #define EC_RIGHTMARGIN         2    oCtrl:SendMsg( EM_SETMARGINS, EC_LEFTMARGIN, nPixels )...
by César E. Lozada
Sun Jun 24, 2012 5:56 am
Forum: FiveWin para Harbour/xHarbour
Topic: DISP_E_MEMBERNOTFOUND: PASTE
Replies: 6
Views: 1720

Re: DISP_E_MEMBERNOTFOUND: PASTE

Parece ser que el error ocurre cuando el clipboard está vacío....
by César E. Lozada
Fri Jun 22, 2012 1:41 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Controles sobre una imagen
Replies: 7
Views: 2014

Re: Controles sobre una imagen

Gracias Carlos y Antolin: Lo implementé con la que me propuso Carlos, aunque luego también pensé en la solución de Antolin, sobre todo si hay que ajustar la imagen si no cabe en el diálogo. Pero dado que esto no me sucedió usé un brush y logré lo deseado. Antolín: Lo de la "H" es fácil de ...
by César E. Lozada
Thu Jun 07, 2012 2:39 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Controles sobre una imagen
Replies: 7
Views: 2014

Re: Controles sobre una imagen

Gracias, Armando. Pero no es lo que busco. En corel.prg se añaden etiquetas a una forma para imprimirla.
Lo que quiero hacer es un diálogo con una imagen sobre la cual hay unos controles para ingreso de datos.
Sí se puede con tGets, pero falla con comboboxes.

Saludos
by César E. Lozada
Thu Jun 07, 2012 12:59 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Controles sobre una imagen
Replies: 7
Views: 2014

Re: Controles sobre una imagen

Examinando el código de tBitmap, de la cual desciende tImage, observo que en esa clase (tBitmap) ya estaba prevista la inscrustación de controles en una imagen. Creo que así me lo confirman la presencia en la clase del método ::AdjControls() y el uso de ::aControls, con sus ::Move() en caso de hacer...
by César E. Lozada
Wed Jun 06, 2012 4:09 am
Forum: FiveWin para Harbour/xHarbour
Topic: Controles sobre una imagen
Replies: 7
Views: 2014

Controles sobre una imagen

Me encapriché con hacer un formulario para transcribir los datos recogidos en una planilla, digitalizando antes una planilla en blanco para mostrarla en un diálogo y agregando sobre esta imagen los controles para transcribir la información. Algo así como: DEFINE DIALOG oDlg FROM 0,0 TO 600,700 PIXEL...
by César E. Lozada
Mon Jun 04, 2012 11:48 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Cómo usar ResEdit?
Replies: 2
Views: 588

Re: ¿Cómo usar ResEdit?

Solucionado. Encontré la solución en este mismo foro usando Google y no el Search de esta página. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=22809 1) Con ResEdit se crea un archivo yachtw32.RC 2) Se convierte el RC -> RES y luego RES->DLL usando el mismo ResEdit c:\resedit\resedit.exe...
by César E. Lozada
Mon Jun 04, 2012 10:53 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Cómo usar ResEdit?
Replies: 2
Views: 588

¿Cómo usar ResEdit?

Hola a todos. No he podido aprovechar ResEdit porque realmente no sé qué es lo que tengo que hacer para obtener una libreria de recursos DLL. Intento usar ResEdit porque el viejo Borland Resource Workshop no acepta bitmaps de 24bits. Las rutas nexesarias han sido agregadas a la configuración. Necesi...
by César E. Lozada
Sun Oct 23, 2011 6:43 am
Forum: FiveWin para Harbour/xHarbour
Topic: Una función necesaria: IsUserAnAdmin()
Replies: 2
Views: 555

Una función necesaria: IsUserAnAdmin()

... sobre todo cuando la aplicación intenta escribir en el registro de Windows o cargar una DLL con regsvr32 (en Windows XP o superior)

DLL32 STATIC FUNCTION IsUserAnAdmin() AS BOOL PASCAL LIB "Shell32.dll"

Creo que se explica por sí misma.

Cordiales saludos.
by César E. Lozada
Fri Oct 14, 2011 3:54 am
Forum: FiveWin para Harbour/xHarbour
Topic: xBrowse - 1ra. y última filas pintadas
Replies: 3
Views: 797

Re: xBrowse - 1ra. y última filas pintadas

Thank you very much, Mr. N.

Now I have EXTENDed CLASS txBrowse WITH METHOD nFirstKeyNo (and nLastKeyNo).

Regards.
César Lozada
by César E. Lozada
Thu Oct 13, 2011 2:27 am
Forum: FiveWin para Harbour/xHarbour
Topic: xBrowse - 1ra. y última filas pintadas
Replies: 3
Views: 797

xBrowse - 1ra. y última filas pintadas

Hola. ¿Cómo averiguo cuáles son la primera y la última filas pintadas en un xBrowse? Me gustaría, por ejemplo, poder escribir el mensaje: Mostrando resultados 7 al 29 de un total de 50 y que éste se actualizara al navergar por el xbrowse. Por supuesto, no deseo agregar una nueva columna mostrando ::...