Salve a tutti ho un piccolo problema...

Ho sviluppato un'applicazione con componenti Tclientsocket e Tserversocket per trasferire file tra  due applicazioni. Ora vorrei far si che la progressbar del lato client (quello che invia) avanzasse in modo dinamico durante il trasferimento del file. Nel lato server ho risolto il tutto lavorando sull'evento OnRead...

Potete darmi dei consigli per favore? Grazie infinitamente!