hey, ik ben een beetje aan het klooien met indy wat ik eerder nooit gebruikte, maar nu zit ik met een dilemma
Het server gedeelte doet het goed.
De client gedeelte doet het goed, als het gaat om connecten en een bericht sturen naar de server (die zie ik daar dan ook verschijnen). Nu verspreid de server dat bericht ook weer, alleen bij het inlezen vanuit de client zijn kant gaat het fout, dan hangt die:
Code:
procedure TForm1.IdTCPClient1Connected(Sender: TObject);
var
Lstring: string;
begin
LString := IdTCPClient1.ReadLn;
{ als ik de vorige regel commentaar maak, hangt ie niet en kan je gewoon berichten versturen naar de server, alleen ontvangt de client geen berichten terug }
end;
Hij hangt dus als ik op connect douw....en geeft het 'connected' niet eens meer weer:
Code:
procedure TForm1.connectClick(Sender: TObject);
begin
idTCPClient1.Port := 666; // :P
idTCPClient1.Host := '127.0.0.1';
idTCPClient1.Connect(5);
if (not idtcpclient1.Connected) then Showmessage('Not connected')
else Showmessage('Connected'); [/b][/quote]
end;
iemand een idee? :/
edit: sinds wanneer doet de code tag aan layoutverneuking?