4. Hilfe mit zu schnellen Daten

Hilfe mit zu schnellen Daten

  • J

    Der Socket schluckt gar nix... alles was Daten schlucken könnte wäre deine Empfangsroutine... Statt nach Quellcode zu betteln würdest du besser mal Zeigen wies im Moment aussieht.

    -junix

    0
  • D

    so langsam kommt mir der verdacht, das du hoffst/glaubst, das ich das allei hinbekomme...dein vertrauen rühmt dich...werde mal schauen was ich hier reinsetzen kann....bin aber grad wieder aufm anderen weg...mal sehen was du dazu sagst...
    Also:

    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]);
    }
    }
    }

    0
  • P

    Mal ne Frage: Warum nutzt du nicht ServerIP->Socket->Connections[i]->SendText(a);?? Dann ersparst du dir auch das umwandeln in cahr* 🙂

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

    0
  • D

    send text(a) hat das problem, das das proggi die daten nicht komplett oder defekt beim client abliefert...steht aber alles im davorliegenden thema.
    junix hatte eine idee in den faq beschriebn, die ich leider nicht ganz in der lage bin nachzubasteln...aus diesem grund bin ich hier!

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

    0
  • J

    Aber sag mal... du machst ja gar nicht das was in der FAQ beschrieben steht mit dem Protokoll?!?

    -junix

    0
  • D

    das hatte ich verworfen, weil ich nicht weiterkam...und habe eine andere idee mit länge versucht...bekommst aber gleich deine version mit dem länge:string

    0
  • D

    Serverseite:
    [cpp]
    void __fastcall TForm1::ServerIPClientConnect(TObject *Sender,
    TCustomWinSocket *Socket)
    {
    zaehler++;
    for(int y=0; y<zaehler; y++)
    {
    werkzeuge = "los";
    werkzeuge = IntToStr(werkzeuge.Length()) + ":" + werkzeuge;
    ServerIP->Socket->Connections[y]->SendText(werkzeuge);
    Sleep(10);Mit sleep wollte ich die sendegeschwindigkeit senken, lommen aber wieder raus wenns klappen sollte
    for(int x=0; x<zaehler; x++)
    {
    Sleep(50);
    werkzeuge = ServerIP->Socket->Connections[x]->RemoteAddress;
    werkzeuge = IntToStr(werkzeuge.Length()) + ":" + werkzeuge;
    ServerIP->Socket->Connections[y]->SendText(werkzeuge);
    Sleep(50);
    }
    }
    }

    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

    0
  • P

    BITTE CODE-TAGS VERWENDEN!

    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

    0
  • J

    Darkwing schrieb:

    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

    0
  • D

    bin dabei...bin dabei...

    0
  • F

    Schau Dir mal das Beispiel in c:\Programme\Borland\CBuilder6\Examples\FastNet\Stream\

    an.

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

    0
  • J

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

    0
  • D

    und wie iss das???
    weiß nur noch nicht genau wie es zuende geht

    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");
    0
  • J

    Etwas umständlich oder? Wozu Strtok wenns AnsiString::Pos gibt? Probier hald den Code aus, mach nen Teststring den du durch die Funktion laufen lässt und üb ein Wenig mit dem Debugger um zu verstehen was passiert...

    -junix

    0
  • D

    mein prob iss das ich schon mit sttok gearbeitet habe und strin pos nicht verstanden habe

    0
  • J

    Darkwing schrieb:

    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.

    0
  • F

    junix schrieb:

    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

    0
  • M

    wie wär es wenn du einfach nach jeden string nen endzeichen setzt.
    das denn per string zeichen abfrage ansprichst per schleife?
    so kriegst dennja string länge raus für jeden string dann einfach teilen fertig.

    0
  • D

    ich habe jetzt ansistring pos ausprobiert und festgestellt, das mir das ganze die position eines zu suchenden objektes zurückgibt...
    aber was fang ich dann damit an?

    0
  • J

    AnsiString hat ne schöne MEthode "SubString"...

    @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

    0
Anmelden zum Antworten