ICQ/Konsole

[Matrix Scripter]

Ich habs nochmal mit ner Form versucht

Delphi-Quellcode:

unit t;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ICQClient, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  icq: TICQClient;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  icq.Login();
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  icq := TICQClient.Create(nil);
  icq.ICQServer := 'login.icq.com';
  icq.ICQPort := 5190;
  icq.UIN := 523523523;
  icq.Password := 'PASSWORD';
end;
end.

Hier kann ich problemlos verbinden, nur eben bei dem Konsolenprogramm nicht...weiss keiner rat?