Thema: Delphi Konsole oder was?

Einzelnen Beitrag anzeigen

Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.840 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Konsole oder was?

  Alt 23. Jun 2004, 17:24
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.

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
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
  Mit Zitat antworten Zitat