Windows NT 4.0 source code leak
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

68 lines
1.7 KiB

4 years ago
  1. 'control handles for TAPI Browser UI
  2. type hwndTAPI_CONTROL
  3. TapiHandle as long
  4. ParamsCheckbox as long
  5. LineAppPlusButton as long
  6. LineAppMinusButton as long
  7. LinePlusButton as long
  8. LineMinusButton as long
  9. CallPlusButton as long
  10. CallMinusButton as long
  11. PhoneAppPlusButton as long
  12. PhoneAppMinusButton as long
  13. PhoneOpenPlusButton as long
  14. PhoneOpenMinusButton as long
  15. ClearEditButton as long
  16. BlankButton0 as long
  17. BlankButton1 as long
  18. BlankButton2 as long
  19. BlankButton3 as long
  20. BlankButton4 as long
  21. BlankButton5 as long
  22. Listbox0 as long 'middle box
  23. Listbox1 as long 'left box
  24. Editbox as long 'right box
  25. end type
  26. 'TYPE ORDERS
  27. ' company AS STRING *30
  28. ' ordernum AS ARRAY OF LONG
  29. ' billed AS DOUBLE
  30. 'END TYPE
  31. '
  32. '
  33. 'You must not only explicitly declare any variable of this type using the DIM statement, you must then use the REDIM statement to dimension the array within it:
  34. '
  35. 'DIM MyOrders AS ORDERS
  36. 'REDIM (MyOrders.ordernum)(1 TO 30) AS LONG
  37. 'from RECORDER.INC ???
  38. '$IFDEF MSTEST32
  39. TYPE LOGINITSTRUCT
  40. LogOutputType AS LONG
  41. MinDetailLevel AS LONG
  42. ProductVersion AS STRING
  43. MachineName AS STRING
  44. Language AS STRING
  45. LogLocation AS STRING
  46. ' NotificationProc AS POINTER TO SUB(Action&, Text$)
  47. END TYPE
  48. '$ENDIF
  49. type TAPI_STATISTIC
  50. CountlineInitialze as long
  51. CountlineShutdown as long
  52. CountlineOpen as long
  53. CountlineClose as long
  54. CountlineMakeCall as long
  55. CountlineDrop as long
  56. CountlineDeallocateCall as long
  57. CountlineAnswer as long
  58. CountlineGetNumRings as long
  59. CountlineDial as long
  60. CountlineGetTranslateCaps as long
  61. CountlineNegotiateAPIVersion as long
  62. CountlineNegotiateExtVersion as long
  63. end type 'more to come