Einzelnen Beitrag anzeigen

citybreaker
(Gast)

n/a Beiträge
 
#3

Re: [HowTo] Einen Chat programmieren?

  Alt 6. Apr 2004, 18:48
Ok, habe ein Deutsches Tutorial beu Delphi Source gefunden und
dierekt mal los getippt.

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  TCPServer.Active := true;
end;

procedure TForm1.TCPServerExecute(AThread: TIdPeerThread);
begin
  with AThread.Connection do begin
    WriteLn('Hallo Welt');
    Disconnect;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TCPClient do begin
    Connect;
    try
     ListBox1.Items.Add(ReadLn);
    finally
     Disconnect;
    end;
  end;
end;
Sobald ich nun auf den Button klicke wird mir etwas mitgeteilt.
"Sockert Error #11001
Host not found"

Muss ich bei host etwas bestimmtes angeben?
  Mit Zitat antworten Zitat