Delphi-PRAXiS
Seite 2 von 5     12 34     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Listbox Inhalt von Server zum clienten schicken??? (https://www.delphipraxis.net/120495-listbox-inhalt-von-server-zum-clienten-schicken.html)

htxmlx 11. Sep 2008 18:05

Re: Listbox Inhalt von Server zum clienten schicken???
 
sorry soll buchstaben heißen also diese vorbuchstaben wie z.b. #25 dann muss ich dem computer ja sagen das eine message mit den 3 vorbuchstaben ein nickname ist ...wie mach ich das dann?

Gruß, htxmlx

DeddyH 11. Sep 2008 18:15

Re: Listbox Inhalt von Server zum clienten schicken???
 
Also, Du willst als Merkmal 3 bestimmte Zeichen schicken? Würde ich mit Length() und Copy() abfragen.

htxmlx 11. Sep 2008 18:18

Re: Listbox Inhalt von Server zum clienten schicken???
 
ok, thx erxtmal nur da ich damit bis jetzt noch net gearbeitet habe wir würde das dann ausehen in der If Abfrage mit dem ReciveText der dann als Text definiert ist...


Gruß, htxmlx

DeddyH 11. Sep 2008 18:20

Re: Listbox Inhalt von Server zum clienten schicken???
 
Delphi-Quellcode:
s := Socket.ReceiveText;
if (Length(s) > 2) and (Copy(s,1,3) = '123') then...
So in der Art.

htxmlx 11. Sep 2008 18:24

Re: Listbox Inhalt von Server zum clienten schicken???
 
ah danke: perfekt genau das hab ich gesucht...ich probiere mich dann mal in der anwendung dessen und melde mich beim nächsten problem wieder...

Gruß, htxmlx

htxmlx 11. Sep 2008 19:04

Re: Listbox Inhalt von Server zum clienten schicken???
 
Ok in die Listbox bekommen tu ichs, nur das stehen dann immer noch die 3 vorzeichen vor dem namen kann man die mit irgendeinem befehlt wegmachen?

nach langem rumprobieren bin ich an einem zweiten problem verzweifelt wenn der client dann disconnected dann soll der nickname ja auch aus der online lite gelöscht werden ich habs so versucht...
Delphi-Quellcode:
procedure TForm1.ServerSocket1ClientDisconnect(Sender: TObject;
  Socket: TCustomWinSocket);
var
i: Integer;
Text: String;
begin
Text:=Socket.ReceiveText;
i := Clients.Items.IndexOfObject(Text);
if (Length(Text) > 2) and (Copy(Text,1,3) = '#99') then
Clients.Items.Delete(i);
end;
Also bei disconnecten sendet man noch einmal die nickname nachricht mit #99 davor und wenn die dann bei disconnecten halt ankommt soll das item halt gelöscht werden. mien problem nur man kann den index of object leider net von text definieren sondern nur von TObjecten, also wie soll ich da umsetzen...

Gruß, htxmlx

htxmlx 11. Sep 2008 19:59

Re: Listbox Inhalt von Server zum clienten schicken???
 
Also ich bin jetzt soweit das alles funktioniert außer das löschen der schon disconnecteten Nicknames und halt das Verstecken der 3 anfangs zeichen...

Gruß, htxmlx

SirThornberry 11. Sep 2008 21:02

Re: Listbox Inhalt von Server zum clienten schicken???
 
Könntest du bitte für das neue Problem auch ein neues Thema erstellen? Das hier rein zu packen führt nur zu einem Durcheinander. Zudem findet man es dann über die Suche nicht so gut weil der Titel gar nicht mehr dazu passt.

htxmlx 12. Sep 2008 14:15

Re: Listbox Inhalt von Server zum clienten schicken???
 
Naja meine Frage von oben besteht ja noch, denn ich muss ja wenn ein Client connectet den kompletten inhalt der listbox aufm server an ihn senden...auf dem server funktioniert alles nur der client bekommt bis jetzt nur ne person online angezeit wenn sie nach ihm kommt...

ich müsste also alle nicknames die auf server in der listbox stehen in einzenlnen nachrichten versenden
und das natürlich wenn jemand on kommtz.B.

Listbox aufm server

#99Marc
#99Hubert
#99Lisa

So jetzt muss zum Clienten

..SendText(ListboxItem1)
..SendText(ListboxItem2)
..SendText(ListboxItem3)
und das bis alle versendet sind..aber woher weiss das ding wieviele drin sind und wie mach ich das das für jedes ne einzelne nachricht kommt???

Gruß, htxmlx

DeddyH 12. Sep 2008 14:24

Re: Listbox Inhalt von Server zum clienten schicken???
 
Lauf doch einfach in einer Schleife durch die Listbox.Items und sende jeden Eintrag.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:15 Uhr.
Seite 2 von 5     12 34     Letzte »    

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz