AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Dateitransfer mit Tücken......
Thema durchsuchen
Ansicht
Themen-Optionen

Dateitransfer mit Tücken......

Ein Thema von Ricane · begonnen am 7. Aug 2004 · letzter Beitrag vom 7. Aug 2004
Antwort Antwort
Benutzerbild von Ricane
Ricane

Registriert seit: 21. Mär 2003
Ort: Quickborn
170 Beiträge
 
Delphi 7 Architect
 
#1

Dateitransfer mit Tücken......

  Alt 7. Aug 2004, 16:23
Moin,

ich habe ein Problem, was den Dateitranfsfer mit den ClientSocket und ServerSocket Komponenten betrifft! Das eigentlich Senden und Empfangen der Daten ist ja gar nicht das Problem, sondern das Anzeigen der Daten auf dem Server...

Um genau zu sein, habe ich jeweils 2 DriveComboBox, DirectoryListBox und FileListBox auf die Form gelegt. Auf der einen möchte ich das Abbild des Clienten anzeigen, aber wie stelle ich das an?!

Hab schon mal geguckt, aber man kann die Boxen nicht mit Streams futtern, oder sowas.......


Wer weiss mehr?


Ricane
Hendrik
So much to Code... so less Time....

www.RicaneSoftware.de
  Mit Zitat antworten Zitat
MrKnogge

Registriert seit: 9. Jun 2003
Ort: Pforzheim
2.458 Beiträge
 
Delphi 2007 Professional
 
#2

Re: Dateitransfer mit Tücken......

  Alt 7. Aug 2004, 16:57
wie "fütterst" du den die Streams ?

schreib dir doch einfach eine procedure, die deine Streams ausliest, und dann dann die Laufwerke etc. den entsprechenden Controls hinzufügt.
Christian Bootz
Einstein ist tot, Newton ist tot,
und mir ist auch schon ganz schlecht...
  Mit Zitat antworten Zitat
Benutzerbild von Ricane
Ricane

Registriert seit: 21. Mär 2003
Ort: Quickborn
170 Beiträge
 
Delphi 7 Architect
 
#3

Re: Dateitransfer mit Tücken......

  Alt 7. Aug 2004, 17:18
Ich lös das Problem jetzt anders........ nämlich so.....

Delphi-Quellcode:
        D := 'C:\Windows\*.*';
        SendMessage(ListBox1.Handle,
          LB_DIR, DDL_ARCHIVE + DDL_DIRECTORY + DDL_DRIVES + DDL_EXCLUSIVE +
          DDL_HIDDEN + DDL_READONLY + DDL_READWRITE + DDL_SYSTEM, Integer(D));
        For I := 0 To listbox1.Items.Count - 1 Do
          Text := Text + '/' + listbox1.Items[I];
        frmMain.Server.Socket.Connections[0]. SendText('300' + Text);
Und "auf der anderen Seite" teil ich das dann in verschiedene Komponenten auf und fertig ist die Illusion


Ricane
Hendrik
So much to Code... so less Time....

www.RicaneSoftware.de
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:41 Uhr.
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