Ergebnis der Suchanfrage

• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 4. Feb 2006
  Also Leute,
  
  ich habe sowohl mit den "normalen" Sockets als auch mit den Indy-Sockets (war etwas schwieriger, ist aber schneller) ein Intranet-Chat-Programm geschrieben.
  
  Ihr könnt es unter
  
  http://lmg-solutions.de
  
  herunterladen. Es müsste auch global funktionieren.
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 28. Dez 2005
  Danke,
  
  mittlerweile habe ich mit
  
  ToAddr := TcpServer1.GetSocketAddr(ClientSocket.RemoteHost,ClientSocket.RemotePort);
  
  auch die neue Adresse für
  
  if TcpServer1.SendTo(Txt,sizeof(Txt),ToAddr)<>-1 then
  Melde(3,'gesendet') else Melde(3,'nicht gesendet')
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 28. Dez 2005
  Sag mal Marabu,
  
  könntest Du mir freundlicherweise auch die Server-Antwort auf Deine "Get" - Anfrage des Client hier hereinstellen. Insbesondere stelle ich in der Prozedur
  procedure TForm1.TcpServer1Accept(Sender: TObject;
  ClientSocket: TCustomIpClient);
  unter ClientSocket keine brauchbare Host und Port-Angabe fest.
  
  Gruß Jumbo
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 28. Dez 2005
  Also Marabu, zunächst mal vielen Dank für deine Mühe.
  
  Ich habe einen Elsa - Lan - Router, der die Adressen automatisch vergibt. Du hast recht, jetzt muss ich mich mal um die Ports kümmern. Außerdem habe ich jetzt bei den Rechnern den Wurm-Schutz temporär abgeschaltet und da lief es z.B. auf Port 81 problemlos. Jetzt werde ich noch ein paar Comboboxen für die schnelle Wahl von Ports und...
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 27. Dez 2005
  Ich bin einen Schritt weiter gekommen. Mit Port 80 komme ich an einem Rechner weiter. An einem anderen Rechner bekomme ich mit Port 80 nicht mal den Server zum Laufen und mit Port 81 habe ich (vorübergehend) ein Kontakt von Client/Rechner1 zu Server/Rechner2. Ist aber momentan auch schon wieder vorbei.
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 27. Dez 2005
  Also, ich liste mal das Wichtigste auf:
  
  procedure TForm1.FormActivate(Sender: TObject);
  begin
  TcpServer1.LocalPort := '5000';
  TcpClient1.RemotePort:= '5000';
  MeldeCon; //Meldet den Verbindungsstatus hier:Weder Server noch Client aktiv
  end;
  
  procedure TForm1.ServerEinBtnClick(Sender: TObject);
• Forum: Netzwerke

  Re: Suche für Client die richtige Remote.Host-Angabe der Ser

    Delphi
    by Jumbo, 27. Dez 2005
  Wenn ich mein Programm mit Server2/Client2 auf einem anderen Rechner(2) im lokalen Netzwerk laufen lasse und den Server2 aktiviere (Listening läuft), dann finde ich keine IP-Adresse, um mit Client1 von Rechner1 Kontakt aufzubauen. Ich habe hier irgendwo gelesen, dass man keine externe IP-Adresse nehmen kann. Muss ich nun aus der vollständigen IP eine lokale konstrieren?
  Mit '127.0.0.193' oder so...
• Forum: Netzwerke

  Suche für Client die richtige Remote.Host-Angabe der Servers

    Delphi
    by Jumbo, 27. Dez 2005
  Hallo,
  
  ich habe in meinem Delphi7-Programm eine TcpServer und einen TcpClient. Wenn der Server läuft, kann ich den Client nur mit Connect verbinden, wenn ich TcpClient1.RemoteHost := 'localhost'; zuweise. (Dann klappt auch das Senden zum Server.)
  
  Jedoch:
  Bei der Zuweisung TcpClient1.RemoteHost := '172.73.86.195'; (ist nicht das Original, verändert), was der IP des Rechners in meinem...