Konsole offen halten

[fwsp]

Zitat von Niko:

Hi,

ohne dass ich sicher bin, ob sich VCL Objekte in einer Konsolenanwendung überhaupt sinnvoll verhalten: Hast du schon mal ShowModal probiert?

Delphi-Quellcode:

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  Unit1 in 'Unit1.pas' {Form1};

begin
  Writeln('ffijd');
  Form1 := TForm1.Create(Form1);
  Form1.ShowModal;
  Form1.Free;
  Writeln('dsfasd');
  Readln;

  { TODO -oUser -cConsole Main : Hier Code einfügen }
end.

das funktioniert jedenfalls.