Konsole oder was?

**MaBuSE**

Hallo,

Folgende Situation:
Ich möchte ein Programmschreiben, das wenn es aus der Konsole aufgerufen wird eine Textausgabe bringt, wenn es aber aus Windows direkt (Explorer oder so) aufgerufen wird soll ein Form erscheinen.

zusammenfalten · markieren

Delphi-Quellcode:

			program Project1;

uses

  Forms,

  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin

  if isConsole then

  begin

    WriteLn('Konsole ist geil.');

  end

  else

  begin

    Application.Initialize;

    Application.CreateForm(TForm1, Form1);

    Application.Run;

  end;

end.

Das bringt ja leider nichts, weil isConsole ja nur angibt, ob es sich um ein Konsolenprogramm handelt.

Frage:
Wie krieg ich raus, ob eine Anwendung aus dem "Textfenster" gestartet wurde oder nicht?

Deshalb der Titel: "Konsole oder was?"

Danke für die vielen Antworten...

ps: hoffentlich ließt das NicoDE, der kennt sich doch mit so was aus

Konsole oder was?

Konsole oder was?

Forumregeln