易之磁盘虚拟

系统结构:列盘符,列虚拟盘符,映射磁盘,删除磁盘,取驱动器数,查询磁盘,QueryDosDevice,GetLastError,FormatMessage,

======窗口程序集1

           |  |

           |  |------ 列盘符

           |  |

           |  |------ 列虚拟盘符

           |  |

           |  |------ __启动窗口_创建完毕

           |  |

           |  |------ _按钮1_被单击

           |  |

           |  |------ _按钮2_被单击

           |  |

           |  |------ _按钮3_被单击

           |  |

           |  |------ __启动窗口_可否被关闭

           |  |

           |  |------ _按钮4_被单击

           |  |

           |  |

======调用的Dll

           |  |

           |  |---[dll]------   映射磁盘

           |  |

           |  |---[dll]------   删除磁盘

           |  |

           |  |---[dll]------   取驱动器数

           |  |

           |  |---[dll]------   查询磁盘

           |  |

           |  |---[dll]------   QueryDosDevice

           |  |

           |  |---[dll]------   GetLastError

           |  |

           |  |---[dll]------   FormatMessage

调用的DLL命令:

.DLL命令 映射磁盘, 整数型, "kernel32", "DefineDosDeviceA", , 定义、重定义或删除DOS的设备名

    .参数 dwFlags, 整数型, , 0

    .参数 lpDeviceName, 文本型

    .参数 lpTargetPath, 文本型

.DLL命令 删除磁盘, 整数型, "kernel32", "DefineDosDeviceA", , 定义、重定义或删除DOS的设备名

    .参数 dwFlags, 整数型, , 2

    .参数 lpDeviceName, 文本型

    .参数 lpTargetPath, 整数型, , 0

.DLL命令 取驱动器数, 整数型, , "GetLogicalDrives"

.DLL命令 查询磁盘, 整数型, , "QueryDosDeviceA", , 返回lpTargetPath的长度,非0表示成功

    .参数 lpDeviceName, 文本型, , 0

    .参数 lpTargetPath, 文本型

    .参数 ucchMax, 整数型

.DLL命令 QueryDosDevice, 整数型, "Kernel32.dll", "QueryDosDeviceA"

    .参数 lpDeviceName, 文本型, 传址

    .参数 lpTargetPath, 字节集, 传址

    .参数 ucchMax, 整数型

.DLL命令 GetLastError, 整数型, "Kernel32.dll", "GetLastError"

.DLL命令 FormatMessage, 整数型, "kernel32.dll", "FormatMessageA", , 格式化信息

    .参数 dwFlags, 整数型, , 信息类型

    .参数 lpSource, 整数型, , 给0

    .参数 dwMessageId, 整数型, , 信息ID

    .参数 dwLanguageId, 整数型, , 语言ID

    .参数 lpBuffer, 文本型, 传址, 返回的信息（提供变量）

    .参数 nSize, 整数型, , 缓冲区长度

    .参数 Arguments, 整数型, , 给0