🚀 go-pugleaf

"George" <george@nospam.org> wrote in message
news:3fbd535a@newsgroups.borland.com...
> Well the file is c:\\ ... i wrote C:\ in the newsgroups only.

Please *always* copy/paste your actual code as-is, never type it by hand.
That is too error-prone, and can lead to conflicting information.

> Can you please give me an example of this code in CreateProcess?

(untested, and error handler omitted for simplicity)

    HANDLE hFile = CreateFile("c:\\output.txt", GENERIC_READ |
GENERIC_WRITE, FILE_SHARE_READ, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL,
NULL);

    HANDLE hReadPipe = NULL;
    HANDLE hWritePipe = NULL;
    CreatePipe(&hReadPipe, &hWritePipe, NULL, 0);

    STARTUPINFO si = {sizeof(STARTUPINFO), 0} ;
    PROCESS_INFORMATION pi = {0};

    si.dwFlags = STARTF_USESTDHANDLES;
    si.hStdInput = GetStdHandle(STD_INPUT_HANDLE);
    si.hStdOutput = hWritePipe;
    si.hStdError = hWritePipe;

    if( CreateProcess(NULL,
"c:\\mysqldump.exe --user=root --password=pass --database=data1",
            NULL, NULL, TRUE, 0, NULL, "c:\\", &si, &pi) )
    {
        BYTE buffer[1024];
        DWORD ProcRes = STILL_ACTIVE;

        while( ProcRes == STILL_ACTIVE )
        {
            DWORD dwRead = 0, dwWritten = 0;
            if( ReadFile(hReadPipe, buffer, 1024, &dwRead, NULL) )
                WriteFile(hFile, buffer, dwRead, &dwWritten, NULL);

            GetExitCodeProcess(pi.hProcess, &ProcRes);
            Application->ProcessMessages();
        }

        CloseHandle(pi.hThread);
        CloseHandle(pi.hProcess);
    }

    CloseHandle(hReadPipe);
    CloseHandle(hWritePipe);
    CloseHandle(hFile);

> I can't make it work to wait until finish.

CreateProcess() returns the process handle just like ShellExecuteEx() can,
so your current loop to wait until the process finishes should still work
fine.  Alternatively, use WaitForSingleObject() instead of
GetExitCodeProcess().


Gambit