home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / WINDDE.BI < prev    next >
Text File  |  1989-07-24  |  2KB  |  79 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: WinDDE.BI
  4. '*
  5. '* Requires:     none
  6. '*
  7. '* Description:  Dynamic Data Exchange manager
  8. '*
  9. '*************************************************************
  10.  
  11. ' Dynamic Data Exchange (DDE) Structure Declaration
  12.  
  13. TYPE DDEINIT
  14.     cb AS INTEGER
  15.     pszAppName AS LONG
  16.     pszTopic AS LONG
  17. END TYPE
  18.     
  19. TYPE DDESTRUCT
  20.     cbData AS LONG
  21.     fsStatus AS INTEGER
  22.     usFormat AS INTEGER
  23.     offszItemName AS INTEGER
  24.     offabData AS INTEGER
  25. END TYPE
  26.  
  27. ' DDE constants for wStatus field 
  28. CONST DDEFACK            = &H0001
  29. CONST DDEFBUSY           = &H0002
  30. CONST DDEFNODATA         = &H0004
  31. CONST DDEFACKREQ         = &H0008
  32. CONST DDEFRESPONSE       = &H0010
  33. CONST DDENOTPROCESSED    = &H0020
  34. CONST DDEFRESERVED       = &H00C0
  35. CONST DDEFAPPSTATUS      = &HFF00
  36.  
  37. ' DDE public formats 
  38.  
  39. CONST DDEFMTTEXT         = &H0001
  40.  
  41. ' Dynamic Data Exchange (DDE) Routines 
  42.  
  43. DECLARE FUNCTION WinDdeInitiate%(BYVAL hwndClient AS LONG,_
  44.                                  BYVAL pszAppName AS LONG,_
  45.                                  BYVAL pszTopicName AS LONG)
  46.  
  47. DECLARE FUNCTION WinDdeRespond&(BYVAL hwndClient AS LONG,_
  48.                                 BYVAL hwndServer AS LONG,_
  49.                                 BYVAL pszAppName AS LONG,_
  50.                                 BYVAL pszTopicName AS LONG)
  51.  
  52. DECLARE FUNCTION WinDdePostMsg%(BYVAL hwndTo AS LONG,_
  53.                                 BYVAL hwndFrom AS LONG,_
  54.                                 BYVAL wm AS INTEGER,_
  55.                                 BYVAL pDdest AS LONG,_
  56.                                 BYVAL fRetry AS INTEGER)
  57.  
  58.  
  59.  ' Dynamic Data Exchange (DDE) Messages 
  60.  
  61. CONST WMDDEFIRST        = &H00A0
  62. CONST WMDDEINITIATE     = &H00A0
  63. CONST WMDDEREQUEST      = &H00A1
  64. CONST WMDDEACK          = &H00A2
  65. CONST WMDDEDATA         = &H00A3
  66. CONST WMDDEADVISE       = &H00A4
  67. CONST WMDDEUNADVISE     = &H00A5
  68. CONST WMDDEPOKE         = &H00A6
  69. CONST WMDDEEXECUTE      = &H00A7
  70. CONST WMDDETERMINATE    = &H00A8
  71. CONST WMDDEINITIATEACK  = &H00A9
  72. CONST WMDDELAST         = &H00AF
  73.  
  74. CONST WMQUERYCONVERTPOS  = &H00b0
  75.  
  76. ' Return values for WMQUERYCONVERTPOS 
  77. CONST QCPCONVERT         = &H0001
  78. CONST QCPNOCONVERT       = &H0000
  79.