with os2; use os2;  
with os2.jba; use os2.jba;  
package  EVENTDP is 
--             Global variables.    
wDialog              : aliased WINDOW ;
--         Window/control identifiers.    
IDD_DIALOG           : constant long := 3000; --Dialog                 
IDD_PUSHBUTTON       : constant long := 3001; --Push Button            
IDD_STATICHEADER     : constant long := 3002; --Static Text            
IDD_STATICEVENTTYPE  : constant long := 3003; --Static Text            
IDD_STATICMEANS      : constant long := 3004; --Static Text            
IDD_STATICMOUSETEXT  : constant long := 3005; --Static Text            
IDD_STATICX          : constant long := 3006; --Static Text            
IDD_STATICY          : constant long := 3007; --Static Text            
IDD_DIALOG1          : constant long := 3008; --Dialog                 
posX,posY            : Long ;
--           Function Prototypes.         
function  DialogWndProc (h_wnd:HWND;msg:ULONG;mp1:PMPARAM;mp2:PMPARAM)return PMENTRY;
procedure DialogPushButtonClick  ;
procedure EventTable(msg : Ulong)  ;
End EVENTDP ;
