Chattool - Probleme beim Übermitteln des Usernames

[soulies]

hoi,

ich vermute der Fehler liegt in "ClientRead"

Delphi-Quellcode:

procedure TFormClient.ClientRead(Sender: TObject; Socket: TCustomWinSocket);
var ... ;
begin
    ...
    ...

        if sIP = sEigeneIP then  // <-- sEigeneIP wird wohl nicht oder falsch gesetzt sein und deshalb läuft er hier nicht durch
        begin
          ...
          Form2.richeditusers.lines.Add(Copy(sText, 1, Pos(';', sText)-1));
          ... 
        end;
    
    ...
end;

cya