Announcement

Collapse
No announcement yet.

TClientSocket TServerSocket 2

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • TClientSocket TServerSocket 2

    Hy,<bR>
    kann mir einer mal ein Beispiel Posten wie ich am besten<bR>
    mit dem Client/Server Socket eine <bR>
    Datei sende bzw. Empfange?<bR>
    Schon Mal Danke im vorraus.<bR>
    <bR>
    <b>mfg.:</b> <font color="#0000FF">Andre'</font> <bR>

  • #2
    Davon ausgehend, dass du aus deinem vorigen Posting die Verbindung schon hast, hier ein Versuch:

    <pre>
    String dateiname="test.txt";
    LPBYTE mem;
    unsigned long size;
    GFile datei;
    if(datei.OpenReadExist(dateiname)==false)
    {
    Application->MessageBox("Fehler","Info",MB_APPLMODAL|MB_ICONST OP|MB_OK);
    return;
    }
    size=datei.GetSize();
    if(size==0)
    return;
    mem=(LPBYTE)SysGetMem(size);
    if(mem==NULL)
    {
    Application->MessageBox("Fehler bei Speicherreservierung",dateiname.c_str(),MB_APPLMOD AL|MB_ICONASTERISK|MB_OK);
    SysFreeMem(mem);
    datei.Close();
    return;
    }
    if(datei.Read(mem,size)==false)
    {
    Application->MessageBox("Fehler beim lesen der Datei","Read File",MB_APPLMODAL|MB_ICONASTERISK|MB_OK);
    SysFreeMem(mem);
    datei.Close();
    return;
    }
    datei.Close();
    ServerSocket1->Socket->Connections[0]->SendBuf(mem,size);
    SysFreeMem(mem);

    </pre>

    Wenn du die Klasse GFile willst->http://home.snafu.de/christian.marquardt/dlls.3/3_chfile.html

    wenn nicht, dann die Befehle durch die der Win 32 API ersetzen
    Christian

    Comment


    • #3
      Du solltest aber ein geeignetes Datenformat (z.B. JPG) für die Bilddaten verwenden bzw. die Bilddaten vor dem Übertragen noch komprimieren, sonst wird das Übertragen ganz schön lange brauchen!

      MFG Daniel

      Comment


      • #4
        <b>Hy,<br>
        thx</b>,ich probiers aus.<br>
        <b>mfg:</b> Andre

        Comment

        Working...
        X