Ergebnis der Suchanfrage

• Forum: Neuen Beitrag zur Code-Library hinzufügen

  Re: Ausgabe einer Konsolenanwendung abfangen (simple Fassung

    Delphi
    by stz, 1. Nov 2008
  Doch :wink:
  Wenn Du zum Beispiel
  Konsole('cmd /c ver')
  aufrufst, startest Du damit die Windows-Eingabeaufforderung. Das ist zwar nicht so ganz dasselbe wie DOS, arbeitet aber auf jeden Fall mit dem Zeichensatz "DOS: Westlich".
  
  Du musst also die Zeichen, die dir die Funktion Konsole zurückgibt, vom DOS- in den Windows-Zeichensatz umwandeln. Entweder mit DeddyHs oder meinem Vorschlag.
  ...
• Forum: Neuen Beitrag zur Code-Library hinzufügen

  Re: Ausgabe einer Konsolenanwendung abfangen (simple Fassung

    Delphi
    by stz, 1. Nov 2008
  Das Problem liegt an den verschiedenen Zeichensätzen von DOS und Windows. Die ersten 127 Zeichen sind in allen Zeichensätzen gleich (ASCII). Die deutschen Umlaute liegen aber leider in den zweiten 128 Zeichen und dort passen die verschiedenen Zeichensätze von DOS und Windows nicht zusammen... Wie man das Problem allgemein gültig lösen kann, weiß ich leider auch nicht. Als einfache Lösung, könnte...
• Forum: Neuen Beitrag zur Code-Library hinzufügen

  Re: Ausgabe einer Konsolenanwendung abfangen (simple Fassung

    Delphi
    by stz, 22. Sep 2008
  Moin blackdrake,
  bei ver handelt es sich um keine Anwendung, sondern um einen Befehl der Windows-Shell. Da die Funktion aber eine Anwendung startet, muss man zunächst die Anwendung cmd starten, um den Befehl auszuführen. Du kannst die Funktion natürlich recht einfach abändern, indem du dem übergebenen String einfach automatisch immer ein 'cmd /c ' voransetzt.
  
  
  Das müsste eigentlich Windows...
• Forum: Neuen Beitrag zur Code-Library hinzufügen

  Ausgabe einer Konsolenanwendung abfangen (simple Fassung)

    Delphi
    by stz, 24. Aug 2008
  Moin moin,
  mithilfe von Jens Code und diesem Delphi-Treff Tipp habe ich eine kleine Funktion geschrieben, die eine Konsolenanwendung startet, auf deren Ende wartet und die Ausgabe als String zurückliefert:
  
  function Konsole(const Command: String): String;
  var
  StartupInfo: TStartupInfo;
  ProcessInfo: TProcessInformation;
  SecurityAttr: TSecurityAttributes;
  OutputPipeRead,...