Czy umiałby ktoś przełożyć na delphi następujący kod?
int len;
Socket->ReceiveBuf(&len, sizeof(len)); // odbierz rozmiar pliku
char * buffer = new char[len];
Socket->ReceiveBuf(buffer, len);
TFileStream * Stream = new TFileStream("c:plik.mp3", fmOpenWrite);
Stream->Write(buffer, len-1);
delete [] buffer;
delete Stream;
byłbym bardzo wdzięczny, bo zaraz chyba wywalę kompa przez okno :[---------------------------
Delphi 6
Pozdrówka