Source code of Windows XP (NT5)
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.

90 lines
3.7 KiB

  1. #define PUT_PROPERTY_LONG(this, Property) \
  2. HRESULT tmphr; \
  3. tmphr = put_LONG_Property( \
  4. (IADs *)this, \
  5. TEXT(#Property), \
  6. l##Property \
  7. ); \
  8. RRETURN_EXP_IF_ERR(tmphr);
  9. #define GET_PROPERTY_LONG(this, Property) \
  10. HRESULT tmphr; \
  11. tmphr = get_LONG_Property( \
  12. (IADs *)this, \
  13. TEXT(#Property), \
  14. retval \
  15. ); \
  16. RRETURN_EXP_IF_ERR(tmphr);
  17. #define PUT_PROPERTY_BSTR(this, Property) \
  18. HRESULT tmphr; \
  19. tmphr = put_BSTR_Property( \
  20. (IADs *)this, \
  21. TEXT(#Property), \
  22. bstr##Property \
  23. ); \
  24. RRETURN_EXP_IF_ERR(tmphr);
  25. #define GET_PROPERTY_BSTR(this, Property) \
  26. HRESULT tmphr; \
  27. tmphr = get_BSTR_Property( \
  28. (IADs *)this, \
  29. TEXT(#Property), \
  30. retval \
  31. ); \
  32. RRETURN_EXP_IF_ERR(tmphr);
  33. #define PUT_PROPERTY_VARIANT_BOOL(this, Property) \
  34. HRESULT tmphr; \
  35. tmphr = put_VARIANT_BOOL_Property( \
  36. (IADs *)this, \
  37. TEXT(#Property), \
  38. f##Property\
  39. ); \
  40. RRETURN_EXP_IF_ERR(tmphr);
  41. #define GET_PROPERTY_VARIANT_BOOL(this, Property) \
  42. HRESULT tmphr; \
  43. tmphr = get_VARIANT_BOOL_Property( \
  44. (IADs *)this, \
  45. TEXT(#Property), \
  46. retval \
  47. ); \
  48. RRETURN_EXP_IF_ERR(tmphr);
  49. #define PUT_PROPERTY_DATE(this, Property) \
  50. HRESULT tmphr; \
  51. tmphr = put_DATE_Property( \
  52. (IADs *)this, \
  53. TEXT(#Property), \
  54. da##Property \
  55. ); \
  56. RRETURN_EXP_IF_ERR(tmphr);
  57. #define GET_PROPERTY_DATE(this, Property) \
  58. HRESULT tmphr; \
  59. tmphr = get_DATE_Property( \
  60. (IADs *)this, \
  61. TEXT(#Property), \
  62. retval \
  63. ); \
  64. RRETURN_EXP_IF_ERR(tmphr);
  65. #define PUT_PROPERTY_VARIANT(this, Property) \
  66. HRESULT tmphr; \
  67. tmphr = put_VARIANT_Property( \
  68. (IADs *)this, \
  69. TEXT(#Property), \
  70. v##Property \
  71. ); \
  72. RRETURN_EXP_IF_ERR(tmphr);
  73. #define GET_PROPERTY_VARIANT(this, Property) \
  74. HRESULT tmphr; \
  75. tmphr = get_VARIANT_Property( \
  76. (IADs *)this, \
  77. TEXT(#Property), \
  78. retval \
  79. ); \
  80. RRETURN_EXP_IF_ERR(tmphr);