Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Indy10 MemoryStream senden/empfangen (https://www.delphipraxis.net/156844-indy10-memorystream-senden-empfangen.html)

XXcD 16. Dez 2010 19:03

Indy10 MemoryStream senden/empfangen
 
Hallo,
ich habe gerade Indy10 installiert und musste mit erschrecken verstellen, dass man dort nur noch idStreamVCL verwenden kann.
Ich müsste aber ein Memorystream benutzen, da das Projekt etwas größer ist und alles darauf aufbaut.
Ist das denn überhaupt noch möglich oder geht dasn icht mehr?

bernhard_LA 18. Apr 2012 09:27

AW: Indy10 MemoryStream senden/empfangen
 
unterhttp://indy10clieservr.svn.sourcefor...am%20Exchange/


verbesserungen , kommentare ???

himitsu 18. Apr 2012 10:13

AW: Indy10 MemoryStream senden/empfangen
 
Ist der idStreamVCL denn nicht von TStream abgeleitet? (ich hab jetzt nicht nachgesehn)


Wenn es sowas nicht schon geben sollte.

Du könntst dir einen idStreamVCL ableiten, dieser bekommt einen TStream als Parameter im Constructor mit.
Alle Lese-/Schreibzugriffe an diesen idStreamVCL werden dann an den TStream weitergeleitet.

Beim Aufruf erstellt man sich dann diese Ableitung als Vermittler für seinen eigenen Stream.

bernhard_LA 18. Apr 2012 10:33

AW: Indy10 MemoryStream senden/empfangen
 
ich verschicke Streams , MemoryStreams ganz ohne verwendung von idStreamVCL implementiert, das letzte beispiel spielt genau wie ich es wollte,

muss man idStreamVCL verwenden , gibt es eine referenz implementierung bzgl. idStreamVCL, vermisse ich etwas in meinen DEMOS ?

DataCool 18. Apr 2012 10:51

AW: Indy10 MemoryStream senden/empfangen
 
@bernhard_LA:

Ich habe gerade mal kurz in Deinen Source im SVN -Link geschaut,
dabei ist mir aufgefallen das Du :
Delphi-Quellcode:
  public
    { Public declarations }
    aFS_s: TmemoryStream;
    aFS_r: TmemoryStream;

    file_send    : String;
    file_receive : String;
  end;
die Steams & Co global in der Form deklariert hast?!
Dir ist schon klar das das TCP-Server-OnExecute Event :
Delphi-Quellcode:
procedure TStreamServerForm.IdTCPServer1Execute(AContext: TIdContext);
begin

  ///
  afS_s:= TmemoryStream.Create;

  afS_r:= TmemoryStream.Create;

  Memo1.Lines.Add('Server starting .... ');

  Image1.Picture.Bitmap.SaveToStream(aFS_s);

  aFS_s.Seek(0,soFromBeginning);

  // .... snip
mehrfach und parallel eintritt ?
Du wirst mit Sicherheit ein Problem bekommen wenn mehrere Clients gleichzeitig zum Server connecten!
Du MUST die entsprechenden Streams auf jedem Fall lokal im OnExecute des Server deklarieren,
damit diese pro Client separat erzeugt werden.

Gruß Jan

bernhard_LA 20. Apr 2012 14:38

AW: Indy10 MemoryStream senden/empfangen
 
:) Danke, bereits im SVN verbessert


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:30 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