⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 jwawinnetwk.pas

📁 比较全面的win32api开发包
💻 PAS
📖 第 1 页 / 共 5 页
字号:
function WNetCancelConnection; external mpr name 'WNetCancelConnectionW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetCancelConnection: Pointer;

function WNetCancelConnection;
begin
  GetProcedureAddress(_WNetCancelConnection, mpr, 'WNetCancelConnectionA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetCancelConnection]
  end;
end;
{$ELSE}
function WNetCancelConnection; external mpr name 'WNetCancelConnectionA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetCancelConnection2A: Pointer;

function WNetCancelConnection2A;
begin
  GetProcedureAddress(_WNetCancelConnection2A, mpr, 'WNetCancelConnection2A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetCancelConnection2A]
  end;
end;
{$ELSE}
function WNetCancelConnection2A; external mpr name 'WNetCancelConnection2A';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetCancelConnection2W: Pointer;

function WNetCancelConnection2W;
begin
  GetProcedureAddress(_WNetCancelConnection2W, mpr, 'WNetCancelConnection2W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetCancelConnection2W]
  end;
end;
{$ELSE}
function WNetCancelConnection2W; external mpr name 'WNetCancelConnection2W';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetCancelConnection2: Pointer;

function WNetCancelConnection2;
begin
  GetProcedureAddress(_WNetCancelConnection2, mpr, 'WNetCancelConnection2W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetCancelConnection2]
  end;
end;
{$ELSE}
function WNetCancelConnection2; external mpr name 'WNetCancelConnection2W';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetCancelConnection2: Pointer;

function WNetCancelConnection2;
begin
  GetProcedureAddress(_WNetCancelConnection2, mpr, 'WNetCancelConnection2A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetCancelConnection2]
  end;
end;
{$ELSE}
function WNetCancelConnection2; external mpr name 'WNetCancelConnection2A';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetGetConnectionA: Pointer;

function WNetGetConnectionA;
begin
  GetProcedureAddress(_WNetGetConnectionA, mpr, 'WNetGetConnectionA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetGetConnectionA]
  end;
end;
{$ELSE}
function WNetGetConnectionA; external mpr name 'WNetGetConnectionA';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetGetConnectionW: Pointer;

function WNetGetConnectionW;
begin
  GetProcedureAddress(_WNetGetConnectionW, mpr, 'WNetGetConnectionW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetGetConnectionW]
  end;
end;
{$ELSE}
function WNetGetConnectionW; external mpr name 'WNetGetConnectionW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetGetConnection: Pointer;

function WNetGetConnection;
begin
  GetProcedureAddress(_WNetGetConnection, mpr, 'WNetGetConnectionW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetGetConnection]
  end;
end;
{$ELSE}
function WNetGetConnection; external mpr name 'WNetGetConnectionW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetGetConnection: Pointer;

function WNetGetConnection;
begin
  GetProcedureAddress(_WNetGetConnection, mpr, 'WNetGetConnectionA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetGetConnection]
  end;
end;
{$ELSE}
function WNetGetConnection; external mpr name 'WNetGetConnectionA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetUseConnectionA: Pointer;

function WNetUseConnectionA;
begin
  GetProcedureAddress(_WNetUseConnectionA, mpr, 'WNetUseConnectionA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetUseConnectionA]
  end;
end;
{$ELSE}
function WNetUseConnectionA; external mpr name 'WNetUseConnectionA';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetUseConnectionW: Pointer;

function WNetUseConnectionW;
begin
  GetProcedureAddress(_WNetUseConnectionW, mpr, 'WNetUseConnectionW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetUseConnectionW]
  end;
end;
{$ELSE}
function WNetUseConnectionW; external mpr name 'WNetUseConnectionW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetUseConnection: Pointer;

function WNetUseConnection;
begin
  GetProcedureAddress(_WNetUseConnection, mpr, 'WNetUseConnectionW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetUseConnection]
  end;
end;
{$ELSE}
function WNetUseConnection; external mpr name 'WNetUseConnectionW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetUseConnection: Pointer;

function WNetUseConnection;
begin
  GetProcedureAddress(_WNetUseConnection, mpr, 'WNetUseConnectionA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetUseConnection]
  end;
end;
{$ELSE}
function WNetUseConnection; external mpr name 'WNetUseConnectionA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetConnectionDialog: Pointer;

function WNetConnectionDialog;
begin
  GetProcedureAddress(_WNetConnectionDialog, mpr, 'WNetConnectionDialog');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetConnectionDialog]
  end;
end;
{$ELSE}
function WNetConnectionDialog; external mpr name 'WNetConnectionDialog';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetDisconnectDialog: Pointer;

function WNetDisconnectDialog;
begin
  GetProcedureAddress(_WNetDisconnectDialog, mpr, 'WNetDisconnectDialog');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetDisconnectDialog]
  end;
end;
{$ELSE}
function WNetDisconnectDialog; external mpr name 'WNetDisconnectDialog';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetConnectionDialog1A: Pointer;

function WNetConnectionDialog1A;
begin
  GetProcedureAddress(_WNetConnectionDialog1A, mpr, 'WNetConnectionDialog1A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetConnectionDialog1A]
  end;
end;
{$ELSE}
function WNetConnectionDialog1A; external mpr name 'WNetConnectionDialog1A';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetConnectionDialog1W: Pointer;

function WNetConnectionDialog1W;
begin
  GetProcedureAddress(_WNetConnectionDialog1W, mpr, 'WNetConnectionDialog1W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetConnectionDialog1W]
  end;
end;
{$ELSE}
function WNetConnectionDialog1W; external mpr name 'WNetConnectionDialog1W';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetConnectionDialog1: Pointer;

function WNetConnectionDialog1;
begin
  GetProcedureAddress(_WNetConnectionDialog1, mpr, 'WNetConnectionDialog1W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetConnectionDialog1]
  end;
end;
{$ELSE}
function WNetConnectionDialog1; external mpr name 'WNetConnectionDialog1W';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetConnectionDialog1: Pointer;

function WNetConnectionDialog1;
begin
  GetProcedureAddress(_WNetConnectionDialog1, mpr, 'WNetConnectionDialog1A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetConnectionDialog1]
  end;
end;
{$ELSE}
function WNetConnectionDialog1; external mpr name 'WNetConnectionDialog1A';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetDisconnectDialog1A: Pointer;

function WNetDisconnectDialog1A;
begin
  GetProcedureAddress(_WNetDisconnectDialog1A, mpr, 'WNetDisconnectDialog1A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetDisconnectDialog1A]
  end;
end;
{$ELSE}
function WNetDisconnectDialog1A; external mpr name 'WNetDisconnectDialog1A';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetDisconnectDialog1W: Pointer;

function WNetDisconnectDialog1W;
begin
  GetProcedureAddress(_WNetDisconnectDialog1W, mpr, 'WNetDisconnectDialog1W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetDisconnectDialog1W]
  end;
end;
{$ELSE}
function WNetDisconnectDialog1W; external mpr name 'WNetDisconnectDialog1W';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetDisconnectDialog1: Pointer;

function WNetDisconnectDialog1;
begin
  GetProcedureAddress(_WNetDisconnectDialog1, mpr, 'WNetDisconnectDialog1W');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetDisconnectDialog1]
  end;
end;
{$ELSE}
function WNetDisconnectDialog1; external mpr name 'WNetDisconnectDialog1W';
{$ENDIF DYNAMIC_LINK}
{$ELSE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetDisconnectDialog1: Pointer;

function WNetDisconnectDialog1;
begin
  GetProcedureAddress(_WNetDisconnectDialog1, mpr, 'WNetDisconnectDialog1A');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetDisconnectDialog1]
  end;
end;
{$ELSE}
function WNetDisconnectDialog1; external mpr name 'WNetDisconnectDialog1A';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}

{$IFDEF DYNAMIC_LINK}
var
  _WNetOpenEnumA: Pointer;

function WNetOpenEnumA;
begin
  GetProcedureAddress(_WNetOpenEnumA, mpr, 'WNetOpenEnumA');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetOpenEnumA]
  end;
end;
{$ELSE}
function WNetOpenEnumA; external mpr name 'WNetOpenEnumA';
{$ENDIF DYNAMIC_LINK}

{$IFDEF DYNAMIC_LINK}
var
  _WNetOpenEnumW: Pointer;

function WNetOpenEnumW;
begin
  GetProcedureAddress(_WNetOpenEnumW, mpr, 'WNetOpenEnumW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetOpenEnumW]
  end;
end;
{$ELSE}
function WNetOpenEnumW; external mpr name 'WNetOpenEnumW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}

{$IFDEF DYNAMIC_LINK}
var
  _WNetOpenEnum: Pointer;

function WNetOpenEnum;
begin
  GetProcedureAddress(_WNetOpenEnum, mpr, 'WNetOpenEnumW');
  asm
    mov esp, ebp
    pop ebp
    jmp [_WNetOpenEnum]
  end;
end;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -