Delphi - Client/server InDy - Errore Read su Stream dal Server

niobi

Nuovo Utente
31 Ago 2010
2
0
1
taranto
niobi.xoom.it
Salve a tutti, sono nuovo di queste parti, ma mi sembra davver ben congegnato.
Dunque.
Ho scritto due procedure (Client e server) separate, in cui ho inserito componenti InDy specifici; nel mio caso specifico esse sono sullo stesso computer (collegamento su 127.0.0.1), la porta è > 50000, nella realtà risiedopno su computer diversi in rete locale (IP passivo).
Riporto la porzione di codice (ritengo) sufficiente per comprendere il problema.

procedura client (contiene comp. TIdTCPClient + TIdAntiFreeze)
- - - -- - - - - - -
crea un file su disco, contenente i dati da spedire (da poche decine ad alcune migliaia di caratteri), e lo spedisce al server:

TmpStream := TMemoryStream.Create;
TmpStream.LoadFromFile(IndirProc+'\REPORT\TMS.DAT'); // file creato su disco locale
Client.OpenWriteBuffer;
try
Client.WriteStream(TmpStream);
except
on E: ESocketError do
MesServ('Transazione non eseguita: '+#10+'"'+E.Message+'"'+#10+'Riprovare...');
end;
Client.CloseWriteBuffer;
FreeAndNil(TmpStream);

procedura Server (contiene comp. TCPServer + TIdThreadMgrDefault + TIdAntiFreeze.)
- - - - - - - - - - - - -
(in Server.OnExecute)
try
TmpStream := TFileStream.Create(IndirArch+'\Trans7',fmCreate);
Size := AThread.Connection.ReadInteger;
AThread.Connection.ReadStream(TmpStream,Size,False);
except
on E: Exception do begin
MesServ(3,'Errore in lettura dati: '+E.Message); Ok := False;
end;
end;
FreeAndNil(TmpStream);

Problema
---------
se leggo il valore di Size, è = 4.114.567.644 !!!!! (tramite debug) e la procedura chiude in errore, credo, per timeout.
Domanda:
cosa non ho fatto?
cosa legge sullo stream che io avrei dovuto azzerare, forse?
ma lo stream ricevuto dal server, non è quello spedito dal client, visto che viene attivato l'evento OnExecute?
Grazie per una risposta.
 
Discussioni simili
Autore Titolo Forum Risposte Data
N Sistema di Help di Delphi 7 non funziona su Win10 Windows e Software 0
voldemort Delphi XE: corsi e guide Programmazione 0
StarFish [DELPHI] Filter di un campo TSQLTimeStampField Programmazione 0
O Matrici di oggetti in delphi Windows e Software 0
F help delphi Programmazione 0
N client web hikvision IP Cam e Videosorveglianza 10
C Java client / server Java 0
W [C#] Api RESTFul server/client con cifratura .NET Framework 0
W [C#] Sicurezza Client/Server - SOAP o RESTFull API .NET Framework 0
P [PHP] Caricare un file da client XP su server Ubuntu PHP 2
Chompy_666 Errore 550 /ftp client Server Dedicati e VPS 1
S [PHP] Errori in lato server ma non in lato client PHP 5
L [WordPress] Errori - Lato client dalla console del browser WordPress 1
A [MySQL] problema con la command line client. MySQL 0
B CLIENT VISUALE MYSQL MySQL 0
C [Java] Client web service con ssl, certificato .cer e trasferimento mtom Java 2
W Server e Client (dati dinamici) PHP 1
felino Client MAIL: backup email esistenti Mac e Software 1
A Invio Email alla connessione di un Client su Lan Reti LAN e Wireless 2
L Configurazione client FTP integrato in Dreamweaver HTML e CSS 3
MarcoGrazia node.js applicazioni standalone e client/server Javascript 0
P Problema con lettura filesystem del client da server! Upload multiplo foto. PHP 5
A leggere la data del client PHP 1
M Convertire piccolo codice da lato server a client Javascript 1
A client FTP gratis per Mac Mac e Software 1
E [RISOLTO]Sicurezza attacchi con $_session: come viene gestita nella trasmissione server client ? PHP 5
M Client/Server UDP - JAVA Programmazione 2
M pesantezza Javascript client-side Javascript 6
M esecuzione comando shell da applicazione php su client PHP 5
ivarello eseguire exec() lato Client PHP 1
Ndogni Antonio Gallo server crea nuova pagina html su client PHP 0
Z Eseguire una Query tramite linguaggi client-side è possibile? Ajax 3
YellowMan Client FTP per Android Smartphone e tablet 1
G Upload file di un client su sito PHP 18
M PEC Aruba: configurare client di posta Posta Elettronica 1
E Modificare sito Web tramite client FTP HTML e CSS 1
D Salvare file su PC client invece che su server - Script XDCC Fetcher PHP 3
F client di posta con php PHP 4
P client voip PHP 7
B Aumentare livello di sicurezza accesso client area riservata Classic ASP 5
F client in c Programmazione 1
O APACHE:[error] [client 127.0.0.1] File does not exist: /var/www/favicon.ico PHP 10
I desktop unico per tutti i client Windows e Software 1
A visualizare file pdf in client side PHP 8
catellostefano Un client di posta in PHP con le funzioni IMAP PHP 5
max1850 Creare un client ftp Classic ASP 8
crocchio Client PHP che dialoga con un Web Service in Java PHP 2
M Semplice php client e web service scritto in c# non funzionanti PHP 0
S Menu e sottomenu client side senza reload della pagina Javascript 1
M Problema per altri client Webdesign e Grafica 0

Discussioni simili