Forum: Netzwerke
Delphi
by luckys41,
13. Mär 2009
Funktioniert leider auch nicht :/
Forum: Netzwerke
Delphi
by luckys41,
12. Mär 2009
Hab es jetzt so
procedure TForm1.Timer1Timer(Sender: TObject);
var i:Integer;
begin
with ServerSocket1 Do
begin
for i:=0 to Socket.ActiveConnections Do
begin
Forum: Netzwerke
Delphi
by luckys41,
12. Mär 2009
Dankeschön für die Antworten.
Aber könnt ihr mir vielleicht einen Code Schnipsel zeigen wie sowas beim Server geht?
Forum: Netzwerke
Delphi
by luckys41,
12. Mär 2009
Soweit so gut.
Server :
:cheers:
procedure TForm1.Timer1Timer(Sender: TObject);
var i:Integer;
begin
with ServerSocket1 Do
begin
for i:=0 to Socket.ActiveConnections Do
Forum: Netzwerke
Delphi
by luckys41,
12. Mär 2009
Hey,
Zu meinem Problem, von meiner Nickliste in meinem Chat.
Durch folgenden Code werden die Clients aufgelistet
procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
var
voice: OLEVariant;