Du hast ja dann eine Mischung zwischen
GUI-Anwendung und Konsolenprogramm.
Das geht nicht über Optionen/Linker sondern man kann das Konsolenfenster dynmaisch erzeugen:
Delphi-Quellcode:
program testping;
uses
Windows, // <= hinzu
Forms,
Unit1 in 'Unit1.pas' {Form1},
PingThrd in 'PingThrd.pas',
icmp in 'icmp.pas';
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
AllocConsole;
writeln('Start');
Application.Run;
FreeConsole;
end.
Du möchtest wahrscheinlich, dass dein Programm ins Konsolenfenster schreibt,
wenn es von der Eingabeaufforderung gestartet wurde
und mit sich mit
GUI präsentiert, wenn es per Doppelklick gestartet wurde,oder?