Zitat von
Chris1986:
Was muss ich tun, damit das Konsolenfenster geöffnet bleibt, der idTCPServer weiter läuft und ich zwischen durch noch mit writln Texte ausgeben kann (z.B. im Onconnect-Ereignis)?
Du musst die Konsolenanwendung in einer Schleife aufhalten.
Delphi-Quellcode:
var
ShutDownServer : boolean; // Globale Variable
begin
ShutDownServer := False;
// ...
while not (ShutDownServer or Eof(Input)) do Sleep(50);
// ...
end;
end.
Wenn du Strg-C drückst oder die Variable ShutDownServer auf True setzt,
endet die Konsolenanwendung.