Ich habe eine funktion (on client read eines ClientSocket) die immer angestosen wird wenn der socket readed. darin wird alles was kommt in eine string geschrieben.
leider kommt manchmal so schnell was an, das einige strings zusammengewürfelt gespeichert werden.
nu würde ich gern eine funktion oder so haben, die mir alle einzelnd ankommenden strings in eine art array oder so etwas schreibt und mir dann einzelnd wieder in mein memofeld ausgebt ,nur halt ohne die zusammenwürfelllungen...
Hat da jemand eine idee??
danke im voraus!!

Code:

Void __fastcall TForm1::ClientRead(Tobject Sender, TCustomWinSocket *Socket)
{
String s;
s= Socket->ReceiveText(); <- genau diese Daten, die hier ankommen, sind manchmal zusammengeschustert

ListBox->Items->Add(s); <- sollen dann aber hier ohne fehler rein...

}

-junix

habe das jetzt mal asprobiert, und es funktioniert soweit auch ganz ordentlich, bis auf die tatsache, das er dann die werte die zusammengechustert waren abschneidet und wegwirft...

Wer zur Hölle ist "er"?

Darkwing schrieb:

bin leider nicht so clever

Och komm... nu stell dein Licht mal nicht so unter den Scheffel...Das wichtigste ist nicht aufzugeben...

-junix

-junix

Serverseite:
void __fastcall TForm1::ServerIPClientConnect(TObject *Sender,
TCustomWinSocket *Socket)
{
zaehler++;
for(int y=0; y<zaehler; y++)
{
String a = "los";
buff = a.c_str();
ServerIP->Socket->Connections[y]->SendBuf(buff,a.Length());
for(int x=0; x<zaehler; x++)
{
String a = ServerIP->Socket->Connections[x]->RemoteAddress;
buff = a.c_str();
ServerIP->Socket->Connections[y]->SendBuf(buff,a.Length());
}
}
}

Clientseite:

void __fastcall TForm1::ClientIPRead(TObject *Sender,
TCustomWinSocket *Socket)
{
//String s;
String s[30];
//s = Socket->ReceiveText();
int length = Socket->ReceiveLength();
Socket->ReceiveBuf(s,length); Hier liegt das dilema mal wieder in dieser version
for (i = 0;i < length;++i)
if (s[i] >= 1 && s[i] <= 9)
{
if(s[i] == "los")
{
ListBox1->Clear();
ListBox1->Items->Add("Alle");
}
if(s[i] == "kill")
{
ClientText->Socket->Disconnect(0);
ClientIP->Socket->Disconnect(0);
}
if(s[i] != "kill" && s[i] != "los")
{
ListBox1->Items->Add(s[i]);
}
}
}

Ach was ich veragrß zu erwähnen: Schau dir mal das Chat-Beispiel im %BCB%\Examples Ordner an

ich habe schon eine umfangreiche chattversion gechriebn, aber die hat datenverluste...und die verscuhe ich zu beheben!...
fällt dir was dazu en?

-junix

Clientseite:

void __fastcall TForm1::ClientIPRead(TObject *Sender,
TCustomWinSocket *Socket)
{
String s;
s = Socket->ReceiveText();
Und hier muss irendwas hin, was die kommenden daten puffert oder die länge wieder von dem string trennt
if(s == "los")
{
ListBox1->Clear();
ListBox1->Items->Add("Alle");
}
if(s == "kill")
{
ClientText->Socket->Disconnect(0);
ClientIP->Socket->Disconnect(0);
}
if(s != "kill" && s != "los")
{
ListBox1->Items->Add(s);
}
}[/cpp]

EDIT: Bitte Codetags verwenden: sfds

Also das Sleep würde ich jetzt schon rausnehmen, da mit Sleep dein Programm für die angegebene Zeit angehalten wird. Den String zerlegen kannst du zB mit AnsiString::Pos() und AnsiString::SubStr() oder AnsiString::IsDelimiter(). Wie man die Methoden anwendet steht in der BCB-Hilfe

Und hier muss irendwas hin, was die kommenden daten puffert oder die länge wieder von dem string trennt

Genau. Und das erwarte ich jetzt eigentlich von dir, dass du das Codierst... PuppetMaster hat ja schon hinweise geliefert...

-junix

an.

Mit den FastnetCompos kannst Du Streams (MemoryStream, FileStream, StringStream usw.) bequem an eine Ziel IP schicken.

void __fastcall TForm1::ClientIPRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
     char *zeichen;
     char *messg;
     String s, laenge, ergebniss;
     s = Socket->ReceiveText();

     zeichen = strtok(s.c_str(), ":");
     AnsiString test = messg = strtok(NULL, "±");
     test = messg;
     laenge = zeichen;
     if(IsDelimiter(s.Pos(3), test, laenge.Length()) == true)
     ShowMessage(laenge);

     else
     ShowMessage("habs net verstanden");

-junix

mein prob iss das ich schon mit sttok gearbeitet habe

Und das hält dich davon ab was neues zu lernen?

Darkwing schrieb:

und strin pos nicht verstanden habe

Wenn du nicht verstanden hast, was in den Methodenbeschrieben von AnsiString steht, dann frag hier nach. Aber sag auch WAS du nicht verstehst. Das ist recht esentiell zum helfen.

Dafür sind die Fastnet Komponenten im handling allgemein etwas schrottiger.. (meine Meinung)..

Warum, sind die Dinger instabil? Wir transferieren mit unseren Anwendungen rucki-zucki die ganzen Configdaten zu den Clients usw. Schnell noch 'nen Header vor den Stream gehagen und ab die Post (PostIt()). Einfacher gehts eigentlich nicht, wenn ich mir hier so anschaue wie sich Darkwing die Flügel, äh Finger abbricht, bloß um ein paar Strings zu übertragen ...

Mal ein Tipp:

1. TStringList mit den zu versendeten Parametern erzeugen
2. StringList->Commatext in einen Stringstream
3. Stringstream mit NMStream (Fastnet) an den Zielrechner verschicken
4. und dann auf dem Zielrechner das ganze umgekehrt auslesen

@MacFly: Womit wir wieder bei einem Protokoll wären... (der Kreis schliesst sich) (o;

@F98 Och bitte... der bricht sich keine Flügel sondern ist dabei seine Schwingen zu stärken... Ich bin überzeugt die ERfahrung tut ihm gut...

-junix

und dnake das ihr mir die lösung nicht einfach gegeben habt...