AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi hab mir selbst geholfen
Thema durchsuchen
Ansicht
Themen-Optionen

hab mir selbst geholfen

Ein Thema von gandime · begonnen am 19. Jul 2006 · letzter Beitrag vom 4. Apr 2008
Thema geschlossen
gandime
(Gast)

n/a Beiträge
 
#1

hab mir selbst geholfen

  Alt 19. Jul 2006, 14:54
so
ich hab mir jetzt selbst geholfen

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  FStream: TFileStream;
begin
  FStream := TFileStream.Create('C:\client.jpg', fmOpenRead);
  idtcpclient.Connect;
  try
    idtcpclientIOHandler.Write(Fstream,0,true);
  finally
    idtcpclient.Disconnect;
  end;
  FreeAndNil(FStream);
end;


procedure TForm1.idtcpserverExecute(AContext: TIdContext);
var
  FSTream: TFileStream;
begin
  FStream := TFileStream.Create('C:\server.jpg', fmCreate);
  try
    AContext.connection.IOHandler.ReadStream(fstream);
  finally
    AContext.connection.Disconnect;
  end;
  FreeAndNil(FStream);
end;
fals wer das selbe prob hatte hilft das hier hoffendlich
 
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.171 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: hab mir selbst geholfen

  Alt 19. Jul 2006, 14:56
Ich denke bei diesem Titel kommt keiner darauf was du eigentlich gelößt hast.

Also bitte dem Thread einen eindeutigen Titel geben
Windows Vista - Eine neue Erfahrung in Fehlern.
 
Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.837 Beiträge
 
Delphi 10 Seattle Enterprise
 
#3

Re: hab mir selbst geholfen

  Alt 19. Jul 2006, 15:02
Zitat von Bernhard Geyer:
Ich denke bei diesem Titel kommt keiner darauf was du eigentlich gelößt hast.
Also bitte dem Thread einen eindeutigen Titel geben
Ich vermute wollte auf folgenden Thread antworten, hat aber aus Versehen den falschen Button erwischt und so ein neues Thema eröffnet.

Beitrag: daten via tcp indy 10 verschicken?
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
 
gandime
(Gast)

n/a Beiträge
 
#4

Re: hab mir selbst geholfen

  Alt 19. Jul 2006, 15:37
huch hab mich verklickt ich hatte schonmal nen tread aufgemacht und wollte auf mich selber antworten das ich das selber gelöst habe

http://www.delphipraxis.net/internal...=580902#580902
 
Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#5

Re: hab mir selbst geholfen

  Alt 4. Apr 2008, 08:00
Moin,

sobald ich den Code ausführe schmeißt der Client folgende Fehlermeldung:

_______________________________
Application.Name
_______________________________
Socket Error # 10053
Software caused connection abort.
_______________________________
[mbOK]
_______________________________

Und dabei diconnectet der Client auch noch.

Die Datei wird vom Server angelegt und ist dann dauerhaft 0KB groß, also nix drin, wenn ich versuche dann die zu löschen greift der Server noch auf die Datei zu, obwohl der Client längst disconnected ist.


Weiß jemand woran das liegen könnte? (Client und Server laufen auf dem gleichen PC)

Edit:
Arg hab den Fehler schonmal gefunden: Beim Server wurd noch ReadLN anstatt ReadStream aufgerufen!
 
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
 
Delphi 11 Alexandria
 
#6

Re: hab mir selbst geholfen

  Alt 4. Apr 2008, 23:05
Moin Zusammen,

damit's nicht völlig durcheinander geht, dann bitte, bei Bedarf, im Ursprungsthread weitermachen.
Danke.

Ich mach' dann hier mal zu.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
 
Thema geschlossen


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 21:34 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