易語言文件查找模塊源碼

系統結構:取DOS返回,查找文件DOS版,查找文件支持庫版,CreatePipe,PeekNamedPipe,

======程序集1
           |  |
           |  |------ _啟動子程序
           |  |
           |  |------ 取DOS返回
           |  |
           |  |------ 查找文件DOS版
           |  |
           |  |------ 查找文件支持庫版
           |  |
           |  |
======調用的Dll
           |  |
           |  |---[dll]------   CreatePipe
           |  |
           |  |---[dll]------   _創建新進程
           |  |
           |  |---[dll]------   _關閉對象
           |  |
           |  |---[dll]------   PeekNamedPipe
           |  |
           |  |---[dll]------   _讀出文件中數據
           |  |
           |  |---[dll]------   _取中斷進程退出代碼

調用的DLL命令:

.DLL命令 CreatePipe, 整數型, , "CreatePipe"
    .參數 phReadPipe, 整數型, 傳址
    .參數 phWritePipe, 整數型, 傳址
    .參數 lpPipeAttributes, SECURITY_ATTRIBUTES, 傳址
    .參數 nSize, 整數型

.DLL命令 _創建新進程, 整數型, , "CreateProcessA"
    .參數 lpApplicationName, 整數型, , 要執行的應用程序的名字
    .參數 lpCommandLine, 文本型, , 要執行的命令行
    .參數 lpProcessAttributes, 整數型, , SECURITY_ATTRIBUTES，指定一個SECURITY_ATTRIBUTES結構，或傳遞零值表示采用不允許繼承的默認描述符
    .參數 lpThreadAttributes, 整數型, , SECURITY_ATTRIBUTES，指定一個SECURITY_ATTRIBUTES結構，或傳遞零值表示采用不允許繼承的默認描述符。
    .參數 bInheritHandles, 邏輯型, , TRUE表示允許當前進程中的所有句柄都由新建的子進程繼承
    .參數 dwCreationFlags, 整數型
    .參數 lpEnvironment, 整數型, , 任何類型，指向一個環境塊的指針
    .參數 lpCurrentDriectory, 整數型, , 新進程的當前目錄路徑
    .參數 lpStartupInfo, STARTUPINFO, 傳址, STARTUPINFO，指定一個STARTUPINFO結構，其中包含了創建進程時使用的附加信息
    .參數 lpProcessInformation, PROCESS_INFORMATION, 傳址, PROCESS_INFORMATION，該結構用于容納新進程的進程和線程標識。

.DLL命令 _關閉對象, 整數型, "kernel32", "CloseHandle"
    .參數 對象句柄, 整數型

.DLL命令 PeekNamedPipe, 整數型, , "PeekNamedPipe"
    .參數 hNamedPipe, 整數型
    .參數 lpBuffer, 整數型
    .參數 nBufferSize, 整數型
    .參數 lpBytesRead, 整數型
    .參數 lpTotalBytesAvail, 整數型, 傳址
    .參數 lpBytesLeftThisMessage, 整數型

.DLL命令 _讀出文件中數據, 整數型, , "ReadFile"
    .參數 hFile, 整數型
    .參數 lpBuffer, 字節集, 傳址
    .參數 nNumberOfBytesToRead, 整數型
    .參數 lpNumberOfBytesRead, 整數型, 傳址
    .參數 lpOverlapped, 整數型

.DLL命令 _取中斷進程退出代碼, 整數型, , "GetExitCodeProcess", , 非零表示成功，零表示失敗。
    .參數 hProcess, 整數型, , 用于裝載進程退出代碼的一個長整數變量。
    .參數 lpExitCode, 整數型, 傳址, 想獲取退出代碼的一個進程的句柄