kopjuje plik na dysk..
AssignFile(F,di);
if FileExists(di) then reset(F,1) else rewrite(F,1);
RealSize := Socket.ReceiveBuf(Buffer, SizeOf(Buffer));
Seek(F, TotalSize);
{$I-} BlockWrite(F, Buffer, RealSize); {$i+}
TotalSize := TotalSize + RealSize;
gdy jest juz caly robie :
totalsize:=0;
application.ProcessMessages;
sleep(10);
screen.Picture.LoadFromFile(di);
i pokazuje mi ze inne proces korzysta z tego pliku i nie mozna go wcaignac do Timage
sory jeszce dodaje na koniec : closefile (F)
ale nadal zle..
pliz pomozcie - co zrobic by po stworzeniu pliku i zamkieciu moc wczytac go do Timage ;-(