Dos-Programm in Fensterapplikaion anzeigen

[MacGuyver]

Moin Leute

Ich habe ein Dos-Programm und möchte das Teil so starten, daß ich es in meiner Application angezeigt wird. Ich möchte nicht extra ein neues Fenster haben, sondern in meiner Delphiapplication. Wenn man dann noch den Zeichensatz festlegen kann und mitbekommt, wenn das Dos-Programm geschlossen wird, wäre das genau das, was ich suche. Hat jemand eine Idee?

Dank im Voraus



Stefan

[CCRDude]

TDosCommand

[MacGuyver]

@CCRDude: Danke für deine schnelle Antwort.

Mit dem Teil habe ich auch geliebäugelt. Ich benötige eine Ansicht wie in einem Konsolenfenster, mit TDosCommand kommt nur der reine Text zurück.

Nein, es soll quasi das Konsolenfenster ersetzten.

[Klaus01]

Hier findest Du einen Beitrag von Sir Thornberry
indem ein Beispiel ist wie das ganze über Pipes geregelt wird.

Aber was stört Dich denn an TDosCommand, eine Console ist doch auch nur eine Textumgebung.

Grüße
Klaus

[CCRDude]

Hmmm... meinst Du mit "das Konsolenfenster komplett ersetzen", daß auch Interaktion möglich sein muß?

Für den Fall würde ich sogar wieder ein paar Schritte zurückgehen, das Programm weiterhin "normal" extern starten und dann per SetWindowParent (o.ä.) das Konsolenfenster in ein TPanel reinmogeln. Zumindest hab ich das mal so gemacht, als ich das auf die schnelle brauchte, weil eine Komponente, die ein interaktives Terminal anbietet, mir da fremd war (und noch ist)

[MacGuyver]

Ja, danke CCRDude.

Ich habe einen Eintrag von Shaman gefunden, wo er die Konsole auf ein TControl bindet und dabei den Rahmen überdeckt. Kein Rahmen, keine Ziehen und Verschieben. Irgendwie klappt das noch nicht so unter XP.

Hast du für mich vielleicht Beispielcode?

[idontwantaname]

Und inwiefern klappt es nicht? Irgendwie so ist nicht gerade eine sehr hilfreiche Fehlerbeschreibung.

[MacGuyver]

Oh, klar, ich habe da mal etwas zusammengepack: Die HelloWrl.Exe nach C:\ kopieren und Gas geben. Das Fenster steht nicht oben links in der Ecke.

Ach ja, Delphi5 Pro

[CCRDude]

Naja, was dabei typischerweise nicht klappt, liegt daran, daß cmd.exe noch einen anderen Fenstertyp zu haben scheint als so ziemlich jedes andere Fenster. Mein Code von damals schafft es momentan leider auch nicht, aher nur zwei Ansätze: per FindWindow (oder aus SHELLEXECUTEINFO bei Verwendung von ShellExecuteEx ?) das Handle des ausgeführten cmd.exe nehmen, und per Windows.SetParent(h, panelTest.Handle); den Parent setzen. Das Handle aus FindWindow klappt unter meinem 64bittigen XP gerade auch nicht

Idee: schau mal das Projekt Console2 bei Sourceforge an... dürfte zwar C sein, macht das aber sehr elegant und funktionierend.