vcl-komponenten in konsolenanwendung?

[Illuminator-23-5]

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils, LANServer;

var
  Server: TLANServer;

begin
  Server := TLANServer.Create(nil);
  Server.Port := 1000;
  Server.Active := true;
  writeln('Start client');
  readln;
  Server.Socket.Connections[0].SendText('test');
  readln;
end.

das funzt bei mir nicht!