Delphi - Erfassung stdout und stderr Ausgabe von statisch gelinkte MSVC++ kompilierte DLL

Question

Ich habe versucht, stdout und Stderr Ausgabe von einer DLL in MSVC kompiliert zu erfassen ++, die meine Delphi App zu statisch verknüpft, aber bisher noch nicht erfolgreich gewesen .

procedure Test; 
var 
    fs: TFileStream; 

begin 
    fs := TFileStream.Create('C:\temp\output.log', fmCreate or fmShareDenyWrite); 
    SetStdHandle(STD_OUTPUT_HANDLE, fs.Handle); 
    SetStdHandle(STD_ERROR_HANDLE, fs.Handle); 

    dllFunc(0); // Writes to stdout in MSVC++ console app, but not here 
    // fs.Length is always zero 

    fs.Free; 
end; 

Ich dachte, ich war auf dem richtigen Weg, aber es funktioniert nicht.

1. Ist SetStdHandle() genug?
2. Ist TFileStream das Richtige für Sie?
3. Benutzt ich TFileStream richtig für SetStdHandle()?
4. Ist es möglich, dass die DLL seine stdout/stderr-Griffe setzt, wenn die App lädt? Wenn ja, wo ist der beste Ort, um SetStdHandle() oder gleichwertig zu verwenden?

Jede Hilfe wäre willkommen.

Answer 1

Wenn die DLL greift die stdout behandelt, wenn es geladen wird, dann werden Sie die DLL dynamisch laden müssen, nachdem Sie die stdout in Ihrem Code Griffe geändert haben.

Answer 2

Wenn Ihre App eine Konsolen-App ist, können Sie einfach das Ding ausführen und alles erfassen, um mit Umleitung zu Standout. das heißt

C:\MyAppWhichCallsDll.exe > c:\temp\output.log