Vamos muy bien, esto es lo que necesito, ahora un poco más de ayuda :-D

Logro hacer todo pero tal como dice acá abajo, el mensaje me devuelve un
lParam con las coordenadas en donde está la ventana, pero lo tengo que
calcular con LOWORD y HIWORD y esto obvio no existe en VFP, como lo paso a
Top, Left de VFP??

WM_MOVE Message

Sent after a window has been moved.

A window receives this message through its
<http://msdn.microsoft.com/en-us/library/ms633573%28v=VS.85%29.aspx>
WindowProc function. 

Copy <javascript:CodeSnippet_CopyCode('CodeSnippetContainerCode0');> 

#define WM_MOVE                         0x0003

Parameters

wParam 

This parameter is not used. 

lParam 

The x and y coordinates of the upper-left corner of the client area of the
window. The low-order word contains the x-coordinate while the high-order
word contains the y coordinate. 

Return Value

If an application processes this message, it should return zero. 

Remarks

The parameters are given in screen coordinates for overlapped and pop-up
windows and in parent-client coordinates for child windows. 

The following example demonstrates how to obtain the position from the
lParam parameter.

Copy <javascript:CodeSnippet_CopyCode('CodeSnippetContainerCode1');> 

 

xPos = (int)(short) LOWORD(lParam);   // horizontal position 

yPos = (int)(short) HIWORD(lParam);   // vertical position 

 

 

 

Saludos y gracias

PabloC

 

De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de PabloC
Enviado el: Martes, 25 de Enero de 2011 18:22
Para: GUFA List Member
Asunto: [GUFA] BINDEVENT

 

Espectacular lo tuyo, ya lo baje, mañana lo miro y te cuento

Abrazo

 

PabloC

 

De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de francisco prieto
Enviado el: Martes, 25 de Enero de 2011 18:04
Para: GUFA List Member
Asunto: [GUFA] BINDEVENT

 

Bueno el archivo lo encontras acá.

 

http://www.sql.ru/forum/actualthread.aspx?bid=37
<http://www.sql.ru/forum/actualthread.aspx?bid=37&tid=437348&hl=>
&tid=437348&hl=

 

Mira que esta en ruso

 

Tenes que buscar la cadena FT05-01Hennig.exe (pesa 85k). Ya lo probe e
instala.

 

Saludos,

 

Pancho

Cordoba

El 25 de enero de 2011 17:48, PabloC <pablo.canon...@mug.org.ar> escribió:

501HENNIG.ZIP

 

Responder a