jwarpcnsi.pas 45 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466
  1. {******************************************************************************}
  2. { }
  3. { RPC NSI API interface Unit for Object Pascal }
  4. { }
  5. { Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft }
  6. { Corporation. All Rights Reserved. }
  7. { }
  8. { The original file is: rpcnsi.h, released June 2000. The original Pascal }
  9. { code is: RpcNsi.pas, released December 2000. The initial developer of the }
  10. { Pascal code is Marcel van Brakel (brakelm att chello dott nl). }
  11. { }
  12. { Portions created by Marcel van Brakel are Copyright (C) 1999-2001 }
  13. { Marcel van Brakel. All Rights Reserved. }
  14. { }
  15. { Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI) }
  16. { }
  17. { You may retrieve the latest version of this file at the Project JEDI }
  18. { APILIB home page, located at http://jedi-apilib.sourceforge.net }
  19. { }
  20. { The contents of this file are used with permission, subject to the Mozilla }
  21. { Public License Version 1.1 (the "License"); you may not use this file except }
  22. { in compliance with the License. You may obtain a copy of the License at }
  23. { http://www.mozilla.org/MPL/MPL-1.1.html }
  24. { }
  25. { Software distributed under the License is distributed on an "AS IS" basis, }
  26. { WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
  27. { the specific language governing rights and limitations under the License. }
  28. { }
  29. { Alternatively, the contents of this file may be used under the terms of the }
  30. { GNU Lesser General Public License (the "LGPL License"), in which case the }
  31. { provisions of the LGPL License are applicable instead of those above. }
  32. { If you wish to allow use of your version of this file only under the terms }
  33. { of the LGPL License and not to allow others to use your version of this file }
  34. { under the MPL, indicate your decision by deleting the provisions above and }
  35. { replace them with the notice and other provisions required by the LGPL }
  36. { License. If you do not delete the provisions above, a recipient may use }
  37. { your version of this file under either the MPL or the LGPL License. }
  38. { }
  39. { For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
  40. { }
  41. {******************************************************************************}
  42. unit JwaRpcNsi;
  43. {$WEAKPACKAGEUNIT}
  44. {$HPPEMIT ''}
  45. {$HPPEMIT '#include "RpcNsi.h"'}
  46. {$HPPEMIT ''}
  47. {$I jediapilib.inc}
  48. interface
  49. uses
  50. JwaWinType, JwaRpc, JwaRpcDce;
  51. type
  52. RPC_NS_HANDLE = Pointer;
  53. {$EXTERNALSYM RPC_NS_HANDLE}
  54. const
  55. RPC_C_NS_SYNTAX_DEFAULT = 0;
  56. {$EXTERNALSYM RPC_C_NS_SYNTAX_DEFAULT}
  57. RPC_C_NS_SYNTAX_DCE = 3;
  58. {$EXTERNALSYM RPC_C_NS_SYNTAX_DCE}
  59. RPC_C_PROFILE_DEFAULT_ELT = 0;
  60. {$EXTERNALSYM RPC_C_PROFILE_DEFAULT_ELT}
  61. RPC_C_PROFILE_ALL_ELT = 1;
  62. {$EXTERNALSYM RPC_C_PROFILE_ALL_ELT}
  63. RPC_C_PROFILE_ALL_ELTS = RPC_C_PROFILE_ALL_ELT;
  64. {$EXTERNALSYM RPC_C_PROFILE_ALL_ELTS}
  65. RPC_C_PROFILE_MATCH_BY_IF = 2;
  66. {$EXTERNALSYM RPC_C_PROFILE_MATCH_BY_IF}
  67. RPC_C_PROFILE_MATCH_BY_MBR = 3;
  68. {$EXTERNALSYM RPC_C_PROFILE_MATCH_BY_MBR}
  69. RPC_C_PROFILE_MATCH_BY_BOTH = 4;
  70. {$EXTERNALSYM RPC_C_PROFILE_MATCH_BY_BOTH}
  71. RPC_C_NS_DEFAULT_EXP_AGE = -1;
  72. {$EXTERNALSYM RPC_C_NS_DEFAULT_EXP_AGE}
  73. // Server APIs
  74. function RpcNsBindingExportA(EntryNameSyntax: Longword; EntryName: PChar;
  75. IfSpec: RPC_IF_HANDLE; BindingVec: PRPC_BINDING_VECTOR;
  76. ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  77. {$EXTERNALSYM RpcNsBindingExportA}
  78. function RpcNsBindingExportW(EntryNameSyntax: Longword; EntryName: PWideChar;
  79. IfSpec: RPC_IF_HANDLE; BindingVec: PRPC_BINDING_VECTOR;
  80. ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  81. {$EXTERNALSYM RpcNsBindingExportW}
  82. function RpcNsBindingExport(EntryNameSyntax: Longword; EntryName: PTSTR;
  83. IfSpec: RPC_IF_HANDLE; BindingVec: PRPC_BINDING_VECTOR;
  84. ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  85. {$EXTERNALSYM RpcNsBindingExport}
  86. function RpcNsBindingUnexportA(EntryNameSyntax: Longword; EntryName: PChar;
  87. IfSpec: RPC_IF_HANDLE; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  88. {$EXTERNALSYM RpcNsBindingUnexportA}
  89. function RpcNsBindingUnexportW(EntryNameSyntax: Longword; EntryName: PWideChar;
  90. IfSpec: RPC_IF_HANDLE; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  91. {$EXTERNALSYM RpcNsBindingUnexportW}
  92. function RpcNsBindingUnexport(EntryNameSyntax: Longword; EntryName: PTSTR;
  93. IfSpec: RPC_IF_HANDLE; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  94. {$EXTERNALSYM RpcNsBindingUnexport}
  95. // Server PnP APIs
  96. function RpcNsBindingExportPnPA(EntryNameSyntax: Longword; EntryName: PChar;
  97. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  98. {$EXTERNALSYM RpcNsBindingExportPnPA}
  99. function RpcNsBindingExportPnPW(EntryNameSyntax: Longword; EntryName: PWideChar;
  100. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  101. {$EXTERNALSYM RpcNsBindingExportPnPW}
  102. function RpcNsBindingExportPnP(EntryNameSyntax: Longword; EntryName: PTSTR;
  103. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  104. {$EXTERNALSYM RpcNsBindingExportPnP}
  105. function RpcNsBindingUnexportPnPA(EntryNameSyntax: Longword; EntryName: PChar;
  106. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  107. {$EXTERNALSYM RpcNsBindingUnexportPnPA}
  108. function RpcNsBindingUnexportPnPW(EntryNameSyntax: Longword; EntryName: PWideChar;
  109. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  110. {$EXTERNALSYM RpcNsBindingUnexportPnPW}
  111. function RpcNsBindingUnexportPnP(EntryNameSyntax: Longword; EntryName: PTSTR;
  112. IfSpec: RPC_IF_HANDLE; ObjectVector: PUUID_VECTOR): RPC_STATUS; stdcall;
  113. {$EXTERNALSYM RpcNsBindingUnexportPnP}
  114. // Client APIs
  115. function RpcNsBindingLookupBeginA(EntryNameSyntax: Longword; EntryName: PChar;
  116. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; BindingMaxCount: Longword;
  117. var LookupContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  118. {$EXTERNALSYM RpcNsBindingLookupBeginA}
  119. function RpcNsBindingLookupBeginW(EntryNameSyntax: Longword; EntryName: PWideChar;
  120. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; BindingMaxCount: Longword;
  121. var LookupContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  122. {$EXTERNALSYM RpcNsBindingLookupBeginW}
  123. function RpcNsBindingLookupBegin(EntryNameSyntax: Longword; EntryName: PTSTR;
  124. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; BindingMaxCount: Longword;
  125. var LookupContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  126. {$EXTERNALSYM RpcNsBindingLookupBegin}
  127. function RpcNsBindingLookupNext(LookupContext: RPC_NS_HANDLE;
  128. var BindingVec: PRPC_BINDING_VECTOR): RPC_STATUS; stdcall;
  129. {$EXTERNALSYM RpcNsBindingLookupNext}
  130. function RpcNsBindingLookupDone(var LookupContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  131. {$EXTERNALSYM RpcNsBindingLookupDone}
  132. // Group APIs
  133. function RpcNsGroupDeleteA(GroupNameSyntax: Longword; GroupName: PChar): RPC_STATUS; stdcall;
  134. {$EXTERNALSYM RpcNsGroupDeleteA}
  135. function RpcNsGroupDeleteW(GroupNameSyntax: Longword; GroupName: PWideChar): RPC_STATUS; stdcall;
  136. {$EXTERNALSYM RpcNsGroupDeleteW}
  137. function RpcNsGroupDelete(GroupNameSyntax: Longword; GroupName: PTSTR): RPC_STATUS; stdcall;
  138. {$EXTERNALSYM RpcNsGroupDelete}
  139. function RpcNsGroupMbrAddA(GroupNameSyntax: Longword; GroupName: PChar;
  140. MemberNameSyntax: Longword; MemberName: PChar): RPC_STATUS; stdcall;
  141. {$EXTERNALSYM RpcNsGroupMbrAddA}
  142. function RpcNsGroupMbrAddW(GroupNameSyntax: Longword; GroupName: PWideChar;
  143. MemberNameSyntax: Longword; MemberName: PWideChar): RPC_STATUS; stdcall;
  144. {$EXTERNALSYM RpcNsGroupMbrAddW}
  145. function RpcNsGroupMbrAdd(GroupNameSyntax: Longword; GroupName: PTSTR;
  146. MemberNameSyntax: Longword; MemberName: PTSTR): RPC_STATUS; stdcall;
  147. {$EXTERNALSYM RpcNsGroupMbrAdd}
  148. function RpcNsGroupMbrRemoveA(GroupNameSyntax: Longword; GroupName: PChar;
  149. MemberNameSyntax: Longword; MemberName: PChar): RPC_STATUS; stdcall;
  150. {$EXTERNALSYM RpcNsGroupMbrRemoveA}
  151. function RpcNsGroupMbrRemoveW(GroupNameSyntax: Longword; GroupName: PWideChar;
  152. MemberNameSyntax: Longword; MemberName: PWideChar): RPC_STATUS; stdcall;
  153. {$EXTERNALSYM RpcNsGroupMbrRemoveW}
  154. function RpcNsGroupMbrRemove(GroupNameSyntax: Longword; GroupName: PTSTR;
  155. MemberNameSyntax: Longword; MemberName: PTSTR): RPC_STATUS; stdcall;
  156. {$EXTERNALSYM RpcNsGroupMbrRemove}
  157. function RpcNsGroupMbrInqBeginA(GroupNameSyntax: Longword; GroupName: PChar;
  158. MemberNameSyntax: Longword; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  159. {$EXTERNALSYM RpcNsGroupMbrInqBeginA}
  160. function RpcNsGroupMbrInqBeginW(GroupNameSyntax: Longword; GroupName: PWideChar;
  161. MemberNameSyntax: Longword; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  162. {$EXTERNALSYM RpcNsGroupMbrInqBeginW}
  163. function RpcNsGroupMbrInqBegin(GroupNameSyntax: Longword; GroupName: PTSTR;
  164. MemberNameSyntax: Longword; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  165. {$EXTERNALSYM RpcNsGroupMbrInqBegin}
  166. function RpcNsGroupMbrInqNextA(InquiryContext: RPC_NS_HANDLE; MemberName: PPChar): RPC_STATUS; stdcall;
  167. {$EXTERNALSYM RpcNsGroupMbrInqNextA}
  168. function RpcNsGroupMbrInqNextW(InquiryContext: RPC_NS_HANDLE; MemberName: PPWideChar): RPC_STATUS; stdcall;
  169. {$EXTERNALSYM RpcNsGroupMbrInqNextW}
  170. function RpcNsGroupMbrInqNext(InquiryContext: RPC_NS_HANDLE; MemberName: PPTSTR): RPC_STATUS; stdcall;
  171. {$EXTERNALSYM RpcNsGroupMbrInqNext}
  172. function RpcNsGroupMbrInqDone(var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  173. {$EXTERNALSYM RpcNsGroupMbrInqDone}
  174. // Profile APIs
  175. function RpcNsProfileDeleteA(ProfileNameSyntax: Longword; ProfileName: PChar): RPC_STATUS; stdcall;
  176. {$EXTERNALSYM RpcNsProfileDeleteA}
  177. function RpcNsProfileDeleteW(ProfileNameSyntax: Longword; ProfileName: PWideChar): RPC_STATUS; stdcall;
  178. {$EXTERNALSYM RpcNsProfileDeleteW}
  179. function RpcNsProfileDelete(ProfileNameSyntax: Longword; ProfileName: PTSTR): RPC_STATUS; stdcall;
  180. {$EXTERNALSYM RpcNsProfileDelete}
  181. function RpcNsProfileEltAddA(ProfileNameSyntax: Longword; ProfileName: PChar;
  182. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PChar;
  183. Priority: Longword; Annotation: PChar): RPC_STATUS; stdcall;
  184. {$EXTERNALSYM RpcNsProfileEltAddA}
  185. function RpcNsProfileEltAddW(ProfileNameSyntax: Longword; ProfileName: PWideChar;
  186. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PWideChar;
  187. Priority: Longword; Annotation: PWideChar): RPC_STATUS; stdcall;
  188. {$EXTERNALSYM RpcNsProfileEltAddW}
  189. function RpcNsProfileEltAdd(ProfileNameSyntax: Longword; ProfileName: PTSTR;
  190. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PTSTR;
  191. Priority: Longword; Annotation: PTSTR): RPC_STATUS; stdcall;
  192. {$EXTERNALSYM RpcNsProfileEltAdd}
  193. function RpcNsProfileEltRemoveA(ProfileNameSyntax: Longword; ProfileName: PChar;
  194. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PChar): RPC_STATUS; stdcall;
  195. {$EXTERNALSYM RpcNsProfileEltRemoveA}
  196. function RpcNsProfileEltRemoveW(ProfileNameSyntax: Longword; ProfileName: PWideChar;
  197. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PWideChar): RPC_STATUS; stdcall;
  198. {$EXTERNALSYM RpcNsProfileEltRemoveW}
  199. function RpcNsProfileEltRemove(ProfileNameSyntax: Longword; ProfileName: PTSTR;
  200. IfId: PRPC_IF_ID; MemberNameSyntax: Longword; MemberName: PTSTR): RPC_STATUS; stdcall;
  201. {$EXTERNALSYM RpcNsProfileEltRemove}
  202. function RpcNsProfileEltInqBeginA(ProfileNameSyntax: Longword; ProfileName: PChar;
  203. InquiryType: Longword; IfId: PRPC_IF_ID; VersOption, MemberNameSyntax: Longword;
  204. MemberName: PChar; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  205. {$EXTERNALSYM RpcNsProfileEltInqBeginA}
  206. function RpcNsProfileEltInqBeginW(ProfileNameSyntax: Longword; ProfileName: PWideChar;
  207. InquiryType: Longword; IfId: PRPC_IF_ID; VersOption, MemberNameSyntax: Longword;
  208. MemberName: PWideChar; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  209. {$EXTERNALSYM RpcNsProfileEltInqBeginW}
  210. function RpcNsProfileEltInqBegin(ProfileNameSyntax: Longword; ProfileName: PTSTR;
  211. InquiryType: Longword; IfId: PRPC_IF_ID; VersOption, MemberNameSyntax: Longword;
  212. MemberName: PTSTR; var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  213. {$EXTERNALSYM RpcNsProfileEltInqBegin}
  214. function RpcNsProfileEltInqNextA(InquiryContext: RPC_NS_HANDLE; var IfId: RPC_IF_ID;
  215. MemberName: PPChar; var Priority: Longword; Annotation: PPChar): RPC_STATUS; stdcall;
  216. {$EXTERNALSYM RpcNsProfileEltInqNextA}
  217. function RpcNsProfileEltInqNextW(InquiryContext: RPC_NS_HANDLE; var IfId: RPC_IF_ID;
  218. MemberName: PPWideChar; var Priority: Longword; Annotation: PPWideChar): RPC_STATUS; stdcall;
  219. {$EXTERNALSYM RpcNsProfileEltInqNextW}
  220. function RpcNsProfileEltInqNext(InquiryContext: RPC_NS_HANDLE; var IfId: RPC_IF_ID;
  221. MemberName: PPTSTR; var Priority: Longword; Annotation: PPTSTR): RPC_STATUS; stdcall;
  222. {$EXTERNALSYM RpcNsProfileEltInqNext}
  223. function RpcNsProfileEltInqDone(var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  224. {$EXTERNALSYM RpcNsProfileEltInqDone}
  225. // Entry object APIs
  226. function RpcNsEntryObjectInqBeginA(EntryNameSyntax: Longword; EntryName: PChar;
  227. var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  228. {$EXTERNALSYM RpcNsEntryObjectInqBeginA}
  229. function RpcNsEntryObjectInqBeginW(EntryNameSyntax: Longword; EntryName: PWideChar;
  230. var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  231. {$EXTERNALSYM RpcNsEntryObjectInqBeginW}
  232. function RpcNsEntryObjectInqBegin(EntryNameSyntax: Longword; EntryName: PTSTR;
  233. var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  234. {$EXTERNALSYM RpcNsEntryObjectInqBegin}
  235. function RpcNsEntryObjectInqNext(InquiryContext: RPC_NS_HANDLE; ObjUuid: PUUID): RPC_STATUS; stdcall;
  236. {$EXTERNALSYM RpcNsEntryObjectInqNext}
  237. function RpcNsEntryObjectInqDone(var InquiryContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  238. {$EXTERNALSYM RpcNsEntryObjectInqDone}
  239. // Management and MISC APIs
  240. function RpcNsEntryExpandNameA(EntryNameSyntax: Longword; EntryName: PChar;
  241. var ExpandedName: PChar): RPC_STATUS; stdcall;
  242. {$EXTERNALSYM RpcNsEntryExpandNameA}
  243. function RpcNsEntryExpandNameW(EntryNameSyntax: Longword; EntryName: PWideChar;
  244. var ExpandedName: PWideChar): RPC_STATUS; stdcall;
  245. {$EXTERNALSYM RpcNsEntryExpandNameW}
  246. function RpcNsEntryExpandName(EntryNameSyntax: Longword; EntryName: PTSTR;
  247. var ExpandedName: PTSTR): RPC_STATUS; stdcall;
  248. {$EXTERNALSYM RpcNsEntryExpandName}
  249. function RpcNsMgmtBindingUnexportA(EntryNameSyntax: Longword; EntryName: PChar;
  250. IfId: PRPC_IF_ID; VersOption: Longword; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  251. {$EXTERNALSYM RpcNsMgmtBindingUnexportA}
  252. function RpcNsMgmtBindingUnexportW(EntryNameSyntax: Longword; EntryName: PWideChar;
  253. IfId: PRPC_IF_ID; VersOption: Longword; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  254. {$EXTERNALSYM RpcNsMgmtBindingUnexportW}
  255. function RpcNsMgmtBindingUnexport(EntryNameSyntax: Longword; EntryName: PTSTR;
  256. IfId: PRPC_IF_ID; VersOption: Longword; ObjectUuidVec: PUUID_VECTOR): RPC_STATUS; stdcall;
  257. {$EXTERNALSYM RpcNsMgmtBindingUnexport}
  258. function RpcNsMgmtEntryCreateA(EntryNameSyntax: Longword; EntryName: PChar): RPC_STATUS; stdcall;
  259. {$EXTERNALSYM RpcNsMgmtEntryCreateA}
  260. function RpcNsMgmtEntryCreateW(EntryNameSyntax: Longword; EntryName: PWideChar): RPC_STATUS; stdcall;
  261. {$EXTERNALSYM RpcNsMgmtEntryCreateW}
  262. function RpcNsMgmtEntryCreate(EntryNameSyntax: Longword; EntryName: PTSTR): RPC_STATUS; stdcall;
  263. {$EXTERNALSYM RpcNsMgmtEntryCreate}
  264. function RpcNsMgmtEntryDeleteA(EntryNameSyntax: Longword; EntryName: PChar): RPC_STATUS; stdcall;
  265. {$EXTERNALSYM RpcNsMgmtEntryDeleteA}
  266. function RpcNsMgmtEntryDeleteW(EntryNameSyntax: Longword; EntryName: PWideChar): RPC_STATUS; stdcall;
  267. {$EXTERNALSYM RpcNsMgmtEntryDeleteW}
  268. function RpcNsMgmtEntryDelete(EntryNameSyntax: Longword; EntryName: PTSTR): RPC_STATUS; stdcall;
  269. {$EXTERNALSYM RpcNsMgmtEntryDelete}
  270. function RpcNsMgmtEntryInqIfIdsA(EntryNameSyntax: Longword; EntryName: PChar;
  271. var IfIdVec: PRPC_IF_ID_VECTOR): RPC_STATUS; stdcall;
  272. {$EXTERNALSYM RpcNsMgmtEntryInqIfIdsA}
  273. function RpcNsMgmtEntryInqIfIdsW(EntryNameSyntax: Longword; EntryName: PWideChar;
  274. var IfIdVec: PRPC_IF_ID_VECTOR): RPC_STATUS; stdcall;
  275. {$EXTERNALSYM RpcNsMgmtEntryInqIfIdsW}
  276. function RpcNsMgmtEntryInqIfIds(EntryNameSyntax: Longword; EntryName: PTSTR;
  277. var IfIdVec: PRPC_IF_ID_VECTOR): RPC_STATUS; stdcall;
  278. {$EXTERNALSYM RpcNsMgmtEntryInqIfIds}
  279. function RpcNsMgmtHandleSetExpAge(NsHandle: RPC_NS_HANDLE;
  280. ExpirationAge: Longword): RPC_STATUS; stdcall;
  281. {$EXTERNALSYM RpcNsMgmtHandleSetExpAge}
  282. function RpcNsMgmtInqExpAge(var ExpirationAge: Longword): RPC_STATUS; stdcall;
  283. {$EXTERNALSYM RpcNsMgmtInqExpAge}
  284. function RpcNsMgmtSetExpAge(ExpirationAge: Longword): RPC_STATUS; stdcall;
  285. {$EXTERNALSYM RpcNsMgmtSetExpAge}
  286. // Client API's implemented in wrappers.
  287. function RpcNsBindingImportBeginA(EntryNameSyntax: Longword; EntryName: PChar;
  288. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; var ImportContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  289. {$EXTERNALSYM RpcNsBindingImportBeginA}
  290. function RpcNsBindingImportBeginW(EntryNameSyntax: Longword; EntryName: PWideChar;
  291. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; var ImportContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  292. {$EXTERNALSYM RpcNsBindingImportBeginW}
  293. function RpcNsBindingImportBegin(EntryNameSyntax: Longword; EntryName: PTSTR;
  294. IfSpec: RPC_IF_HANDLE; ObjUuid: PUUID; var ImportContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  295. {$EXTERNALSYM RpcNsBindingImportBegin}
  296. function RpcNsBindingImportNext(ImportContext: RPC_NS_HANDLE;
  297. var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
  298. {$EXTERNALSYM RpcNsBindingImportNext}
  299. function RpcNsBindingImportDone(var ImportContext: RPC_NS_HANDLE): RPC_STATUS; stdcall;
  300. {$EXTERNALSYM RpcNsBindingImportDone}
  301. function RpcNsBindingSelect(BindingVec: PRPC_BINDING_VECTOR; var Binding: RPC_BINDING_HANDLE): RPC_STATUS; stdcall;
  302. {$EXTERNALSYM RpcNsBindingSelect}
  303. implementation
  304. const
  305. rpcns4 = 'rpcns4.dll';
  306. {$IFDEF UNICODE}
  307. AWSuffix = 'W';
  308. {$ELSE}
  309. AWSuffix = 'A';
  310. {$ENDIF UNICODE}
  311. {$IFDEF DYNAMIC_LINK}
  312. var
  313. _RpcNsBindingExportA: Pointer;
  314. function RpcNsBindingExportA;
  315. begin
  316. GetProcedureAddress(_RpcNsBindingExportA, rpcns4, 'RpcNsBindingExportA');
  317. asm
  318. MOV ESP, EBP
  319. POP EBP
  320. JMP [_RpcNsBindingExportA]
  321. end;
  322. end;
  323. var
  324. _RpcNsBindingExportW: Pointer;
  325. function RpcNsBindingExportW;
  326. begin
  327. GetProcedureAddress(_RpcNsBindingExportW, rpcns4, 'RpcNsBindingExportW');
  328. asm
  329. MOV ESP, EBP
  330. POP EBP
  331. JMP [_RpcNsBindingExportW]
  332. end;
  333. end;
  334. var
  335. _RpcNsBindingExport: Pointer;
  336. function RpcNsBindingExport;
  337. begin
  338. GetProcedureAddress(_RpcNsBindingExport, rpcns4, 'RpcNsBindingExport' + AWSuffix);
  339. asm
  340. MOV ESP, EBP
  341. POP EBP
  342. JMP [_RpcNsBindingExport]
  343. end;
  344. end;
  345. var
  346. _RpcNsBindingUnexportA: Pointer;
  347. function RpcNsBindingUnexportA;
  348. begin
  349. GetProcedureAddress(_RpcNsBindingUnexportA, rpcns4, 'RpcNsBindingUnexportA');
  350. asm
  351. MOV ESP, EBP
  352. POP EBP
  353. JMP [_RpcNsBindingUnexportA]
  354. end;
  355. end;
  356. var
  357. _RpcNsBindingUnexportW: Pointer;
  358. function RpcNsBindingUnexportW;
  359. begin
  360. GetProcedureAddress(_RpcNsBindingUnexportW, rpcns4, 'RpcNsBindingUnexportW');
  361. asm
  362. MOV ESP, EBP
  363. POP EBP
  364. JMP [_RpcNsBindingUnexportW]
  365. end;
  366. end;
  367. var
  368. _RpcNsBindingUnexport: Pointer;
  369. function RpcNsBindingUnexport;
  370. begin
  371. GetProcedureAddress(_RpcNsBindingUnexport, rpcns4, 'RpcNsBindingUnexport' + AWSuffix);
  372. asm
  373. MOV ESP, EBP
  374. POP EBP
  375. JMP [_RpcNsBindingUnexport]
  376. end;
  377. end;
  378. var
  379. _RpcNsBindingExportPnPA: Pointer;
  380. function RpcNsBindingExportPnPA;
  381. begin
  382. GetProcedureAddress(_RpcNsBindingExportPnPA, rpcns4, 'RpcNsBindingExportPnPA');
  383. asm
  384. MOV ESP, EBP
  385. POP EBP
  386. JMP [_RpcNsBindingExportPnPA]
  387. end;
  388. end;
  389. var
  390. _RpcNsBindingExportPnPW: Pointer;
  391. function RpcNsBindingExportPnPW;
  392. begin
  393. GetProcedureAddress(_RpcNsBindingExportPnPW, rpcns4, 'RpcNsBindingExportPnPW');
  394. asm
  395. MOV ESP, EBP
  396. POP EBP
  397. JMP [_RpcNsBindingExportPnPW]
  398. end;
  399. end;
  400. var
  401. _RpcNsBindingExportPnP: Pointer;
  402. function RpcNsBindingExportPnP;
  403. begin
  404. GetProcedureAddress(_RpcNsBindingExportPnP, rpcns4, 'RpcNsBindingExportPnP' + AWSuffix);
  405. asm
  406. MOV ESP, EBP
  407. POP EBP
  408. JMP [_RpcNsBindingExportPnP]
  409. end;
  410. end;
  411. var
  412. _RpcNsBindingUnexportPnPA: Pointer;
  413. function RpcNsBindingUnexportPnPA;
  414. begin
  415. GetProcedureAddress(_RpcNsBindingUnexportPnPA, rpcns4, 'RpcNsBindingUnexportPnPA');
  416. asm
  417. MOV ESP, EBP
  418. POP EBP
  419. JMP [_RpcNsBindingUnexportPnPA]
  420. end;
  421. end;
  422. var
  423. _RpcNsBindingUnexportPnPW: Pointer;
  424. function RpcNsBindingUnexportPnPW;
  425. begin
  426. GetProcedureAddress(_RpcNsBindingUnexportPnPW, rpcns4, 'RpcNsBindingUnexportPnPW');
  427. asm
  428. MOV ESP, EBP
  429. POP EBP
  430. JMP [_RpcNsBindingUnexportPnPW]
  431. end;
  432. end;
  433. var
  434. _RpcNsBindingUnexportPnP: Pointer;
  435. function RpcNsBindingUnexportPnP;
  436. begin
  437. GetProcedureAddress(_RpcNsBindingUnexportPnP, rpcns4, 'RpcNsBindingUnexportPnP' + AWSuffix);
  438. asm
  439. MOV ESP, EBP
  440. POP EBP
  441. JMP [_RpcNsBindingUnexportPnP]
  442. end;
  443. end;
  444. var
  445. _RpcNsBindingLookupBeginA: Pointer;
  446. function RpcNsBindingLookupBeginA;
  447. begin
  448. GetProcedureAddress(_RpcNsBindingLookupBeginA, rpcns4, 'RpcNsBindingLookupBeginA');
  449. asm
  450. MOV ESP, EBP
  451. POP EBP
  452. JMP [_RpcNsBindingLookupBeginA]
  453. end;
  454. end;
  455. var
  456. _RpcNsBindingLookupBeginW: Pointer;
  457. function RpcNsBindingLookupBeginW;
  458. begin
  459. GetProcedureAddress(_RpcNsBindingLookupBeginW, rpcns4, 'RpcNsBindingLookupBeginW');
  460. asm
  461. MOV ESP, EBP
  462. POP EBP
  463. JMP [_RpcNsBindingLookupBeginW]
  464. end;
  465. end;
  466. var
  467. _RpcNsBindingLookupBegin: Pointer;
  468. function RpcNsBindingLookupBegin;
  469. begin
  470. GetProcedureAddress(_RpcNsBindingLookupBegin, rpcns4, 'RpcNsBindingLookupBegin' + AWSuffix);
  471. asm
  472. MOV ESP, EBP
  473. POP EBP
  474. JMP [_RpcNsBindingLookupBegin]
  475. end;
  476. end;
  477. var
  478. _RpcNsBindingLookupNext: Pointer;
  479. function RpcNsBindingLookupNext;
  480. begin
  481. GetProcedureAddress(_RpcNsBindingLookupNext, rpcns4, 'RpcNsBindingLookupNext');
  482. asm
  483. MOV ESP, EBP
  484. POP EBP
  485. JMP [_RpcNsBindingLookupNext]
  486. end;
  487. end;
  488. var
  489. _RpcNsBindingLookupDone: Pointer;
  490. function RpcNsBindingLookupDone;
  491. begin
  492. GetProcedureAddress(_RpcNsBindingLookupDone, rpcns4, 'RpcNsBindingLookupDone');
  493. asm
  494. MOV ESP, EBP
  495. POP EBP
  496. JMP [_RpcNsBindingLookupDone]
  497. end;
  498. end;
  499. var
  500. _RpcNsGroupDeleteA: Pointer;
  501. function RpcNsGroupDeleteA;
  502. begin
  503. GetProcedureAddress(_RpcNsGroupDeleteA, rpcns4, 'RpcNsGroupDeleteA');
  504. asm
  505. MOV ESP, EBP
  506. POP EBP
  507. JMP [_RpcNsGroupDeleteA]
  508. end;
  509. end;
  510. var
  511. _RpcNsGroupDeleteW: Pointer;
  512. function RpcNsGroupDeleteW;
  513. begin
  514. GetProcedureAddress(_RpcNsGroupDeleteW, rpcns4, 'RpcNsGroupDeleteW');
  515. asm
  516. MOV ESP, EBP
  517. POP EBP
  518. JMP [_RpcNsGroupDeleteW]
  519. end;
  520. end;
  521. var
  522. _RpcNsGroupDelete: Pointer;
  523. function RpcNsGroupDelete;
  524. begin
  525. GetProcedureAddress(_RpcNsGroupDelete, rpcns4, 'RpcNsGroupDelete' + AWSuffix);
  526. asm
  527. MOV ESP, EBP
  528. POP EBP
  529. JMP [_RpcNsGroupDelete]
  530. end;
  531. end;
  532. var
  533. _RpcNsGroupMbrAddA: Pointer;
  534. function RpcNsGroupMbrAddA;
  535. begin
  536. GetProcedureAddress(_RpcNsGroupMbrAddA, rpcns4, 'RpcNsGroupMbrAddA');
  537. asm
  538. MOV ESP, EBP
  539. POP EBP
  540. JMP [_RpcNsGroupMbrAddA]
  541. end;
  542. end;
  543. var
  544. _RpcNsGroupMbrAddW: Pointer;
  545. function RpcNsGroupMbrAddW;
  546. begin
  547. GetProcedureAddress(_RpcNsGroupMbrAddW, rpcns4, 'RpcNsGroupMbrAddW');
  548. asm
  549. MOV ESP, EBP
  550. POP EBP
  551. JMP [_RpcNsGroupMbrAddW]
  552. end;
  553. end;
  554. var
  555. _RpcNsGroupMbrAdd: Pointer;
  556. function RpcNsGroupMbrAdd;
  557. begin
  558. GetProcedureAddress(_RpcNsGroupMbrAdd, rpcns4, 'RpcNsGroupMbrAdd' + AWSuffix);
  559. asm
  560. MOV ESP, EBP
  561. POP EBP
  562. JMP [_RpcNsGroupMbrAdd]
  563. end;
  564. end;
  565. var
  566. _RpcNsGroupMbrRemoveA: Pointer;
  567. function RpcNsGroupMbrRemoveA;
  568. begin
  569. GetProcedureAddress(_RpcNsGroupMbrRemoveA, rpcns4, 'RpcNsGroupMbrRemoveA');
  570. asm
  571. MOV ESP, EBP
  572. POP EBP
  573. JMP [_RpcNsGroupMbrRemoveA]
  574. end;
  575. end;
  576. var
  577. _RpcNsGroupMbrRemoveW: Pointer;
  578. function RpcNsGroupMbrRemoveW;
  579. begin
  580. GetProcedureAddress(_RpcNsGroupMbrRemoveW, rpcns4, 'RpcNsGroupMbrRemoveW');
  581. asm
  582. MOV ESP, EBP
  583. POP EBP
  584. JMP [_RpcNsGroupMbrRemoveW]
  585. end;
  586. end;
  587. var
  588. _RpcNsGroupMbrRemove: Pointer;
  589. function RpcNsGroupMbrRemove;
  590. begin
  591. GetProcedureAddress(_RpcNsGroupMbrRemove, rpcns4, 'RpcNsGroupMbrRemove' + AWSuffix);
  592. asm
  593. MOV ESP, EBP
  594. POP EBP
  595. JMP [_RpcNsGroupMbrRemove]
  596. end;
  597. end;
  598. var
  599. _RpcNsGroupMbrInqBeginA: Pointer;
  600. function RpcNsGroupMbrInqBeginA;
  601. begin
  602. GetProcedureAddress(_RpcNsGroupMbrInqBeginA, rpcns4, 'RpcNsGroupMbrInqBeginA');
  603. asm
  604. MOV ESP, EBP
  605. POP EBP
  606. JMP [_RpcNsGroupMbrInqBeginA]
  607. end;
  608. end;
  609. var
  610. _RpcNsGroupMbrInqBeginW: Pointer;
  611. function RpcNsGroupMbrInqBeginW;
  612. begin
  613. GetProcedureAddress(_RpcNsGroupMbrInqBeginW, rpcns4, 'RpcNsGroupMbrInqBeginW');
  614. asm
  615. MOV ESP, EBP
  616. POP EBP
  617. JMP [_RpcNsGroupMbrInqBeginW]
  618. end;
  619. end;
  620. var
  621. _RpcNsGroupMbrInqBegin: Pointer;
  622. function RpcNsGroupMbrInqBegin;
  623. begin
  624. GetProcedureAddress(_RpcNsGroupMbrInqBegin, rpcns4, 'RpcNsGroupMbrInqBegin' + AWSuffix);
  625. asm
  626. MOV ESP, EBP
  627. POP EBP
  628. JMP [_RpcNsGroupMbrInqBegin]
  629. end;
  630. end;
  631. var
  632. _RpcNsGroupMbrInqNextA: Pointer;
  633. function RpcNsGroupMbrInqNextA;
  634. begin
  635. GetProcedureAddress(_RpcNsGroupMbrInqNextA, rpcns4, 'RpcNsGroupMbrInqNextA');
  636. asm
  637. MOV ESP, EBP
  638. POP EBP
  639. JMP [_RpcNsGroupMbrInqNextA]
  640. end;
  641. end;
  642. var
  643. _RpcNsGroupMbrInqNextW: Pointer;
  644. function RpcNsGroupMbrInqNextW;
  645. begin
  646. GetProcedureAddress(_RpcNsGroupMbrInqNextW, rpcns4, 'RpcNsGroupMbrInqNextW');
  647. asm
  648. MOV ESP, EBP
  649. POP EBP
  650. JMP [_RpcNsGroupMbrInqNextW]
  651. end;
  652. end;
  653. var
  654. _RpcNsGroupMbrInqNext: Pointer;
  655. function RpcNsGroupMbrInqNext;
  656. begin
  657. GetProcedureAddress(_RpcNsGroupMbrInqNext, rpcns4, 'RpcNsGroupMbrInqNext' + AWSuffix);
  658. asm
  659. MOV ESP, EBP
  660. POP EBP
  661. JMP [_RpcNsGroupMbrInqNext]
  662. end;
  663. end;
  664. var
  665. _RpcNsGroupMbrInqDone: Pointer;
  666. function RpcNsGroupMbrInqDone;
  667. begin
  668. GetProcedureAddress(_RpcNsGroupMbrInqDone, rpcns4, 'RpcNsGroupMbrInqDone');
  669. asm
  670. MOV ESP, EBP
  671. POP EBP
  672. JMP [_RpcNsGroupMbrInqDone]
  673. end;
  674. end;
  675. var
  676. _RpcNsProfileDeleteA: Pointer;
  677. function RpcNsProfileDeleteA;
  678. begin
  679. GetProcedureAddress(_RpcNsProfileDeleteA, rpcns4, 'RpcNsProfileDeleteA');
  680. asm
  681. MOV ESP, EBP
  682. POP EBP
  683. JMP [_RpcNsProfileDeleteA]
  684. end;
  685. end;
  686. var
  687. _RpcNsProfileDeleteW: Pointer;
  688. function RpcNsProfileDeleteW;
  689. begin
  690. GetProcedureAddress(_RpcNsProfileDeleteW, rpcns4, 'RpcNsProfileDeleteW');
  691. asm
  692. MOV ESP, EBP
  693. POP EBP
  694. JMP [_RpcNsProfileDeleteW]
  695. end;
  696. end;
  697. var
  698. _RpcNsProfileDelete: Pointer;
  699. function RpcNsProfileDelete;
  700. begin
  701. GetProcedureAddress(_RpcNsProfileDelete, rpcns4, 'RpcNsProfileDelete' + AWSuffix);
  702. asm
  703. MOV ESP, EBP
  704. POP EBP
  705. JMP [_RpcNsProfileDelete]
  706. end;
  707. end;
  708. var
  709. _RpcNsProfileEltAddA: Pointer;
  710. function RpcNsProfileEltAddA;
  711. begin
  712. GetProcedureAddress(_RpcNsProfileEltAddA, rpcns4, 'RpcNsProfileEltAddA');
  713. asm
  714. MOV ESP, EBP
  715. POP EBP
  716. JMP [_RpcNsProfileEltAddA]
  717. end;
  718. end;
  719. var
  720. _RpcNsProfileEltAddW: Pointer;
  721. function RpcNsProfileEltAddW;
  722. begin
  723. GetProcedureAddress(_RpcNsProfileEltAddW, rpcns4, 'RpcNsProfileEltAddW');
  724. asm
  725. MOV ESP, EBP
  726. POP EBP
  727. JMP [_RpcNsProfileEltAddW]
  728. end;
  729. end;
  730. var
  731. _RpcNsProfileEltAdd: Pointer;
  732. function RpcNsProfileEltAdd;
  733. begin
  734. GetProcedureAddress(_RpcNsProfileEltAdd, rpcns4, 'RpcNsProfileEltAdd' + AWSuffix);
  735. asm
  736. MOV ESP, EBP
  737. POP EBP
  738. JMP [_RpcNsProfileEltAdd]
  739. end;
  740. end;
  741. var
  742. _RpcNsProfileEltRemoveA: Pointer;
  743. function RpcNsProfileEltRemoveA;
  744. begin
  745. GetProcedureAddress(_RpcNsProfileEltRemoveA, rpcns4, 'RpcNsProfileEltRemoveA');
  746. asm
  747. MOV ESP, EBP
  748. POP EBP
  749. JMP [_RpcNsProfileEltRemoveA]
  750. end;
  751. end;
  752. var
  753. _RpcNsProfileEltRemoveW: Pointer;
  754. function RpcNsProfileEltRemoveW;
  755. begin
  756. GetProcedureAddress(_RpcNsProfileEltRemoveW, rpcns4, 'RpcNsProfileEltRemoveW');
  757. asm
  758. MOV ESP, EBP
  759. POP EBP
  760. JMP [_RpcNsProfileEltRemoveW]
  761. end;
  762. end;
  763. var
  764. _RpcNsProfileEltRemove: Pointer;
  765. function RpcNsProfileEltRemove;
  766. begin
  767. GetProcedureAddress(_RpcNsProfileEltRemove, rpcns4, 'RpcNsProfileEltRemove' + AWSuffix);
  768. asm
  769. MOV ESP, EBP
  770. POP EBP
  771. JMP [_RpcNsProfileEltRemove]
  772. end;
  773. end;
  774. var
  775. _RpcNsProfileEltInqBeginA: Pointer;
  776. function RpcNsProfileEltInqBeginA;
  777. begin
  778. GetProcedureAddress(_RpcNsProfileEltInqBeginA, rpcns4, 'RpcNsProfileEltInqBeginA');
  779. asm
  780. MOV ESP, EBP
  781. POP EBP
  782. JMP [_RpcNsProfileEltInqBeginA]
  783. end;
  784. end;
  785. var
  786. _RpcNsProfileEltInqBeginW: Pointer;
  787. function RpcNsProfileEltInqBeginW;
  788. begin
  789. GetProcedureAddress(_RpcNsProfileEltInqBeginW, rpcns4, 'RpcNsProfileEltInqBeginW');
  790. asm
  791. MOV ESP, EBP
  792. POP EBP
  793. JMP [_RpcNsProfileEltInqBeginW]
  794. end;
  795. end;
  796. var
  797. _RpcNsProfileEltInqBegin: Pointer;
  798. function RpcNsProfileEltInqBegin;
  799. begin
  800. GetProcedureAddress(_RpcNsProfileEltInqBegin, rpcns4, 'RpcNsProfileEltInqBegin' + AWSuffix);
  801. asm
  802. MOV ESP, EBP
  803. POP EBP
  804. JMP [_RpcNsProfileEltInqBegin]
  805. end;
  806. end;
  807. var
  808. _RpcNsProfileEltInqNextA: Pointer;
  809. function RpcNsProfileEltInqNextA;
  810. begin
  811. GetProcedureAddress(_RpcNsProfileEltInqNextA, rpcns4, 'RpcNsProfileEltInqNextA');
  812. asm
  813. MOV ESP, EBP
  814. POP EBP
  815. JMP [_RpcNsProfileEltInqNextA]
  816. end;
  817. end;
  818. var
  819. _RpcNsProfileEltInqNextW: Pointer;
  820. function RpcNsProfileEltInqNextW;
  821. begin
  822. GetProcedureAddress(_RpcNsProfileEltInqNextW, rpcns4, 'RpcNsProfileEltInqNextW');
  823. asm
  824. MOV ESP, EBP
  825. POP EBP
  826. JMP [_RpcNsProfileEltInqNextW]
  827. end;
  828. end;
  829. var
  830. _RpcNsProfileEltInqNext: Pointer;
  831. function RpcNsProfileEltInqNext;
  832. begin
  833. GetProcedureAddress(_RpcNsProfileEltInqNext, rpcns4, 'RpcNsProfileEltInqNext' + AWSuffix);
  834. asm
  835. MOV ESP, EBP
  836. POP EBP
  837. JMP [_RpcNsProfileEltInqNext]
  838. end;
  839. end;
  840. var
  841. _RpcNsProfileEltInqDone: Pointer;
  842. function RpcNsProfileEltInqDone;
  843. begin
  844. GetProcedureAddress(_RpcNsProfileEltInqDone, rpcns4, 'RpcNsProfileEltInqDone');
  845. asm
  846. MOV ESP, EBP
  847. POP EBP
  848. JMP [_RpcNsProfileEltInqDone]
  849. end;
  850. end;
  851. var
  852. _RpcNsEntryObjectInqBeginA: Pointer;
  853. function RpcNsEntryObjectInqBeginA;
  854. begin
  855. GetProcedureAddress(_RpcNsEntryObjectInqBeginA, rpcns4, 'RpcNsEntryObjectInqBeginA');
  856. asm
  857. MOV ESP, EBP
  858. POP EBP
  859. JMP [_RpcNsEntryObjectInqBeginA]
  860. end;
  861. end;
  862. var
  863. _RpcNsEntryObjectInqBeginW: Pointer;
  864. function RpcNsEntryObjectInqBeginW;
  865. begin
  866. GetProcedureAddress(_RpcNsEntryObjectInqBeginW, rpcns4, 'RpcNsEntryObjectInqBeginW');
  867. asm
  868. MOV ESP, EBP
  869. POP EBP
  870. JMP [_RpcNsEntryObjectInqBeginW]
  871. end;
  872. end;
  873. var
  874. _RpcNsEntryObjectInqBegin: Pointer;
  875. function RpcNsEntryObjectInqBegin;
  876. begin
  877. GetProcedureAddress(_RpcNsEntryObjectInqBegin, rpcns4, 'RpcNsEntryObjectInqBegin' + AWSuffix);
  878. asm
  879. MOV ESP, EBP
  880. POP EBP
  881. JMP [_RpcNsEntryObjectInqBegin]
  882. end;
  883. end;
  884. var
  885. _RpcNsEntryObjectInqNext: Pointer;
  886. function RpcNsEntryObjectInqNext;
  887. begin
  888. GetProcedureAddress(_RpcNsEntryObjectInqNext, rpcns4, 'RpcNsEntryObjectInqNext');
  889. asm
  890. MOV ESP, EBP
  891. POP EBP
  892. JMP [_RpcNsEntryObjectInqNext]
  893. end;
  894. end;
  895. var
  896. _RpcNsEntryObjectInqDone: Pointer;
  897. function RpcNsEntryObjectInqDone;
  898. begin
  899. GetProcedureAddress(_RpcNsEntryObjectInqDone, rpcns4, 'RpcNsEntryObjectInqDone');
  900. asm
  901. MOV ESP, EBP
  902. POP EBP
  903. JMP [_RpcNsEntryObjectInqDone]
  904. end;
  905. end;
  906. var
  907. _RpcNsEntryExpandNameA: Pointer;
  908. function RpcNsEntryExpandNameA;
  909. begin
  910. GetProcedureAddress(_RpcNsEntryExpandNameA, rpcns4, 'RpcNsEntryExpandNameA');
  911. asm
  912. MOV ESP, EBP
  913. POP EBP
  914. JMP [_RpcNsEntryExpandNameA]
  915. end;
  916. end;
  917. var
  918. _RpcNsEntryExpandNameW: Pointer;
  919. function RpcNsEntryExpandNameW;
  920. begin
  921. GetProcedureAddress(_RpcNsEntryExpandNameW, rpcns4, 'RpcNsEntryExpandNameW');
  922. asm
  923. MOV ESP, EBP
  924. POP EBP
  925. JMP [_RpcNsEntryExpandNameW]
  926. end;
  927. end;
  928. var
  929. _RpcNsEntryExpandName: Pointer;
  930. function RpcNsEntryExpandName;
  931. begin
  932. GetProcedureAddress(_RpcNsEntryExpandName, rpcns4, 'RpcNsEntryExpandName' + AWSuffix);
  933. asm
  934. MOV ESP, EBP
  935. POP EBP
  936. JMP [_RpcNsEntryExpandName]
  937. end;
  938. end;
  939. var
  940. _RpcNsMgmtBindingUnexportA: Pointer;
  941. function RpcNsMgmtBindingUnexportA;
  942. begin
  943. GetProcedureAddress(_RpcNsMgmtBindingUnexportA, rpcns4, 'RpcNsMgmtBindingUnexportA');
  944. asm
  945. MOV ESP, EBP
  946. POP EBP
  947. JMP [_RpcNsMgmtBindingUnexportA]
  948. end;
  949. end;
  950. var
  951. _RpcNsMgmtBindingUnexportW: Pointer;
  952. function RpcNsMgmtBindingUnexportW;
  953. begin
  954. GetProcedureAddress(_RpcNsMgmtBindingUnexportW, rpcns4, 'RpcNsMgmtBindingUnexportW');
  955. asm
  956. MOV ESP, EBP
  957. POP EBP
  958. JMP [_RpcNsMgmtBindingUnexportW]
  959. end;
  960. end;
  961. var
  962. _RpcNsMgmtBindingUnexport: Pointer;
  963. function RpcNsMgmtBindingUnexport;
  964. begin
  965. GetProcedureAddress(_RpcNsMgmtBindingUnexport, rpcns4, 'RpcNsMgmtBindingUnexport' + AWSuffix);
  966. asm
  967. MOV ESP, EBP
  968. POP EBP
  969. JMP [_RpcNsMgmtBindingUnexport]
  970. end;
  971. end;
  972. var
  973. _RpcNsMgmtEntryCreateA: Pointer;
  974. function RpcNsMgmtEntryCreateA;
  975. begin
  976. GetProcedureAddress(_RpcNsMgmtEntryCreateA, rpcns4, 'RpcNsMgmtEntryCreateA');
  977. asm
  978. MOV ESP, EBP
  979. POP EBP
  980. JMP [_RpcNsMgmtEntryCreateA]
  981. end;
  982. end;
  983. var
  984. _RpcNsMgmtEntryCreateW: Pointer;
  985. function RpcNsMgmtEntryCreateW;
  986. begin
  987. GetProcedureAddress(_RpcNsMgmtEntryCreateW, rpcns4, 'RpcNsMgmtEntryCreateW');
  988. asm
  989. MOV ESP, EBP
  990. POP EBP
  991. JMP [_RpcNsMgmtEntryCreateW]
  992. end;
  993. end;
  994. var
  995. _RpcNsMgmtEntryCreate: Pointer;
  996. function RpcNsMgmtEntryCreate;
  997. begin
  998. GetProcedureAddress(_RpcNsMgmtEntryCreate, rpcns4, 'RpcNsMgmtEntryCreate' + AWSuffix);
  999. asm
  1000. MOV ESP, EBP
  1001. POP EBP
  1002. JMP [_RpcNsMgmtEntryCreate]
  1003. end;
  1004. end;
  1005. var
  1006. _RpcNsMgmtEntryDeleteA: Pointer;
  1007. function RpcNsMgmtEntryDeleteA;
  1008. begin
  1009. GetProcedureAddress(_RpcNsMgmtEntryDeleteA, rpcns4, 'RpcNsMgmtEntryDeleteA');
  1010. asm
  1011. MOV ESP, EBP
  1012. POP EBP
  1013. JMP [_RpcNsMgmtEntryDeleteA]
  1014. end;
  1015. end;
  1016. var
  1017. _RpcNsMgmtEntryDeleteW: Pointer;
  1018. function RpcNsMgmtEntryDeleteW;
  1019. begin
  1020. GetProcedureAddress(_RpcNsMgmtEntryDeleteW, rpcns4, 'RpcNsMgmtEntryDeleteW');
  1021. asm
  1022. MOV ESP, EBP
  1023. POP EBP
  1024. JMP [_RpcNsMgmtEntryDeleteW]
  1025. end;
  1026. end;
  1027. var
  1028. _RpcNsMgmtEntryDelete: Pointer;
  1029. function RpcNsMgmtEntryDelete;
  1030. begin
  1031. GetProcedureAddress(_RpcNsMgmtEntryDelete, rpcns4, 'RpcNsMgmtEntryDelete' + AWSuffix);
  1032. asm
  1033. MOV ESP, EBP
  1034. POP EBP
  1035. JMP [_RpcNsMgmtEntryDelete]
  1036. end;
  1037. end;
  1038. var
  1039. _RpcNsMgmtEntryInqIfIdsA: Pointer;
  1040. function RpcNsMgmtEntryInqIfIdsA;
  1041. begin
  1042. GetProcedureAddress(_RpcNsMgmtEntryInqIfIdsA, rpcns4, 'RpcNsMgmtEntryInqIfIdsA');
  1043. asm
  1044. MOV ESP, EBP
  1045. POP EBP
  1046. JMP [_RpcNsMgmtEntryInqIfIdsA]
  1047. end;
  1048. end;
  1049. var
  1050. _RpcNsMgmtEntryInqIfIdsW: Pointer;
  1051. function RpcNsMgmtEntryInqIfIdsW;
  1052. begin
  1053. GetProcedureAddress(_RpcNsMgmtEntryInqIfIdsW, rpcns4, 'RpcNsMgmtEntryInqIfIdsW');
  1054. asm
  1055. MOV ESP, EBP
  1056. POP EBP
  1057. JMP [_RpcNsMgmtEntryInqIfIdsW]
  1058. end;
  1059. end;
  1060. var
  1061. _RpcNsMgmtEntryInqIfIds: Pointer;
  1062. function RpcNsMgmtEntryInqIfIds;
  1063. begin
  1064. GetProcedureAddress(_RpcNsMgmtEntryInqIfIds, rpcns4, 'RpcNsMgmtEntryInqIfIds' + AWSuffix);
  1065. asm
  1066. MOV ESP, EBP
  1067. POP EBP
  1068. JMP [_RpcNsMgmtEntryInqIfIds]
  1069. end;
  1070. end;
  1071. var
  1072. _RpcNsMgmtHandleSetExpAge: Pointer;
  1073. function RpcNsMgmtHandleSetExpAge;
  1074. begin
  1075. GetProcedureAddress(_RpcNsMgmtHandleSetExpAge, rpcns4, 'RpcNsMgmtHandleSetExpAge');
  1076. asm
  1077. MOV ESP, EBP
  1078. POP EBP
  1079. JMP [_RpcNsMgmtHandleSetExpAge]
  1080. end;
  1081. end;
  1082. var
  1083. _RpcNsMgmtInqExpAge: Pointer;
  1084. function RpcNsMgmtInqExpAge;
  1085. begin
  1086. GetProcedureAddress(_RpcNsMgmtInqExpAge, rpcns4, 'RpcNsMgmtInqExpAge');
  1087. asm
  1088. MOV ESP, EBP
  1089. POP EBP
  1090. JMP [_RpcNsMgmtInqExpAge]
  1091. end;
  1092. end;
  1093. var
  1094. _RpcNsMgmtSetExpAge: Pointer;
  1095. function RpcNsMgmtSetExpAge;
  1096. begin
  1097. GetProcedureAddress(_RpcNsMgmtSetExpAge, rpcns4, 'RpcNsMgmtSetExpAge');
  1098. asm
  1099. MOV ESP, EBP
  1100. POP EBP
  1101. JMP [_RpcNsMgmtSetExpAge]
  1102. end;
  1103. end;
  1104. var
  1105. _RpcNsBindingImportBeginA: Pointer;
  1106. function RpcNsBindingImportBeginA;
  1107. begin
  1108. GetProcedureAddress(_RpcNsBindingImportBeginA, rpcns4, 'RpcNsBindingImportBeginA');
  1109. asm
  1110. MOV ESP, EBP
  1111. POP EBP
  1112. JMP [_RpcNsBindingImportBeginA]
  1113. end;
  1114. end;
  1115. var
  1116. _RpcNsBindingImportBeginW: Pointer;
  1117. function RpcNsBindingImportBeginW;
  1118. begin
  1119. GetProcedureAddress(_RpcNsBindingImportBeginW, rpcns4, 'RpcNsBindingImportBeginW');
  1120. asm
  1121. MOV ESP, EBP
  1122. POP EBP
  1123. JMP [_RpcNsBindingImportBeginW]
  1124. end;
  1125. end;
  1126. var
  1127. _RpcNsBindingImportBegin: Pointer;
  1128. function RpcNsBindingImportBegin;
  1129. begin
  1130. GetProcedureAddress(_RpcNsBindingImportBegin, rpcns4, 'RpcNsBindingImportBegin' + AWSuffix);
  1131. asm
  1132. MOV ESP, EBP
  1133. POP EBP
  1134. JMP [_RpcNsBindingImportBegin]
  1135. end;
  1136. end;
  1137. var
  1138. _RpcNsBindingImportNext: Pointer;
  1139. function RpcNsBindingImportNext;
  1140. begin
  1141. GetProcedureAddress(_RpcNsBindingImportNext, rpcns4, 'RpcNsBindingImportNext');
  1142. asm
  1143. MOV ESP, EBP
  1144. POP EBP
  1145. JMP [_RpcNsBindingImportNext]
  1146. end;
  1147. end;
  1148. var
  1149. _RpcNsBindingImportDone: Pointer;
  1150. function RpcNsBindingImportDone;
  1151. begin
  1152. GetProcedureAddress(_RpcNsBindingImportDone, rpcns4, 'RpcNsBindingImportDone');
  1153. asm
  1154. MOV ESP, EBP
  1155. POP EBP
  1156. JMP [_RpcNsBindingImportDone]
  1157. end;
  1158. end;
  1159. var
  1160. _RpcNsBindingSelect: Pointer;
  1161. function RpcNsBindingSelect;
  1162. begin
  1163. GetProcedureAddress(_RpcNsBindingSelect, rpcns4, 'RpcNsBindingSelect');
  1164. asm
  1165. MOV ESP, EBP
  1166. POP EBP
  1167. JMP [_RpcNsBindingSelect]
  1168. end;
  1169. end;
  1170. {$ELSE}
  1171. function RpcNsBindingExportA; external rpcns4 name 'RpcNsBindingExportA';
  1172. function RpcNsBindingExportW; external rpcns4 name 'RpcNsBindingExportW';
  1173. function RpcNsBindingExport; external rpcns4 name 'RpcNsBindingExport' + AWSuffix;
  1174. function RpcNsBindingUnexportA; external rpcns4 name 'RpcNsBindingUnexportA';
  1175. function RpcNsBindingUnexportW; external rpcns4 name 'RpcNsBindingUnexportW';
  1176. function RpcNsBindingUnexport; external rpcns4 name 'RpcNsBindingUnexport' + AWSuffix;
  1177. function RpcNsBindingExportPnPA; external rpcns4 name 'RpcNsBindingExportPnPA';
  1178. function RpcNsBindingExportPnPW; external rpcns4 name 'RpcNsBindingExportPnPW';
  1179. function RpcNsBindingExportPnP; external rpcns4 name 'RpcNsBindingExportPnP' + AWSuffix;
  1180. function RpcNsBindingUnexportPnPA; external rpcns4 name 'RpcNsBindingUnexportPnPA';
  1181. function RpcNsBindingUnexportPnPW; external rpcns4 name 'RpcNsBindingUnexportPnPW';
  1182. function RpcNsBindingUnexportPnP; external rpcns4 name 'RpcNsBindingUnexportPnP' + AWSuffix;
  1183. function RpcNsBindingLookupBeginA; external rpcns4 name 'RpcNsBindingLookupBeginA';
  1184. function RpcNsBindingLookupBeginW; external rpcns4 name 'RpcNsBindingLookupBeginW';
  1185. function RpcNsBindingLookupBegin; external rpcns4 name 'RpcNsBindingLookupBegin' + AWSuffix;
  1186. function RpcNsBindingLookupNext; external rpcns4 name 'RpcNsBindingLookupNext';
  1187. function RpcNsBindingLookupDone; external rpcns4 name 'RpcNsBindingLookupDone';
  1188. function RpcNsGroupDeleteA; external rpcns4 name 'RpcNsGroupDeleteA';
  1189. function RpcNsGroupDeleteW; external rpcns4 name 'RpcNsGroupDeleteW';
  1190. function RpcNsGroupDelete; external rpcns4 name 'RpcNsGroupDelete' + AWSuffix;
  1191. function RpcNsGroupMbrAddA; external rpcns4 name 'RpcNsGroupMbrAddA';
  1192. function RpcNsGroupMbrAddW; external rpcns4 name 'RpcNsGroupMbrAddW';
  1193. function RpcNsGroupMbrAdd; external rpcns4 name 'RpcNsGroupMbrAdd' + AWSuffix;
  1194. function RpcNsGroupMbrRemoveA; external rpcns4 name 'RpcNsGroupMbrRemoveA';
  1195. function RpcNsGroupMbrRemoveW; external rpcns4 name 'RpcNsGroupMbrRemoveW';
  1196. function RpcNsGroupMbrRemove; external rpcns4 name 'RpcNsGroupMbrRemove' + AWSuffix;
  1197. function RpcNsGroupMbrInqBeginA; external rpcns4 name 'RpcNsGroupMbrInqBeginA';
  1198. function RpcNsGroupMbrInqBeginW; external rpcns4 name 'RpcNsGroupMbrInqBeginW';
  1199. function RpcNsGroupMbrInqBegin; external rpcns4 name 'RpcNsGroupMbrInqBegin' + AWSuffix;
  1200. function RpcNsGroupMbrInqNextA; external rpcns4 name 'RpcNsGroupMbrInqNextA';
  1201. function RpcNsGroupMbrInqNextW; external rpcns4 name 'RpcNsGroupMbrInqNextW';
  1202. function RpcNsGroupMbrInqNext; external rpcns4 name 'RpcNsGroupMbrInqNext' + AWSuffix;
  1203. function RpcNsGroupMbrInqDone; external rpcns4 name 'RpcNsGroupMbrInqDone';
  1204. function RpcNsProfileDeleteA; external rpcns4 name 'RpcNsProfileDeleteA';
  1205. function RpcNsProfileDeleteW; external rpcns4 name 'RpcNsProfileDeleteW';
  1206. function RpcNsProfileDelete; external rpcns4 name 'RpcNsProfileDelete' + AWSuffix;
  1207. function RpcNsProfileEltAddA; external rpcns4 name 'RpcNsProfileEltAddA';
  1208. function RpcNsProfileEltAddW; external rpcns4 name 'RpcNsProfileEltAddW';
  1209. function RpcNsProfileEltAdd; external rpcns4 name 'RpcNsProfileEltAdd' + AWSuffix;
  1210. function RpcNsProfileEltRemoveA; external rpcns4 name 'RpcNsProfileEltRemoveA';
  1211. function RpcNsProfileEltRemoveW; external rpcns4 name 'RpcNsProfileEltRemoveW';
  1212. function RpcNsProfileEltRemove; external rpcns4 name 'RpcNsProfileEltRemove' + AWSuffix;
  1213. function RpcNsProfileEltInqBeginA; external rpcns4 name 'RpcNsProfileEltInqBeginA';
  1214. function RpcNsProfileEltInqBeginW; external rpcns4 name 'RpcNsProfileEltInqBeginW';
  1215. function RpcNsProfileEltInqBegin; external rpcns4 name 'RpcNsProfileEltInqBegin' + AWSuffix;
  1216. function RpcNsProfileEltInqNextA; external rpcns4 name 'RpcNsProfileEltInqNextA';
  1217. function RpcNsProfileEltInqNextW; external rpcns4 name 'RpcNsProfileEltInqNextW';
  1218. function RpcNsProfileEltInqNext; external rpcns4 name 'RpcNsProfileEltInqNext' + AWSuffix;
  1219. function RpcNsProfileEltInqDone; external rpcns4 name 'RpcNsProfileEltInqDone';
  1220. function RpcNsEntryObjectInqBeginA; external rpcns4 name 'RpcNsEntryObjectInqBeginA';
  1221. function RpcNsEntryObjectInqBeginW; external rpcns4 name 'RpcNsEntryObjectInqBeginW';
  1222. function RpcNsEntryObjectInqBegin; external rpcns4 name 'RpcNsEntryObjectInqBegin' + AWSuffix;
  1223. function RpcNsEntryObjectInqNext; external rpcns4 name 'RpcNsEntryObjectInqNext';
  1224. function RpcNsEntryObjectInqDone; external rpcns4 name 'RpcNsEntryObjectInqDone';
  1225. function RpcNsEntryExpandNameA; external rpcns4 name 'RpcNsEntryExpandNameA';
  1226. function RpcNsEntryExpandNameW; external rpcns4 name 'RpcNsEntryExpandNameW';
  1227. function RpcNsEntryExpandName; external rpcns4 name 'RpcNsEntryExpandName' + AWSuffix;
  1228. function RpcNsMgmtBindingUnexportA; external rpcns4 name 'RpcNsMgmtBindingUnexportA';
  1229. function RpcNsMgmtBindingUnexportW; external rpcns4 name 'RpcNsMgmtBindingUnexportW';
  1230. function RpcNsMgmtBindingUnexport; external rpcns4 name 'RpcNsMgmtBindingUnexport' + AWSuffix;
  1231. function RpcNsMgmtEntryCreateA; external rpcns4 name 'RpcNsMgmtEntryCreateA';
  1232. function RpcNsMgmtEntryCreateW; external rpcns4 name 'RpcNsMgmtEntryCreateW';
  1233. function RpcNsMgmtEntryCreate; external rpcns4 name 'RpcNsMgmtEntryCreate' + AWSuffix;
  1234. function RpcNsMgmtEntryDeleteA; external rpcns4 name 'RpcNsMgmtEntryDeleteA';
  1235. function RpcNsMgmtEntryDeleteW; external rpcns4 name 'RpcNsMgmtEntryDeleteW';
  1236. function RpcNsMgmtEntryDelete; external rpcns4 name 'RpcNsMgmtEntryDelete' + AWSuffix;
  1237. function RpcNsMgmtEntryInqIfIdsA; external rpcns4 name 'RpcNsMgmtEntryInqIfIdsA';
  1238. function RpcNsMgmtEntryInqIfIdsW; external rpcns4 name 'RpcNsMgmtEntryInqIfIdsW';
  1239. function RpcNsMgmtEntryInqIfIds; external rpcns4 name 'RpcNsMgmtEntryInqIfIds' + AWSuffix;
  1240. function RpcNsMgmtHandleSetExpAge; external rpcns4 name 'RpcNsMgmtHandleSetExpAge';
  1241. function RpcNsMgmtInqExpAge; external rpcns4 name 'RpcNsMgmtInqExpAge';
  1242. function RpcNsMgmtSetExpAge; external rpcns4 name 'RpcNsMgmtSetExpAge';
  1243. function RpcNsBindingImportBeginA; external rpcns4 name 'RpcNsBindingImportBeginA';
  1244. function RpcNsBindingImportBeginW; external rpcns4 name 'RpcNsBindingImportBeginW';
  1245. function RpcNsBindingImportBegin; external rpcns4 name 'RpcNsBindingImportBegin' + AWSuffix;
  1246. function RpcNsBindingImportNext; external rpcns4 name 'RpcNsBindingImportNext';
  1247. function RpcNsBindingImportDone; external rpcns4 name 'RpcNsBindingImportDone';
  1248. function RpcNsBindingSelect; external rpcns4 name 'RpcNsBindingSelect';
  1249. {$ENDIF DYNAMIC_LINK}
  1250. end.